blob: 4e368b830d64d6a89630169a11bacdde37cc8945 [file] [log] [blame]
/*
* compute 10**x by successive squaring.
*/
#include <_ansi.h>
#include "std.h"
double
_DEFUN (__exp10, (x),
unsigned x)
{
static _CONST double powtab[] =
{1.0,
10.0,
100.0,
1000.0,
10000.0};
if (x < (sizeof (powtab) / sizeof (double)))
return powtab[x];
else if (x & 1)
{
return 10.0 * __exp10 (x - 1);
}
else
{
double n = __exp10 (x / 2);
return n * n;
}
}