\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 -4.730052107843551 \cdot 10^{+118}:\\
\;\;\;\;\frac{c}{b} - \frac{b}{a}\\
\mathbf{elif}\;b \leq 3.526112956294902 \cdot 10^{-140} \lor \neg \left(b \leq 3.800189758670082 \cdot 10^{-51}\right) \land b \leq 6.768351271797052 \cdot 10^{-13}:\\
\;\;\;\;\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 -4.730052107843551e+118)
(- (/ c b) (/ b a))
(if (or (<= b 3.526112956294902e-140)
(and (not (<= b 3.800189758670082e-51))
(<= b 6.768351271797052e-13)))
(/ (- (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 <= -4.730052107843551e+118) {
tmp = (c / b) - (b / a);
} else if ((b <= 3.526112956294902e-140) || (!(b <= 3.800189758670082e-51) && (b <= 6.768351271797052e-13))) {
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
Results
| Original | 34.2 |
|---|---|
| Target | 20.9 |
| Herbie | 11.4 |
if b < -4.730052107843551e118Initial program 52.0
Simplified52.0
Taylor expanded around -inf 3.1
if -4.730052107843551e118 < b < 3.52611295629490181e-140 or 3.800189758670082e-51 < b < 6.76835127179705212e-13Initial program 13.6
Simplified13.6
if 3.52611295629490181e-140 < b < 3.800189758670082e-51 or 6.76835127179705212e-13 < b Initial program 51.2
Simplified51.2
Taylor expanded around inf 11.6
Simplified11.6
Final simplification11.4
herbie shell --seed 2021126
(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)))