1#include <limits.h>
2#include <math.h>
3
4double scalbln(double x, long n)
5{
6 if (n > INT_MAX)
7 n = INT_MAX;
8 else if (n < INT_MIN)
9 n = INT_MIN;
10 return scalbn(x, n);
11}