\frac{-\left(f + n\right)}{f - n}\sqrt[3]{{\left(\frac{f + n}{n - f}\right)}^{2}} \cdot \sqrt[3]{\frac{f + n}{n - f}}(FPCore (f n) :precision binary64 (/ (- (+ f n)) (- f n)))
(FPCore (f n) :precision binary64 (* (cbrt (pow (/ (+ f n) (- n f)) 2.0)) (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) pow((((double) (f + n)) / ((double) (n - f))), 2.0)))) * ((double) cbrt((((double) (f + n)) / ((double) (n - f)))))));
}



Bits error versus f



Bits error versus n
Results
Initial program Error: 0.0 bits
SimplifiedError: 0.0 bits
rmApplied add-cbrt-cubeError: 41.6 bits
Applied add-cbrt-cubeError: 42.3 bits
Applied cbrt-undivError: 42.3 bits
SimplifiedError: 0.0 bits
rmApplied add-cube-cbrtError: 0.1 bits
Applied unpow-prod-downError: 0.1 bits
Applied cbrt-prodError: 0.1 bits
SimplifiedError: 0.0 bits
SimplifiedError: 0.0 bits
Final simplificationError: 0.0 bits
herbie shell --seed 2020203
(FPCore (f n)
:name "subtraction fraction"
:precision binary64
(/ (- (+ f n)) (- f n)))