\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\frac{1}{2} \cdot \frac{\frac{4 \cdot \left(a \cdot c\right)}{a}}{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}double f(double a, double b, double c) {
double r33240 = b;
double r33241 = -r33240;
double r33242 = r33240 * r33240;
double r33243 = 4.0;
double r33244 = a;
double r33245 = r33243 * r33244;
double r33246 = c;
double r33247 = r33245 * r33246;
double r33248 = r33242 - r33247;
double r33249 = sqrt(r33248);
double r33250 = r33241 + r33249;
double r33251 = 2.0;
double r33252 = r33251 * r33244;
double r33253 = r33250 / r33252;
return r33253;
}
double f(double a, double b, double c) {
double r33254 = 1.0;
double r33255 = 2.0;
double r33256 = r33254 / r33255;
double r33257 = 4.0;
double r33258 = a;
double r33259 = c;
double r33260 = r33258 * r33259;
double r33261 = r33257 * r33260;
double r33262 = r33261 / r33258;
double r33263 = b;
double r33264 = -r33263;
double r33265 = r33263 * r33263;
double r33266 = r33257 * r33258;
double r33267 = r33266 * r33259;
double r33268 = r33265 - r33267;
double r33269 = sqrt(r33268);
double r33270 = r33264 - r33269;
double r33271 = r33262 / r33270;
double r33272 = r33256 * r33271;
return r33272;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 43.4
rmApplied flip-+43.4
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
Final simplification0.2
herbie shell --seed 2020025
(FPCore (a b c)
:name "Quadratic roots, 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) (* (* 4 a) c)))) (* 2 a)))