\sqrt{\left|\frac{a \cdot a - b \cdot b}{a \cdot a}\right|}\sqrt{\left|\frac{1}{\frac{a}{a + b}} \cdot \frac{a - b}{a}\right|}(FPCore (a b) :precision binary64 (sqrt (fabs (/ (- (* a a) (* b b)) (* a a)))))
(FPCore (a b) :precision binary64 (sqrt (fabs (* (/ 1.0 (/ a (+ a b))) (/ (- a b) a)))))
double code(double a, double b) {
return sqrt(fabs(((a * a) - (b * b)) / (a * a)));
}
double code(double a, double b) {
return sqrt(fabs((1.0 / (a / (a + b))) * ((a - b) / a)));
}



Bits error versus a



Bits error versus b
Results
Initial program 14.4
rmApplied difference-of-squares_binary6414.4
Applied times-frac_binary640.0
rmApplied *-un-lft-identity_binary640.0
Applied *-un-lft-identity_binary640.0
Applied distribute-lft-out_binary640.0
Applied associate-/l*_binary640.0
Final simplification0.0
herbie shell --seed 2020277
(FPCore (a b)
:name "Eccentricity of an ellipse"
:precision binary64
:pre (<= 0.0 b a 1.0)
(sqrt (fabs (/ (- (* a a) (* b b)) (* a a)))))