\frac{-\left(f + n\right)}{f - n}\frac{\frac{1}{n - f}}{\frac{1}{n + f}}(FPCore (f n) :precision binary64 (/ (- (+ f n)) (- f n)))
(FPCore (f n) :precision binary64 (/ (/ 1.0 (- n f)) (/ 1.0 (+ n f))))
double code(double f, double n) {
return -(f + n) / (f - n);
}
double code(double f, double n) {
return (1.0 / (n - f)) / (1.0 / (n + f));
}



Bits error versus f



Bits error versus n
Results
Initial program 0.0
Simplified0.0
rmApplied clear-num_binary640.0
rmApplied div-inv_binary640.2
Applied associate-/r*_binary640.0
Final simplification0.0
herbie shell --seed 2020262
(FPCore (f n)
:name "subtraction fraction"
:precision binary64
(/ (- (+ f n)) (- f n)))