#692 rat(floatrat) doesn't re-gcd

[Stavros Macrakis]

When you re-rationalize a float-rational (keepfloat),
it doesn't perform the necessary GCD:

(%i1) rat(x^2-1.0)/rat(x-1.0),keepfloat:true;

(%o1) (1.0*x^2-1.0)/(1.0*x-1.0)

(%i2) rat(%o1);

RAT replaced 1.0 by 1//1 = 1.0
RAT replaced -1.0 by -1//1 = -1.0
RAT replaced 1.0 by 1//1 = 1.0
RAT replaced -1.0 by -1//1 = -1.0

(%o2) (x^2-1)/(x-1) <<<<<<<<<!!!!!!!!
(%i3) %+1;
(%o3) (x^2+x-2)/(x-1)

[Robert Dodier]

Logged In: YES
user_id=501686

Observed in 5.9.3cvs.