- fp2? x2 x1procedure
When x2 is rational, returns #t when (fpabs x2) > (fpabs x1) and x2 and x1 are nonoverlapping. When x2 is not rational, returns (fp= x1 0.0).
Examples:
> (define-values (x2 x1) (fl2 1/7)) > (fl2? x2 x1) #t > (fl2? 0.14285714285714285 0.07692307692307693) #f > (fl2? +inf.0 0.0001) #f
This function is quite slow, so it is used only for testing.