\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 -1.547666603636537260513437138645901028344 \cdot 10^{50}:\\
\;\;\;\;\left(\frac{c}{b} - \frac{b}{a}\right) \cdot 1\\
\mathbf{elif}\;b \le 7.455592343308264166675918758902222662503 \cdot 10^{-170}:\\
\;\;\;\;\frac{1}{\frac{2 \cdot a}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\
\mathbf{else}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r36305 = b;
double r36306 = -r36305;
double r36307 = r36305 * r36305;
double r36308 = 4.0;
double r36309 = a;
double r36310 = r36308 * r36309;
double r36311 = c;
double r36312 = r36310 * r36311;
double r36313 = r36307 - r36312;
double r36314 = sqrt(r36313);
double r36315 = r36306 + r36314;
double r36316 = 2.0;
double r36317 = r36316 * r36309;
double r36318 = r36315 / r36317;
return r36318;
}
double f(double a, double b, double c) {
double r36319 = b;
double r36320 = -1.5476666036365373e+50;
bool r36321 = r36319 <= r36320;
double r36322 = c;
double r36323 = r36322 / r36319;
double r36324 = a;
double r36325 = r36319 / r36324;
double r36326 = r36323 - r36325;
double r36327 = 1.0;
double r36328 = r36326 * r36327;
double r36329 = 7.455592343308264e-170;
bool r36330 = r36319 <= r36329;
double r36331 = 1.0;
double r36332 = 2.0;
double r36333 = r36332 * r36324;
double r36334 = -r36319;
double r36335 = r36319 * r36319;
double r36336 = 4.0;
double r36337 = r36336 * r36324;
double r36338 = r36337 * r36322;
double r36339 = r36335 - r36338;
double r36340 = sqrt(r36339);
double r36341 = r36334 + r36340;
double r36342 = r36333 / r36341;
double r36343 = r36331 / r36342;
double r36344 = -1.0;
double r36345 = r36344 * r36323;
double r36346 = r36330 ? r36343 : r36345;
double r36347 = r36321 ? r36328 : r36346;
return r36347;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < -1.5476666036365373e+50Initial program 37.8
Taylor expanded around -inf 5.8
Simplified5.8
if -1.5476666036365373e+50 < b < 7.455592343308264e-170Initial program 12.4
rmApplied clear-num12.5
if 7.455592343308264e-170 < b Initial program 48.9
Taylor expanded around inf 14.1
Final simplification11.9
herbie shell --seed 2019323
(FPCore (a b c)
:name "Quadratic roots, full range"
:precision binary64
(/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))