\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 -3.060976138917674342180206539993786896862 \cdot 10^{65}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le -5.269237409668851033931621618066544269281 \cdot 10^{-239}:\\
\;\;\;\;\frac{\sqrt{\left(-b\right) + \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}}{2} \cdot \frac{\sqrt{\left(-b\right) + \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}}{a}\\
\mathbf{elif}\;b \le 4.059864939717054460242095466484063430125 \cdot 10^{128}:\\
\;\;\;\;\frac{1}{\frac{2}{\frac{4}{1} \cdot c} \cdot \left(\left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}\right)}\\
\mathbf{else}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r81687 = b;
double r81688 = -r81687;
double r81689 = r81687 * r81687;
double r81690 = 4.0;
double r81691 = a;
double r81692 = c;
double r81693 = r81691 * r81692;
double r81694 = r81690 * r81693;
double r81695 = r81689 - r81694;
double r81696 = sqrt(r81695);
double r81697 = r81688 + r81696;
double r81698 = 2.0;
double r81699 = r81698 * r81691;
double r81700 = r81697 / r81699;
return r81700;
}
double f(double a, double b, double c) {
double r81701 = b;
double r81702 = -3.0609761389176743e+65;
bool r81703 = r81701 <= r81702;
double r81704 = 1.0;
double r81705 = c;
double r81706 = r81705 / r81701;
double r81707 = a;
double r81708 = r81701 / r81707;
double r81709 = r81706 - r81708;
double r81710 = r81704 * r81709;
double r81711 = -5.269237409668851e-239;
bool r81712 = r81701 <= r81711;
double r81713 = -r81701;
double r81714 = r81701 * r81701;
double r81715 = 4.0;
double r81716 = r81707 * r81705;
double r81717 = r81715 * r81716;
double r81718 = r81714 - r81717;
double r81719 = sqrt(r81718);
double r81720 = r81713 + r81719;
double r81721 = sqrt(r81720);
double r81722 = 2.0;
double r81723 = r81721 / r81722;
double r81724 = r81721 / r81707;
double r81725 = r81723 * r81724;
double r81726 = 4.0598649397170545e+128;
bool r81727 = r81701 <= r81726;
double r81728 = 1.0;
double r81729 = r81715 / r81728;
double r81730 = r81729 * r81705;
double r81731 = r81722 / r81730;
double r81732 = r81713 - r81719;
double r81733 = r81731 * r81732;
double r81734 = r81728 / r81733;
double r81735 = -1.0;
double r81736 = r81735 * r81706;
double r81737 = r81727 ? r81734 : r81736;
double r81738 = r81712 ? r81725 : r81737;
double r81739 = r81703 ? r81710 : r81738;
return r81739;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 33.4 |
|---|---|
| Target | 20.5 |
| Herbie | 6.6 |
if b < -3.0609761389176743e+65Initial program 40.1
Taylor expanded around -inf 4.4
Simplified4.4
if -3.0609761389176743e+65 < b < -5.269237409668851e-239Initial program 7.6
rmApplied add-sqr-sqrt7.9
Applied times-frac7.9
if -5.269237409668851e-239 < b < 4.0598649397170545e+128Initial program 31.1
rmApplied flip-+31.2
Simplified15.4
rmApplied *-un-lft-identity15.4
Applied *-un-lft-identity15.4
Applied times-frac15.4
Applied associate-/l*15.6
Simplified14.7
rmApplied associate-/l*14.7
Simplified9.4
if 4.0598649397170545e+128 < b Initial program 61.3
Taylor expanded around inf 2.0
Final simplification6.6
herbie shell --seed 2019356 +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)))