\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 -1.361733299857302083043096878302889042354 \cdot 10^{105}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le -3.320360656741600748358420677927629618815 \cdot 10^{-289}:\\
\;\;\;\;\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\
\mathbf{elif}\;b \le 6.326287366549382745037046972324082366467 \cdot 10^{74}:\\
\;\;\;\;\frac{\frac{\frac{1}{\frac{2}{4}}}{\frac{1}{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 r222510 = b;
double r222511 = -r222510;
double r222512 = r222510 * r222510;
double r222513 = 4.0;
double r222514 = a;
double r222515 = c;
double r222516 = r222514 * r222515;
double r222517 = r222513 * r222516;
double r222518 = r222512 - r222517;
double r222519 = sqrt(r222518);
double r222520 = r222511 + r222519;
double r222521 = 2.0;
double r222522 = r222521 * r222514;
double r222523 = r222520 / r222522;
return r222523;
}
double f(double a, double b, double c) {
double r222524 = b;
double r222525 = -1.361733299857302e+105;
bool r222526 = r222524 <= r222525;
double r222527 = 1.0;
double r222528 = c;
double r222529 = r222528 / r222524;
double r222530 = a;
double r222531 = r222524 / r222530;
double r222532 = r222529 - r222531;
double r222533 = r222527 * r222532;
double r222534 = -3.3203606567416007e-289;
bool r222535 = r222524 <= r222534;
double r222536 = -r222524;
double r222537 = r222524 * r222524;
double r222538 = 4.0;
double r222539 = r222538 * r222530;
double r222540 = r222539 * r222528;
double r222541 = r222537 - r222540;
double r222542 = sqrt(r222541);
double r222543 = r222536 + r222542;
double r222544 = 2.0;
double r222545 = r222544 * r222530;
double r222546 = r222543 / r222545;
double r222547 = 6.326287366549383e+74;
bool r222548 = r222524 <= r222547;
double r222549 = 1.0;
double r222550 = r222544 / r222538;
double r222551 = r222549 / r222550;
double r222552 = r222549 / r222528;
double r222553 = r222551 / r222552;
double r222554 = r222530 * r222528;
double r222555 = r222538 * r222554;
double r222556 = r222537 - r222555;
double r222557 = sqrt(r222556);
double r222558 = r222536 - r222557;
double r222559 = r222553 / r222558;
double r222560 = -1.0;
double r222561 = r222560 * r222529;
double r222562 = r222548 ? r222559 : r222561;
double r222563 = r222535 ? r222546 : r222562;
double r222564 = r222526 ? r222533 : r222563;
return r222564;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 33.9 |
|---|---|
| Target | 21.1 |
| Herbie | 6.8 |
if b < -1.361733299857302e+105Initial program 48.6
Taylor expanded around -inf 3.6
Simplified3.6
if -1.361733299857302e+105 < b < -3.3203606567416007e-289Initial program 8.5
rmApplied associate-*r*8.5
if -3.3203606567416007e-289 < b < 6.326287366549383e+74Initial program 29.9
rmApplied flip-+29.9
Simplified16.2
rmApplied *-un-lft-identity16.2
Applied *-un-lft-identity16.2
Applied times-frac16.2
Applied associate-/l*16.3
Simplified15.8
rmApplied associate-/r*15.6
Simplified9.4
if 6.326287366549383e+74 < b Initial program 58.0
Taylor expanded around inf 3.7
Final simplification6.8
herbie shell --seed 2019322
(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)))