\frac{\left(-b\right) + \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}}{3 \cdot a}\frac{\left({b}^{2} - {b}^{2}\right) + \left(3 \cdot a\right) \cdot c}{\left(3 \cdot a\right) \cdot \left(\left(-b\right) - \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}\right)}double f(double a, double b, double c) {
double r103807 = b;
double r103808 = -r103807;
double r103809 = r103807 * r103807;
double r103810 = 3.0;
double r103811 = a;
double r103812 = r103810 * r103811;
double r103813 = c;
double r103814 = r103812 * r103813;
double r103815 = r103809 - r103814;
double r103816 = sqrt(r103815);
double r103817 = r103808 + r103816;
double r103818 = r103817 / r103812;
return r103818;
}
double f(double a, double b, double c) {
double r103819 = b;
double r103820 = 2.0;
double r103821 = pow(r103819, r103820);
double r103822 = r103821 - r103821;
double r103823 = 3.0;
double r103824 = a;
double r103825 = r103823 * r103824;
double r103826 = c;
double r103827 = r103825 * r103826;
double r103828 = r103822 + r103827;
double r103829 = -r103819;
double r103830 = r103819 * r103819;
double r103831 = r103830 - r103827;
double r103832 = sqrt(r103831);
double r103833 = r103829 - r103832;
double r103834 = r103825 * r103833;
double r103835 = r103828 / r103834;
return r103835;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 28.8
rmApplied flip-+28.8
Simplified0.6
rmApplied associate-*r*0.5
rmApplied div-inv0.5
Applied associate-/l*0.5
Simplified0.5
Final simplification0.5
herbie shell --seed 2020100
(FPCore (a b c)
:name "Cubic critical, narrow range"
:precision binary64
:pre (and (< 1.0536712127723509e-08 a 94906265.62425156) (< 1.0536712127723509e-08 b 94906265.62425156) (< 1.0536712127723509e-08 c 94906265.62425156))
(/ (+ (- b) (sqrt (- (* b b) (* (* 3 a) c)))) (* 3 a)))