\frac{\left(-b\right) + \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}}{3 \cdot a}\frac{\frac{\left(3 \cdot a\right) \cdot c}{\left(-b\right) - \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}}}{3 \cdot a}double f(double a, double b, double c) {
double r75597 = b;
double r75598 = -r75597;
double r75599 = r75597 * r75597;
double r75600 = 3.0;
double r75601 = a;
double r75602 = r75600 * r75601;
double r75603 = c;
double r75604 = r75602 * r75603;
double r75605 = r75599 - r75604;
double r75606 = sqrt(r75605);
double r75607 = r75598 + r75606;
double r75608 = r75607 / r75602;
return r75608;
}
double f(double a, double b, double c) {
double r75609 = 3.0;
double r75610 = a;
double r75611 = r75609 * r75610;
double r75612 = c;
double r75613 = r75611 * r75612;
double r75614 = b;
double r75615 = -r75614;
double r75616 = r75614 * r75614;
double r75617 = r75616 - r75613;
double r75618 = sqrt(r75617);
double r75619 = r75615 - r75618;
double r75620 = r75613 / r75619;
double r75621 = r75620 / r75611;
return r75621;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 28.4
rmApplied flip-+28.4
Simplified0.6
rmApplied associate-*r*0.5
Final simplification0.5
herbie shell --seed 2019323
(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)))