\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 -3.010589257950129889712053784076648301115 \cdot 10^{115}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le -1.051859552149432150298271086580779209751 \cdot 10^{-283}:\\
\;\;\;\;\frac{1}{\frac{2 \cdot a}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\
\mathbf{elif}\;b \le 1.274921840087524160396938471478240294554 \cdot 10^{104}:\\
\;\;\;\;\frac{\frac{1}{\frac{2}{4}} \cdot c}{\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 r37302 = b;
double r37303 = -r37302;
double r37304 = r37302 * r37302;
double r37305 = 4.0;
double r37306 = a;
double r37307 = r37305 * r37306;
double r37308 = c;
double r37309 = r37307 * r37308;
double r37310 = r37304 - r37309;
double r37311 = sqrt(r37310);
double r37312 = r37303 + r37311;
double r37313 = 2.0;
double r37314 = r37313 * r37306;
double r37315 = r37312 / r37314;
return r37315;
}
double f(double a, double b, double c) {
double r37316 = b;
double r37317 = -3.01058925795013e+115;
bool r37318 = r37316 <= r37317;
double r37319 = 1.0;
double r37320 = c;
double r37321 = r37320 / r37316;
double r37322 = a;
double r37323 = r37316 / r37322;
double r37324 = r37321 - r37323;
double r37325 = r37319 * r37324;
double r37326 = -1.0518595521494322e-283;
bool r37327 = r37316 <= r37326;
double r37328 = 1.0;
double r37329 = 2.0;
double r37330 = r37329 * r37322;
double r37331 = -r37316;
double r37332 = r37316 * r37316;
double r37333 = 4.0;
double r37334 = r37333 * r37322;
double r37335 = r37334 * r37320;
double r37336 = r37332 - r37335;
double r37337 = sqrt(r37336);
double r37338 = r37331 + r37337;
double r37339 = r37330 / r37338;
double r37340 = r37328 / r37339;
double r37341 = 1.2749218400875242e+104;
bool r37342 = r37316 <= r37341;
double r37343 = r37329 / r37333;
double r37344 = r37328 / r37343;
double r37345 = r37344 * r37320;
double r37346 = r37331 - r37337;
double r37347 = r37345 / r37346;
double r37348 = -1.0;
double r37349 = r37348 * r37321;
double r37350 = r37342 ? r37347 : r37349;
double r37351 = r37327 ? r37340 : r37350;
double r37352 = r37318 ? r37325 : r37351;
return r37352;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < -3.01058925795013e+115Initial program 50.4
Taylor expanded around -inf 3.2
Simplified3.2
if -3.01058925795013e+115 < b < -1.0518595521494322e-283Initial program 8.8
rmApplied clear-num9.0
if -1.0518595521494322e-283 < b < 1.2749218400875242e+104Initial program 31.6
rmApplied flip-+31.6
Simplified15.4
rmApplied clear-num15.6
Simplified14.9
rmApplied times-frac14.9
Simplified8.7
rmApplied associate-/r*8.4
Simplified8.3
if 1.2749218400875242e+104 < b Initial program 59.9
Taylor expanded around inf 2.4
Final simplification6.4
herbie shell --seed 2019291
(FPCore (a b c)
:name "Quadratic roots, full range"
:precision binary64
(/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))