\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\frac{\frac{4 \cdot \left(a \cdot c\right)}{a \cdot 2}}{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}double f(double a, double b, double c) {
double r38205 = b;
double r38206 = -r38205;
double r38207 = r38205 * r38205;
double r38208 = 4.0;
double r38209 = a;
double r38210 = r38208 * r38209;
double r38211 = c;
double r38212 = r38210 * r38211;
double r38213 = r38207 - r38212;
double r38214 = sqrt(r38213);
double r38215 = r38206 + r38214;
double r38216 = 2.0;
double r38217 = r38216 * r38209;
double r38218 = r38215 / r38217;
return r38218;
}
double f(double a, double b, double c) {
double r38219 = 4.0;
double r38220 = a;
double r38221 = c;
double r38222 = r38220 * r38221;
double r38223 = r38219 * r38222;
double r38224 = 2.0;
double r38225 = r38220 * r38224;
double r38226 = r38223 / r38225;
double r38227 = b;
double r38228 = -r38227;
double r38229 = r38227 * r38227;
double r38230 = r38219 * r38220;
double r38231 = r38230 * r38221;
double r38232 = r38229 - r38231;
double r38233 = sqrt(r38232);
double r38234 = r38228 - r38233;
double r38235 = r38226 / r38234;
return r38235;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 28.3
rmApplied flip-+28.3
Simplified0.4
rmApplied div-inv0.5
Applied associate-/l*0.5
Simplified0.4
rmApplied associate-/r*0.3
Simplified0.3
Final simplification0.3
herbie shell --seed 2019323
(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)))