\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\frac{\frac{0 + 4 \cdot \left(a \cdot c\right)}{\left(-b\right) - \sqrt{\sqrt[3]{{\left(\frac{{b}^{4} - \left(4 \cdot \left(a \cdot c\right)\right) \cdot \left(4 \cdot \left(a \cdot c\right)\right)}{b \cdot b + \left(4 \cdot a\right) \cdot c}\right)}^{3}}}}}{2 \cdot a}double f(double a, double b, double c) {
double r35086 = b;
double r35087 = -r35086;
double r35088 = r35086 * r35086;
double r35089 = 4.0;
double r35090 = a;
double r35091 = r35089 * r35090;
double r35092 = c;
double r35093 = r35091 * r35092;
double r35094 = r35088 - r35093;
double r35095 = sqrt(r35094);
double r35096 = r35087 + r35095;
double r35097 = 2.0;
double r35098 = r35097 * r35090;
double r35099 = r35096 / r35098;
return r35099;
}
double f(double a, double b, double c) {
double r35100 = 0.0;
double r35101 = 4.0;
double r35102 = a;
double r35103 = c;
double r35104 = r35102 * r35103;
double r35105 = r35101 * r35104;
double r35106 = r35100 + r35105;
double r35107 = b;
double r35108 = -r35107;
double r35109 = 4.0;
double r35110 = pow(r35107, r35109);
double r35111 = r35105 * r35105;
double r35112 = r35110 - r35111;
double r35113 = r35107 * r35107;
double r35114 = r35101 * r35102;
double r35115 = r35114 * r35103;
double r35116 = r35113 + r35115;
double r35117 = r35112 / r35116;
double r35118 = 3.0;
double r35119 = pow(r35117, r35118);
double r35120 = cbrt(r35119);
double r35121 = sqrt(r35120);
double r35122 = r35108 - r35121;
double r35123 = r35106 / r35122;
double r35124 = 2.0;
double r35125 = r35124 * r35102;
double r35126 = r35123 / r35125;
return r35126;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 28.5
rmApplied flip-+28.6
Simplified0.4
rmApplied flip--0.5
Simplified0.5
rmApplied add-cbrt-cube0.5
Applied add-cbrt-cube0.5
Applied cbrt-undiv0.5
Simplified0.5
Final simplification0.5
herbie shell --seed 2020021
(FPCore (a b c)
:name "Quadratic roots, 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) (* (* 4 a) c)))) (* 2 a)))