\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\begin{array}{l}
\mathbf{if}\;b \leq -4.4035815120185316 \cdot 10^{+145}:\\
\;\;\;\;\frac{-b}{a}\\
\mathbf{elif}\;b \leq 1.3458493856293548 \cdot 10^{-118}:\\
\;\;\;\;\frac{\sqrt{b \cdot b - \left(a \cdot 4\right) \cdot c} - b}{a \cdot 2}\\
\mathbf{elif}\;b \leq 2571.2555714359514:\\
\;\;\;\;\frac{\frac{a \cdot \left(c \cdot -4\right)}{b + \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}}{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 -4.4035815120185316e+145)
(/ (- b) a)
(if (<= b 1.3458493856293548e-118)
(/ (- (sqrt (- (* b b) (* (* a 4.0) c))) b) (* a 2.0))
(if (<= b 2571.2555714359514)
(/
(/ (* a (* c -4.0)) (+ b (sqrt (- (* b b) (* 4.0 (* a c))))))
(* 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 <= -4.4035815120185316e+145) {
tmp = -b / a;
} else if (b <= 1.3458493856293548e-118) {
tmp = (sqrt((b * b) - ((a * 4.0) * c)) - b) / (a * 2.0);
} else if (b <= 2571.2555714359514) {
tmp = ((a * (c * -4.0)) / (b + sqrt((b * b) - (4.0 * (a * c))))) / (a * 2.0);
} else {
tmp = -(c / b);
}
return tmp;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 34.1 |
|---|---|
| Target | 20.9 |
| Herbie | 8.8 |
if b < -4.4035815120185316e145Initial program 60.6
Simplified60.6
Taylor expanded around -inf 2.9
Simplified2.9
if -4.4035815120185316e145 < b < 1.3458493856293548e-118Initial program 11.5
Simplified11.5
if 1.3458493856293548e-118 < b < 2571.2555714359514Initial program 35.3
Simplified35.3
rmApplied add-cube-cbrt_binary64_250036.1
Simplified36.1
rmApplied flip--_binary64_244036.1
Simplified17.1
Simplified16.5
if 2571.2555714359514 < b Initial program 55.9
Simplified55.9
Taylor expanded around inf 5.0
Final simplification8.8
herbie shell --seed 2021032
(FPCore (a b c)
:name "The quadratic formula (r1)"
: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)))