\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\frac{\frac{4 \cdot c}{1}}{\left(\left(-b\right) - \sqrt{\frac{{\left(b \cdot b\right)}^{3} - {\left(\left(4 \cdot a\right) \cdot c\right)}^{3}}{\left(\left(4 \cdot a\right) \cdot c\right) \cdot \left(\left(4 \cdot a\right) \cdot c + {b}^{2}\right) + \left(b \cdot b\right) \cdot \left(b \cdot b\right)}}\right) \cdot 2}double f(double a, double b, double c) {
double r41178 = b;
double r41179 = -r41178;
double r41180 = r41178 * r41178;
double r41181 = 4.0;
double r41182 = a;
double r41183 = r41181 * r41182;
double r41184 = c;
double r41185 = r41183 * r41184;
double r41186 = r41180 - r41185;
double r41187 = sqrt(r41186);
double r41188 = r41179 + r41187;
double r41189 = 2.0;
double r41190 = r41189 * r41182;
double r41191 = r41188 / r41190;
return r41191;
}
double f(double a, double b, double c) {
double r41192 = 4.0;
double r41193 = c;
double r41194 = r41192 * r41193;
double r41195 = 1.0;
double r41196 = r41194 / r41195;
double r41197 = b;
double r41198 = -r41197;
double r41199 = r41197 * r41197;
double r41200 = 3.0;
double r41201 = pow(r41199, r41200);
double r41202 = a;
double r41203 = r41192 * r41202;
double r41204 = r41203 * r41193;
double r41205 = pow(r41204, r41200);
double r41206 = r41201 - r41205;
double r41207 = 2.0;
double r41208 = pow(r41197, r41207);
double r41209 = r41204 + r41208;
double r41210 = r41204 * r41209;
double r41211 = r41199 * r41199;
double r41212 = r41210 + r41211;
double r41213 = r41206 / r41212;
double r41214 = sqrt(r41213);
double r41215 = r41198 - r41214;
double r41216 = 2.0;
double r41217 = r41215 * r41216;
double r41218 = r41196 / r41217;
return r41218;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 43.9
rmApplied flip-+43.9
Simplified0.4
rmApplied *-un-lft-identity0.4
Applied *-un-lft-identity0.4
Applied times-frac0.4
Applied times-frac0.4
Simplified0.4
Simplified0.4
rmApplied associate-/r*0.2
rmApplied flip3--0.3
Simplified0.3
Final simplification0.2
herbie shell --seed 2019294
(FPCore (a b c)
:name "Quadratic roots, medium range"
:precision binary64
:pre (and (< 1.11022e-16 a 9.0072e15) (< 1.11022e-16 b 9.0072e15) (< 1.11022e-16 c 9.0072e15))
(/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))