\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 -1.329384622164809 \cdot 10^{+154}:\\
\;\;\;\;\frac{\sqrt{0.5} - b}{a \cdot 2}\\
\mathbf{elif}\;b \leq -2.0268161128108735 \cdot 10^{-255}:\\
\;\;\;\;\frac{1}{a} \cdot \frac{\sqrt{b \cdot b - \left(a \cdot 4\right) \cdot c} - b}{2}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{c}{\frac{b + \sqrt{b \cdot b - \left(a \cdot 4\right) \cdot c}}{-4}}}{2}\\
\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.329384622164809e+154)
(/ (- (sqrt 0.5) b) (* a 2.0))
(if (<= b -2.0268161128108735e-255)
(* (/ 1.0 a) (/ (- (sqrt (- (* b b) (* (* a 4.0) c))) b) 2.0))
(/ (/ c (/ (+ b (sqrt (- (* b b) (* (* a 4.0) c)))) -4.0)) 2.0))))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.329384622164809e+154) {
tmp = (sqrt(0.5) - b) / (a * 2.0);
} else if (b <= -2.0268161128108735e-255) {
tmp = (1.0 / a) * ((sqrt((b * b) - ((a * 4.0) * c)) - b) / 2.0);
} else {
tmp = (c / ((b + sqrt((b * b) - ((a * 4.0) * c))) / -4.0)) / 2.0;
}
return tmp;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 34.3 |
|---|---|
| Target | 21.2 |
| Herbie | 18.6 |
if b < -1.329384622164809e154Initial program 64.0
Simplified64.0
Taylor expanded around 0 52.2
Simplified52.2
if -1.329384622164809e154 < b < -2.026816112810873e-255Initial program 8.2
Simplified8.2
rmApplied *-un-lft-identity_binary648.2
Applied times-frac_binary648.4
if -2.026816112810873e-255 < b Initial program 42.2
Simplified42.2
rmApplied *-un-lft-identity_binary6442.2
Applied times-frac_binary6442.2
rmApplied flip--_binary6442.2
Simplified22.3
Simplified22.3
rmApplied associate-*r/_binary6422.3
Simplified17.2
Final simplification18.6
herbie shell --seed 2020268
(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)))