\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 -4.30101840923646093 \cdot 10^{98}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le -2.37577225186574925 \cdot 10^{-260}:\\
\;\;\;\;\left(\left(-b\right) + \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}\right) \cdot \frac{1}{2 \cdot a}\\
\mathbf{elif}\;b \le 6.66645678090455348 \cdot 10^{68}:\\
\;\;\;\;\frac{\frac{1}{\frac{2}{4}} \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 r162722 = b;
double r162723 = -r162722;
double r162724 = r162722 * r162722;
double r162725 = 4.0;
double r162726 = a;
double r162727 = c;
double r162728 = r162726 * r162727;
double r162729 = r162725 * r162728;
double r162730 = r162724 - r162729;
double r162731 = sqrt(r162730);
double r162732 = r162723 + r162731;
double r162733 = 2.0;
double r162734 = r162733 * r162726;
double r162735 = r162732 / r162734;
return r162735;
}
double f(double a, double b, double c) {
double r162736 = b;
double r162737 = -4.301018409236461e+98;
bool r162738 = r162736 <= r162737;
double r162739 = 1.0;
double r162740 = c;
double r162741 = r162740 / r162736;
double r162742 = a;
double r162743 = r162736 / r162742;
double r162744 = r162741 - r162743;
double r162745 = r162739 * r162744;
double r162746 = -2.3757722518657493e-260;
bool r162747 = r162736 <= r162746;
double r162748 = -r162736;
double r162749 = r162736 * r162736;
double r162750 = 4.0;
double r162751 = r162742 * r162740;
double r162752 = r162750 * r162751;
double r162753 = r162749 - r162752;
double r162754 = sqrt(r162753);
double r162755 = r162748 + r162754;
double r162756 = 1.0;
double r162757 = 2.0;
double r162758 = r162757 * r162742;
double r162759 = r162756 / r162758;
double r162760 = r162755 * r162759;
double r162761 = 6.6664567809045535e+68;
bool r162762 = r162736 <= r162761;
double r162763 = r162757 / r162750;
double r162764 = r162756 / r162763;
double r162765 = r162764 * r162740;
double r162766 = r162748 - r162754;
double r162767 = r162765 / r162766;
double r162768 = -1.0;
double r162769 = r162768 * r162741;
double r162770 = r162762 ? r162767 : r162769;
double r162771 = r162747 ? r162760 : r162770;
double r162772 = r162738 ? r162745 : r162771;
return r162772;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 34.4 |
|---|---|
| Target | 21.5 |
| Herbie | 6.8 |
if b < -4.301018409236461e+98Initial program 47.2
Taylor expanded around -inf 3.9
Simplified3.9
if -4.301018409236461e+98 < b < -2.3757722518657493e-260Initial program 8.5
rmApplied div-inv8.7
if -2.3757722518657493e-260 < b < 6.6664567809045535e+68Initial program 29.1
rmApplied flip-+29.1
Simplified16.2
rmApplied clear-num16.4
Simplified15.9
rmApplied associate-/r*15.8
Simplified9.6
rmApplied div-inv9.6
Simplified9.5
if 6.6664567809045535e+68 < b Initial program 58.7
Taylor expanded around inf 3.5
Final simplification6.8
herbie shell --seed 2020020 +o rules:numerics
(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)))