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



Bits error versus f



Bits error versus n
Results
Initial program 0.0
Simplified0.0
Applied clear-num_binary640.0
Applied div-sub_binary640.0
Simplified0.0
Simplified0.0
Final simplification0.0
herbie shell --seed 2022066
(FPCore (f n)
:name "subtraction fraction"
:precision binary64
(/ (- (+ f n)) (- f n)))