\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\begin{array}{l}
\mathbf{if}\;b \le -1.98276540088900058 \cdot 10^{134}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le 1.1860189201379418 \cdot 10^{-161}:\\
\;\;\;\;\left(\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}\right) \cdot \frac{1}{2 \cdot a}\\
\mathbf{else}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r83394 = b;
double r83395 = -r83394;
double r83396 = r83394 * r83394;
double r83397 = 4.0;
double r83398 = a;
double r83399 = r83397 * r83398;
double r83400 = c;
double r83401 = r83399 * r83400;
double r83402 = r83396 - r83401;
double r83403 = sqrt(r83402);
double r83404 = r83395 + r83403;
double r83405 = 2.0;
double r83406 = r83405 * r83398;
double r83407 = r83404 / r83406;
return r83407;
}
double f(double a, double b, double c) {
double r83408 = b;
double r83409 = -1.9827654008890006e+134;
bool r83410 = r83408 <= r83409;
double r83411 = 1.0;
double r83412 = c;
double r83413 = r83412 / r83408;
double r83414 = a;
double r83415 = r83408 / r83414;
double r83416 = r83413 - r83415;
double r83417 = r83411 * r83416;
double r83418 = 1.1860189201379418e-161;
bool r83419 = r83408 <= r83418;
double r83420 = -r83408;
double r83421 = r83408 * r83408;
double r83422 = 4.0;
double r83423 = r83422 * r83414;
double r83424 = r83423 * r83412;
double r83425 = r83421 - r83424;
double r83426 = sqrt(r83425);
double r83427 = r83420 + r83426;
double r83428 = 1.0;
double r83429 = 2.0;
double r83430 = r83429 * r83414;
double r83431 = r83428 / r83430;
double r83432 = r83427 * r83431;
double r83433 = -1.0;
double r83434 = r83433 * r83413;
double r83435 = r83419 ? r83432 : r83434;
double r83436 = r83410 ? r83417 : r83435;
return r83436;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 33.7 |
|---|---|
| Target | 21.0 |
| Herbie | 10.9 |
if b < -1.9827654008890006e+134Initial program 56.8
Taylor expanded around -inf 3.1
Simplified3.1
if -1.9827654008890006e+134 < b < 1.1860189201379418e-161Initial program 10.3
rmApplied div-inv10.5
if 1.1860189201379418e-161 < b Initial program 49.7
Taylor expanded around inf 13.7
Final simplification10.9
herbie shell --seed 2020047
(FPCore (a b c)
:name "The quadratic formula (r1)"
:precision binary64
:herbie-target
(if (< b 0.0) (/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ c (* a (/ (- (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))))
(/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))