\frac{-\left(f + n\right)}{f - n}\sqrt[3]{\frac{f + n}{n - f}} \cdot \left(\sqrt[3]{\frac{f + n}{n - f}} \cdot \sqrt[3]{\frac{f + n}{n - f}}\right)(FPCore (f n) :precision binary64 (/ (- (+ f n)) (- f n)))
(FPCore (f n) :precision binary64 (* (cbrt (/ (+ f n) (- n f))) (* (cbrt (/ (+ f n) (- n f))) (cbrt (/ (+ f n) (- n f))))))
double code(double f, double n) {
return (((double) -(((double) (f + n)))) / ((double) (f - n)));
}
double code(double f, double n) {
return ((double) (((double) cbrt((((double) (f + n)) / ((double) (n - f))))) * ((double) (((double) cbrt((((double) (f + n)) / ((double) (n - f))))) * ((double) cbrt((((double) (f + n)) / ((double) (n - f)))))))));
}



Bits error versus f



Bits error versus n
Results
Initial program 0.0
Simplified0.0
rmApplied add-cube-cbrt_binary640.1
Final simplification0.1
herbie shell --seed 2020205
(FPCore (f n)
:name "subtraction fraction"
:precision binary64
(/ (- (+ f n)) (- f n)))