\frac{\left(-b_2\right) + \sqrt{b_2 \cdot b_2 - a \cdot c}}{a}\begin{array}{l}
\mathbf{if}\;b_2 \leq -6.205007535037304 \cdot 10^{+77}:\\
\;\;\;\;\frac{\left(0.5 \cdot \left(c \cdot \frac{a}{b_2}\right) - b_2\right) - b_2}{a}\\
\mathbf{elif}\;b_2 \leq -1.243685732710164 \cdot 10^{-305}:\\
\;\;\;\;\frac{\sqrt{b_2 \cdot b_2 - c \cdot a} - b_2}{a}\\
\mathbf{elif}\;b_2 \leq 6.9512572766954365 \cdot 10^{+19}:\\
\;\;\;\;\frac{-c}{b_2 + \sqrt{b_2 \cdot b_2 - c \cdot a}}\\
\mathbf{else}:\\
\;\;\;\;\frac{-c}{b_2 \cdot 2 + a \cdot \frac{-0.5}{\frac{b_2}{c}}}\\
\end{array}(FPCore (a b_2 c) :precision binary64 (/ (+ (- b_2) (sqrt (- (* b_2 b_2) (* a c)))) a))
(FPCore (a b_2 c)
:precision binary64
(if (<= b_2 -6.205007535037304e+77)
(/ (- (- (* 0.5 (* c (/ a b_2))) b_2) b_2) a)
(if (<= b_2 -1.243685732710164e-305)
(/ (- (sqrt (- (* b_2 b_2) (* c a))) b_2) a)
(if (<= b_2 6.9512572766954365e+19)
(/ (- c) (+ b_2 (sqrt (- (* b_2 b_2) (* c a)))))
(/ (- c) (+ (* b_2 2.0) (* a (/ -0.5 (/ b_2 c)))))))))double code(double a, double b_2, double c) {
return (((double) (((double) -(b_2)) + ((double) sqrt(((double) (((double) (b_2 * b_2)) - ((double) (a * c)))))))) / a);
}
double code(double a, double b_2, double c) {
double tmp;
if ((b_2 <= -6.205007535037304e+77)) {
tmp = (((double) (((double) (((double) (0.5 * ((double) (c * (a / b_2))))) - b_2)) - b_2)) / a);
} else {
double tmp_1;
if ((b_2 <= -1.243685732710164e-305)) {
tmp_1 = (((double) (((double) sqrt(((double) (((double) (b_2 * b_2)) - ((double) (c * a)))))) - b_2)) / a);
} else {
double tmp_2;
if ((b_2 <= 6.9512572766954365e+19)) {
tmp_2 = (((double) -(c)) / ((double) (b_2 + ((double) sqrt(((double) (((double) (b_2 * b_2)) - ((double) (c * a)))))))));
} else {
tmp_2 = (((double) -(c)) / ((double) (((double) (b_2 * 2.0)) + ((double) (a * (-0.5 / (b_2 / c)))))));
}
tmp_1 = tmp_2;
}
tmp = tmp_1;
}
return tmp;
}



Bits error versus a



Bits error versus b_2



Bits error versus c
Results
if b_2 < -6.205007535037304e77Initial program Error: 41.7 bits
SimplifiedError: 41.7 bits
Taylor expanded around -inf Error: 8.6 bits
SimplifiedError: 3.6 bits
if -6.205007535037304e77 < b_2 < -1.24368573271016397e-305Initial program Error: 9.9 bits
SimplifiedError: 9.9 bits
if -1.24368573271016397e-305 < b_2 < 69512572766954364900Initial program Error: 28.1 bits
SimplifiedError: 28.1 bits
rmApplied flip--Error: 28.1 bits
SimplifiedError: 18.1 bits
SimplifiedError: 18.1 bits
rmApplied distribute-rgt-neg-outError: 18.1 bits
Applied distribute-frac-negError: 18.1 bits
Applied distribute-frac-negError: 18.1 bits
SimplifiedError: 10.1 bits
if 69512572766954364900 < b_2 Initial program Error: 56.5 bits
SimplifiedError: 56.5 bits
rmApplied flip--Error: 56.5 bits
SimplifiedError: 27.3 bits
SimplifiedError: 27.3 bits
rmApplied distribute-rgt-neg-outError: 27.3 bits
Applied distribute-frac-negError: 27.3 bits
Applied distribute-frac-negError: 27.3 bits
SimplifiedError: 23.5 bits
Taylor expanded around inf Error: 7.3 bits
SimplifiedError: 4.5 bits
Final simplificationError: 7.1 bits
herbie shell --seed 2020204
(FPCore (a b_2 c)
:name "quad2p (problem 3.2.1, positive)"
:precision binary64
(/ (+ (- b_2) (sqrt (- (* b_2 b_2) (* a c)))) a))