\frac{\left(-b\right) + \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\begin{array}{l}
\mathbf{if}\;b \le -2.6487898413435469 \cdot 10^{-64}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le -2.9346814112434403 \cdot 10^{-92}:\\
\;\;\;\;\frac{\frac{4}{\frac{\left({b}^{2} - {b}^{2}\right) + 4 \cdot \left(a \cdot c\right)}{a \cdot c}} \cdot \left(\left(-b\right) + \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}\right)}{2 \cdot a}\\
\mathbf{elif}\;b \le -1.64658629213931532 \cdot 10^{-101}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le 9.8640672375908808 \cdot 10^{145}:\\
\;\;\;\;\frac{\frac{1}{0.5} \cdot c}{\left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}\\
\mathbf{else}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r91453 = b;
double r91454 = -r91453;
double r91455 = r91453 * r91453;
double r91456 = 4.0;
double r91457 = a;
double r91458 = c;
double r91459 = r91457 * r91458;
double r91460 = r91456 * r91459;
double r91461 = r91455 - r91460;
double r91462 = sqrt(r91461);
double r91463 = r91454 + r91462;
double r91464 = 2.0;
double r91465 = r91464 * r91457;
double r91466 = r91463 / r91465;
return r91466;
}
double f(double a, double b, double c) {
double r91467 = b;
double r91468 = -2.648789841343547e-64;
bool r91469 = r91467 <= r91468;
double r91470 = 1.0;
double r91471 = c;
double r91472 = r91471 / r91467;
double r91473 = a;
double r91474 = r91467 / r91473;
double r91475 = r91472 - r91474;
double r91476 = r91470 * r91475;
double r91477 = -2.9346814112434403e-92;
bool r91478 = r91467 <= r91477;
double r91479 = 4.0;
double r91480 = 2.0;
double r91481 = pow(r91467, r91480);
double r91482 = r91481 - r91481;
double r91483 = r91473 * r91471;
double r91484 = r91479 * r91483;
double r91485 = r91482 + r91484;
double r91486 = r91485 / r91483;
double r91487 = r91479 / r91486;
double r91488 = -r91467;
double r91489 = r91467 * r91467;
double r91490 = r91489 - r91484;
double r91491 = sqrt(r91490);
double r91492 = r91488 + r91491;
double r91493 = r91487 * r91492;
double r91494 = 2.0;
double r91495 = r91494 * r91473;
double r91496 = r91493 / r91495;
double r91497 = -1.6465862921393153e-101;
bool r91498 = r91467 <= r91497;
double r91499 = 9.864067237590881e+145;
bool r91500 = r91467 <= r91499;
double r91501 = 1.0;
double r91502 = 0.5;
double r91503 = r91501 / r91502;
double r91504 = r91503 * r91471;
double r91505 = r91488 - r91491;
double r91506 = r91504 / r91505;
double r91507 = -1.0;
double r91508 = r91507 * r91472;
double r91509 = r91500 ? r91506 : r91508;
double r91510 = r91498 ? r91476 : r91509;
double r91511 = r91478 ? r91496 : r91510;
double r91512 = r91469 ? r91476 : r91511;
return r91512;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 34.3 |
|---|---|
| Target | 21.1 |
| Herbie | 9.1 |
if b < -2.648789841343547e-64 or -2.9346814112434403e-92 < b < -1.6465862921393153e-101Initial program 26.9
Taylor expanded around -inf 10.5
Simplified10.5
if -2.648789841343547e-64 < b < -2.9346814112434403e-92Initial program 4.6
rmApplied flip-+31.8
Simplified32.0
rmApplied flip--32.0
Applied associate-/r/32.0
Simplified16.8
if -1.6465862921393153e-101 < b < 9.864067237590881e+145Initial program 29.0
rmApplied flip-+30.4
Simplified16.7
rmApplied *-un-lft-identity16.7
Applied *-un-lft-identity16.7
Applied times-frac16.7
Applied associate-/l*16.9
Simplified15.9
Taylor expanded around 0 11.2
rmApplied associate-/r*10.8
Simplified10.8
if 9.864067237590881e+145 < b Initial program 63.2
Taylor expanded around inf 1.8
Final simplification9.1
herbie shell --seed 2020049
(FPCore (a b c)
:name "quadp (p42, positive)"
: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)))