help/ltol

   1 NAME
   2     ltol - "leg to leg", third side of a right-angled triangle with
   3                 unit hypotenuse, given one other side
   4
   5 SYNOPSIS
   6     ltol(x, [,eps])
   7
   8 TYPES
   9     x           real
  10     eps         nonzero real
  11
  12     return      real
  13
  14 DESCRIPTION
  15     Returns sqrt(1 - x^2) to the nearest multiple of eps.
  16     The default value for eps is epsilon().
  17
  18 EXAMPLE
  19     > print ltol(0.4, 1e-6), hypot(0.5, 1e-6)
  20     .6 .866025
  21
  22 LIMITS
  23     abs(x) <= 1
  24
  25 LINK LIBRARY
  26     NUMBER *qlegtoleg(NUMBER *q1, *epsilon, BOOL wantneg)
  27
  28 SEE ALSO
  29     hypot
  30