`fp2?``x2``x1`procedureWhen

`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.