\frac{\left(-b\right) + \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}}{3 \cdot a}\frac{a}{a} \cdot \frac{c}{\left(-b\right) - \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}}double f(double a, double b, double c) {
double r142661 = b;
double r142662 = -r142661;
double r142663 = r142661 * r142661;
double r142664 = 3.0;
double r142665 = a;
double r142666 = r142664 * r142665;
double r142667 = c;
double r142668 = r142666 * r142667;
double r142669 = r142663 - r142668;
double r142670 = sqrt(r142669);
double r142671 = r142662 + r142670;
double r142672 = r142671 / r142666;
return r142672;
}
double f(double a, double b, double c) {
double r142673 = a;
double r142674 = r142673 / r142673;
double r142675 = c;
double r142676 = b;
double r142677 = -r142676;
double r142678 = r142676 * r142676;
double r142679 = 3.0;
double r142680 = r142679 * r142673;
double r142681 = r142680 * r142675;
double r142682 = r142678 - r142681;
double r142683 = sqrt(r142682);
double r142684 = r142677 - r142683;
double r142685 = r142675 / r142684;
double r142686 = r142674 * r142685;
return r142686;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 28.5
rmApplied flip-+28.5
Simplified0.6
rmApplied frac-2neg0.6
Simplified0.5
rmApplied *-un-lft-identity0.5
Applied distribute-rgt-neg-in0.5
Applied times-frac0.3
Applied associate-/l*0.3
rmApplied neg-mul-10.3
Applied neg-mul-10.3
Applied times-frac0.3
Applied times-frac0.5
Applied *-un-lft-identity0.5
Applied times-frac0.5
Applied times-frac0.3
Simplified0.3
Simplified0.3
Final simplification0.3
herbie shell --seed 2020064
(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)))