\frac{\left(-b\right) + \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}{2 \cdot a}
\begin{array}{l}
\mathbf{if}\;b \leq -3.061643530149749 \cdot 10^{+106}:\\
\;\;\;\;\frac{c}{b} - \frac{b}{a}\\
\mathbf{else}:\\
\;\;\;\;\begin{array}{l}
t_0 := \sqrt{b \cdot b - 4 \cdot \left(c \cdot a\right)}\\
\mathbf{if}\;b \leq -9.859859419540874 \cdot 10^{-169}:\\
\;\;\;\;\frac{t_0}{a \cdot 2} - \frac{b}{a \cdot 2}\\
\mathbf{elif}\;b \leq 1.9972411182687842 \cdot 10^{+77}:\\
\;\;\;\;\frac{1}{\frac{1}{\frac{c \cdot -2}{b + t_0}}}\\
\mathbf{else}:\\
\;\;\;\;-\frac{c}{b}\\
\end{array}\\
\end{array}
(FPCore (a b c) :precision binary64 (/ (+ (- b) (sqrt (- (* b b) (* 4.0 (* a c))))) (* 2.0 a)))
(FPCore (a b c)
:precision binary64
(if (<= b -3.061643530149749e+106)
(- (/ c b) (/ b a))
(let* ((t_0 (sqrt (- (* b b) (* 4.0 (* c a))))))
(if (<= b -9.859859419540874e-169)
(- (/ t_0 (* a 2.0)) (/ b (* a 2.0)))
(if (<= b 1.9972411182687842e+77)
(/ 1.0 (/ 1.0 (/ (* c -2.0) (+ b t_0))))
(- (/ c b)))))))double code(double a, double b, double c) {
return (-b + sqrt((b * b) - (4.0 * (a * c)))) / (2.0 * a);
}
double code(double a, double b, double c) {
double tmp;
if (b <= -3.061643530149749e+106) {
tmp = (c / b) - (b / a);
} else {
double t_0 = sqrt((b * b) - (4.0 * (c * a)));
double tmp_1;
if (b <= -9.859859419540874e-169) {
tmp_1 = (t_0 / (a * 2.0)) - (b / (a * 2.0));
} else if (b <= 1.9972411182687842e+77) {
tmp_1 = 1.0 / (1.0 / ((c * -2.0) / (b + t_0)));
} else {
tmp_1 = -(c / b);
}
tmp = tmp_1;
}
return tmp;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 33.7 |
|---|---|
| Target | 20.6 |
| Herbie | 6.8 |
if b < -3.061643530149749e106Initial program 48.7
Simplified48.7
Taylor expanded around -inf 3.3
if -3.061643530149749e106 < b < -9.85985941954087442e-169Initial program 6.0
Simplified6.0
rmApplied div-sub_binary646.0
if -9.85985941954087442e-169 < b < 1.99724111826878415e77Initial program 27.9
Simplified27.9
rmApplied sub-neg_binary6427.9
Simplified27.9
rmApplied flip--_binary6428.1
Simplified16.9
Simplified16.9
rmApplied clear-num_binary6417.0
Simplified17.0
rmApplied clear-num_binary6417.0
Simplified10.9
if 1.99724111826878415e77 < b Initial program 57.5
Simplified57.5
Taylor expanded around inf 3.4
Simplified3.4
Final simplification6.8
herbie shell --seed 2021198
(FPCore (a b c)
:name "quadp (p42, positive)"
:precision binary64
:herbie-target
(if (< b 0.0) (/ (+ (- b) (sqrt (- (* b b) (* 4.0 (* a c))))) (* 2.0 a)) (/ c (* a (/ (- (- b) (sqrt (- (* b b) (* 4.0 (* a c))))) (* 2.0 a)))))
(/ (+ (- b) (sqrt (- (* b b) (* 4.0 (* a c))))) (* 2.0 a)))