\frac{\left(-b\right) + \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}}{3 \cdot a}\frac{\left(3 \cdot a\right) \cdot c}{\left(\left(-b\right) - \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}\right) \cdot \left(3 \cdot a\right)}double f(double a, double b, double c) {
double r73669 = b;
double r73670 = -r73669;
double r73671 = r73669 * r73669;
double r73672 = 3.0;
double r73673 = a;
double r73674 = r73672 * r73673;
double r73675 = c;
double r73676 = r73674 * r73675;
double r73677 = r73671 - r73676;
double r73678 = sqrt(r73677);
double r73679 = r73670 + r73678;
double r73680 = r73679 / r73674;
return r73680;
}
double f(double a, double b, double c) {
double r73681 = 3.0;
double r73682 = a;
double r73683 = r73681 * r73682;
double r73684 = c;
double r73685 = r73683 * r73684;
double r73686 = b;
double r73687 = -r73686;
double r73688 = r73686 * r73686;
double r73689 = r73688 - r73685;
double r73690 = sqrt(r73689);
double r73691 = r73687 - r73690;
double r73692 = r73691 * r73683;
double r73693 = r73685 / r73692;
return r73693;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 44.1
rmApplied flip-+44.1
Simplified0.5
rmApplied div-inv0.6
Applied associate-/l*0.6
Simplified0.5
rmApplied *-un-lft-identity0.5
Applied associate-*l*0.5
Simplified0.4
Final simplification0.4
herbie shell --seed 2019326 +o rules:numerics
(FPCore (a b c)
:name "Cubic critical, medium range"
:precision binary64
:pre (and (< 1.11022e-16 a 9.0072e+15) (< 1.11022e-16 b 9.0072e+15) (< 1.11022e-16 c 9.0072e+15))
(/ (+ (- b) (sqrt (- (* b b) (* (* 3 a) c)))) (* 3 a)))