\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\begin{array}{l}
\mathbf{if}\;b \le -4.12310353364421125 \cdot 10^{95}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le 3.446447862996811 \cdot 10^{-75}:\\
\;\;\;\;\left(\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}\right) \cdot \frac{1}{2 \cdot a}\\
\mathbf{else}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r41216 = b;
double r41217 = -r41216;
double r41218 = r41216 * r41216;
double r41219 = 4.0;
double r41220 = a;
double r41221 = r41219 * r41220;
double r41222 = c;
double r41223 = r41221 * r41222;
double r41224 = r41218 - r41223;
double r41225 = sqrt(r41224);
double r41226 = r41217 + r41225;
double r41227 = 2.0;
double r41228 = r41227 * r41220;
double r41229 = r41226 / r41228;
return r41229;
}
double f(double a, double b, double c) {
double r41230 = b;
double r41231 = -4.123103533644211e+95;
bool r41232 = r41230 <= r41231;
double r41233 = 1.0;
double r41234 = c;
double r41235 = r41234 / r41230;
double r41236 = a;
double r41237 = r41230 / r41236;
double r41238 = r41235 - r41237;
double r41239 = r41233 * r41238;
double r41240 = 3.446447862996811e-75;
bool r41241 = r41230 <= r41240;
double r41242 = -r41230;
double r41243 = r41230 * r41230;
double r41244 = 4.0;
double r41245 = r41244 * r41236;
double r41246 = r41245 * r41234;
double r41247 = r41243 - r41246;
double r41248 = sqrt(r41247);
double r41249 = r41242 + r41248;
double r41250 = 1.0;
double r41251 = 2.0;
double r41252 = r41251 * r41236;
double r41253 = r41250 / r41252;
double r41254 = r41249 * r41253;
double r41255 = -1.0;
double r41256 = r41255 * r41235;
double r41257 = r41241 ? r41254 : r41256;
double r41258 = r41232 ? r41239 : r41257;
return r41258;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < -4.123103533644211e+95Initial program 47.3
Taylor expanded around -inf 3.8
Simplified3.8
if -4.123103533644211e+95 < b < 3.446447862996811e-75Initial program 13.3
rmApplied div-inv13.4
rmApplied *-un-lft-identity13.4
if 3.446447862996811e-75 < b Initial program 52.5
Taylor expanded around inf 9.7
Final simplification10.4
herbie shell --seed 2020042
(FPCore (a b c)
:name "Quadratic roots, full range"
:precision binary64
(/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))