x - \frac{y}{1 + \frac{x \cdot y}{2}}x - \frac{y}{1 + \frac{y}{\frac{2}{x}}}(FPCore (x y) :precision binary64 (- x (/ y (+ 1.0 (/ (* x y) 2.0)))))
(FPCore (x y) :precision binary64 (- x (/ y (+ 1.0 (/ y (/ 2.0 x))))))
double code(double x, double y) {
return x - (y / (1.0 + ((x * y) / 2.0)));
}
double code(double x, double y) {
return x - (y / (1.0 + (y / (2.0 / x))));
}



Bits error versus x



Bits error versus y
Results
Initial program 0.0
rmApplied div-inv_binary640.1
Simplified0.0
rmApplied un-div-inv_binary640.0
Final simplification0.0
herbie shell --seed 2021110
(FPCore (x y)
:name "Data.Number.Erf:$cinvnormcdf from erf-2.0.0.0, B"
:precision binary64
(- x (/ y (+ 1.0 (/ (* x y) 2.0)))))