help/places

   1 NAME
   2     places - return number of "decimal" places in a fractional part
   3
   4 SYNOPSIS
   5     places(x [,b])
   6
   7 TYPES
   8     x           real
   9     b           integer >= 2, defaults to 10
  10
  11     return      integer
  12
  13 DESCRIPTION
  14     Returns the least non-negative integer n for which  b^n * x  is an
  15     integer, or -1 if there is no such integer.
  16
  17     places(x,b) = 0 if and only if x is an integer.
  18
  19     If omitted, b is assumed to be 10.  If given, b must be an
  20     integer > 1.
  21
  22     places(x,b) = n > 0 if and only if the fractional part of abs(x)
  23     has a finite base-b "decimal" representation with n digits of which
  24     the last digit is nonzero.  This occurs if and only if every prime
  25     factor of den(x) is a factor of b.
  26
  27 EXAMPLE
  28     > print places(3), places(0.0123), places(3.70), places(1e-10), places(3/7)
  29     0 4 1 10 -1
  30
  31     > print places(0.0123, 2), places(.625, 2), places(.625, 8)
  32     -1 3 1
  33
  34 LIMITS
  35     b > 1
  36
  37 LINK LIBRARY
  38     long qplaces(NUMBER *q, ZVALUE base)
  39
  40 SEE ALSO
  41     digit, digits
  42