\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 -2.3044033969831823 \cdot 10^{153}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le 8.9305277508569929 \cdot 10^{-82}:\\
\;\;\;\;\frac{b - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{-2 \cdot a}\\
\mathbf{elif}\;b \le 4.01993084419163312 \cdot 10^{109}:\\
\;\;\;\;\frac{\frac{1}{\sqrt[3]{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}} \cdot \sqrt[3]{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}}{\frac{2 \cdot a}{4 \cdot \left(a \cdot c\right)} \cdot \sqrt[3]{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\
\mathbf{else}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r124634 = b;
double r124635 = -r124634;
double r124636 = r124634 * r124634;
double r124637 = 4.0;
double r124638 = a;
double r124639 = r124637 * r124638;
double r124640 = c;
double r124641 = r124639 * r124640;
double r124642 = r124636 - r124641;
double r124643 = sqrt(r124642);
double r124644 = r124635 + r124643;
double r124645 = 2.0;
double r124646 = r124645 * r124638;
double r124647 = r124644 / r124646;
return r124647;
}
double f(double a, double b, double c) {
double r124648 = b;
double r124649 = -2.3044033969831823e+153;
bool r124650 = r124648 <= r124649;
double r124651 = 1.0;
double r124652 = c;
double r124653 = r124652 / r124648;
double r124654 = a;
double r124655 = r124648 / r124654;
double r124656 = r124653 - r124655;
double r124657 = r124651 * r124656;
double r124658 = 8.930527750856993e-82;
bool r124659 = r124648 <= r124658;
double r124660 = r124648 * r124648;
double r124661 = 4.0;
double r124662 = r124661 * r124654;
double r124663 = r124662 * r124652;
double r124664 = r124660 - r124663;
double r124665 = sqrt(r124664);
double r124666 = r124648 - r124665;
double r124667 = 2.0;
double r124668 = r124667 * r124654;
double r124669 = -r124668;
double r124670 = r124666 / r124669;
double r124671 = 4.019930844191633e+109;
bool r124672 = r124648 <= r124671;
double r124673 = 1.0;
double r124674 = -r124648;
double r124675 = r124674 - r124665;
double r124676 = cbrt(r124675);
double r124677 = r124676 * r124676;
double r124678 = r124673 / r124677;
double r124679 = r124654 * r124652;
double r124680 = r124661 * r124679;
double r124681 = r124668 / r124680;
double r124682 = r124681 * r124676;
double r124683 = r124678 / r124682;
double r124684 = -1.0;
double r124685 = r124684 * r124653;
double r124686 = r124672 ? r124683 : r124685;
double r124687 = r124659 ? r124670 : r124686;
double r124688 = r124650 ? r124657 : r124687;
return r124688;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 34.1 |
|---|---|
| Target | 20.7 |
| Herbie | 9.3 |
if b < -2.3044033969831823e+153Initial program 63.5
Taylor expanded around -inf 2.0
Simplified2.0
if -2.3044033969831823e+153 < b < 8.930527750856993e-82Initial program 12.5
rmApplied frac-2neg12.5
Simplified12.5
if 8.930527750856993e-82 < b < 4.019930844191633e+109Initial program 43.0
rmApplied flip-+43.0
Simplified14.9
rmApplied add-cube-cbrt15.6
Applied *-un-lft-identity15.6
Applied times-frac15.6
Applied associate-/l*14.3
Simplified13.8
if 4.019930844191633e+109 < b Initial program 59.9
Taylor expanded around inf 2.4
Final simplification9.3
herbie shell --seed 2020060 +o rules:numerics
(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)))