/*
 * 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;
    }
}
