\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 -1.3690582298938998 \cdot 10^{+151}:\\
\;\;\;\;-\mathsf{fma}\left(0.25, \frac{c \cdot -4}{b}, \frac{b}{a}\right)\\
\mathbf{elif}\;b \leq 3.964279773171437 \cdot 10^{-50}:\\
\;\;\;\;\frac{\sqrt{b \cdot b - 4 \cdot \left(c \cdot a\right)} - b}{a \cdot 2}\\
\mathbf{else}:\\
\;\;\;\;-\frac{c}{b}\\
\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 -1.3690582298938998e+151)
(- (fma 0.25 (/ (* c -4.0) b) (/ b a)))
(if (<= b 3.964279773171437e-50)
(/ (- (sqrt (- (* b b) (* 4.0 (* c a)))) b) (* a 2.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 <= -1.3690582298938998e+151) {
tmp = -fma(0.25, ((c * -4.0) / b), (b / a));
} else if (b <= 3.964279773171437e-50) {
tmp = (sqrt((b * b) - (4.0 * (c * a))) - b) / (a * 2.0);
} else {
tmp = -(c / b);
}
return tmp;
}




Bits error versus a




Bits error versus b




Bits error versus c
| Original | 34.3 |
|---|---|
| Target | 21.2 |
| Herbie | 10.3 |
if b < -1.3690582298938998e151Initial program 62.4
rmApplied add-exp-log_binary6463.0
Applied add-exp-log_binary6463.0
Applied prod-exp_binary6463.0
Applied add-exp-log_binary6463.0
Applied div-exp_binary6463.0
Applied exp-diff_binary6463.0
Simplified49.1
Simplified34.2
Taylor expanded around -inf 34.3
Simplified2.0
if -1.3690582298938998e151 < b < 3.964279773171437e-50Initial program 14.1
rmApplied +-commutative_binary6414.1
Applied unsub-neg_binary6414.1
if 3.964279773171437e-50 < b Initial program 53.9
Taylor expanded around inf 7.4
Simplified7.4
Final simplification10.3
herbie shell --seed 2021211
(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)))