Rational approximation : float2rational exact

float2rational (or exact)
takes as argument an expression.
float2rational returns a rational approximation of
all the floating point numbers r contained in this expression, such
that
| r - float2rational(r)| < , where
is defined by epsilon in the cas configuration
(Cfg menu, or cas_setup command).
Input :