\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.1144981103869975 \cdot 10^{+131}:\\
\;\;\;\;\frac{c}{b} - \frac{b}{a}\\
\mathbf{elif}\;b \le 4.5810084990875205 \cdot 10^{-68}:\\
\;\;\;\;\frac{\sqrt[3]{\frac{\frac{1}{2}}{\sqrt{2}}}}{\frac{a}{\frac{\sqrt{b \cdot b - c \cdot \left(4 \cdot a\right)} - b}{\sqrt{2}}}}\\
\mathbf{else}:\\
\;\;\;\;-\frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r3424100 = b;
double r3424101 = -r3424100;
double r3424102 = r3424100 * r3424100;
double r3424103 = 4.0;
double r3424104 = a;
double r3424105 = c;
double r3424106 = r3424104 * r3424105;
double r3424107 = r3424103 * r3424106;
double r3424108 = r3424102 - r3424107;
double r3424109 = sqrt(r3424108);
double r3424110 = r3424101 + r3424109;
double r3424111 = 2.0;
double r3424112 = r3424111 * r3424104;
double r3424113 = r3424110 / r3424112;
return r3424113;
}
double f(double a, double b, double c) {
double r3424114 = b;
double r3424115 = -2.1144981103869975e+131;
bool r3424116 = r3424114 <= r3424115;
double r3424117 = c;
double r3424118 = r3424117 / r3424114;
double r3424119 = a;
double r3424120 = r3424114 / r3424119;
double r3424121 = r3424118 - r3424120;
double r3424122 = 4.5810084990875205e-68;
bool r3424123 = r3424114 <= r3424122;
double r3424124 = 0.5;
double r3424125 = 2.0;
double r3424126 = sqrt(r3424125);
double r3424127 = r3424124 / r3424126;
double r3424128 = cbrt(r3424127);
double r3424129 = r3424114 * r3424114;
double r3424130 = 4.0;
double r3424131 = r3424130 * r3424119;
double r3424132 = r3424117 * r3424131;
double r3424133 = r3424129 - r3424132;
double r3424134 = sqrt(r3424133);
double r3424135 = r3424134 - r3424114;
double r3424136 = r3424135 / r3424126;
double r3424137 = r3424119 / r3424136;
double r3424138 = r3424128 / r3424137;
double r3424139 = -r3424118;
double r3424140 = r3424123 ? r3424138 : r3424139;
double r3424141 = r3424116 ? r3424121 : r3424140;
return r3424141;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 33.6 |
|---|---|
| Target | 21.0 |
| Herbie | 10.5 |
if b < -2.1144981103869975e+131Initial program 53.8
Simplified53.8
Taylor expanded around -inf 2.6
if -2.1144981103869975e+131 < b < 4.5810084990875205e-68Initial program 13.3
Simplified13.3
rmApplied add-sqr-sqrt14.1
Applied *-un-lft-identity14.1
Applied times-frac14.0
Applied associate-/l*13.9
rmApplied add-cbrt-cube14.4
Applied add-cbrt-cube14.4
Applied cbrt-undiv13.9
Simplified13.5
if 4.5810084990875205e-68 < b Initial program 51.9
Simplified52.0
Taylor expanded around inf 9.3
Simplified9.3
Final simplification10.5
herbie shell --seed 2019163
(FPCore (a b c)
:name "quadp (p42, positive)"
:herbie-target
(if (< b 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)))