\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.6581383089037873 \cdot 10^{81}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le 2.45811587950602871 \cdot 10^{-136}:\\
\;\;\;\;\left(\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}\right) \cdot \frac{1}{2 \cdot a}\\
\mathbf{elif}\;b \le 4.40565710546396028 \cdot 10^{-70}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\
\mathbf{elif}\;b \le 1.1310446734884525 \cdot 10^{-47}:\\
\;\;\;\;\frac{\frac{\left(4 \cdot a\right) \cdot c}{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{a \cdot 2}\\
\mathbf{elif}\;b \le 1.155213356860159 \cdot 10^{83}:\\
\;\;\;\;\frac{\left(4 \cdot a\right) \cdot c}{\left(a \cdot 2\right) \cdot \left(\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}\right)}\\
\mathbf{else}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r45982 = b;
double r45983 = -r45982;
double r45984 = r45982 * r45982;
double r45985 = 4.0;
double r45986 = a;
double r45987 = r45985 * r45986;
double r45988 = c;
double r45989 = r45987 * r45988;
double r45990 = r45984 - r45989;
double r45991 = sqrt(r45990);
double r45992 = r45983 + r45991;
double r45993 = 2.0;
double r45994 = r45993 * r45986;
double r45995 = r45992 / r45994;
return r45995;
}
double f(double a, double b, double c) {
double r45996 = b;
double r45997 = -1.6581383089037873e+81;
bool r45998 = r45996 <= r45997;
double r45999 = 1.0;
double r46000 = c;
double r46001 = r46000 / r45996;
double r46002 = a;
double r46003 = r45996 / r46002;
double r46004 = r46001 - r46003;
double r46005 = r45999 * r46004;
double r46006 = 2.4581158795060287e-136;
bool r46007 = r45996 <= r46006;
double r46008 = -r45996;
double r46009 = r45996 * r45996;
double r46010 = 4.0;
double r46011 = r46010 * r46002;
double r46012 = r46011 * r46000;
double r46013 = r46009 - r46012;
double r46014 = sqrt(r46013);
double r46015 = r46008 + r46014;
double r46016 = 1.0;
double r46017 = 2.0;
double r46018 = r46017 * r46002;
double r46019 = r46016 / r46018;
double r46020 = r46015 * r46019;
double r46021 = 4.40565710546396e-70;
bool r46022 = r45996 <= r46021;
double r46023 = -1.0;
double r46024 = r46023 * r46001;
double r46025 = 1.1310446734884525e-47;
bool r46026 = r45996 <= r46025;
double r46027 = r46008 - r46014;
double r46028 = r46012 / r46027;
double r46029 = r46002 * r46017;
double r46030 = r46028 / r46029;
double r46031 = 1.155213356860159e+83;
bool r46032 = r45996 <= r46031;
double r46033 = r46029 * r46027;
double r46034 = r46012 / r46033;
double r46035 = r46032 ? r46034 : r46024;
double r46036 = r46026 ? r46030 : r46035;
double r46037 = r46022 ? r46024 : r46036;
double r46038 = r46007 ? r46020 : r46037;
double r46039 = r45998 ? r46005 : r46038;
return r46039;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < -1.6581383089037873e+81Initial program 43.9
Taylor expanded around -inf 3.6
Simplified3.6
if -1.6581383089037873e+81 < b < 2.4581158795060287e-136Initial program 11.7
rmApplied div-inv11.8
if 2.4581158795060287e-136 < b < 4.40565710546396e-70 or 1.155213356860159e+83 < b Initial program 53.8
Taylor expanded around inf 9.1
if 4.40565710546396e-70 < b < 1.1310446734884525e-47Initial program 31.8
rmApplied flip-+31.8
Simplified13.4
if 1.1310446734884525e-47 < b < 1.155213356860159e+83Initial program 45.8
rmApplied flip-+45.8
Simplified14.4
rmApplied div-inv14.5
Applied associate-/l*15.0
Simplified15.0
Final simplification10.0
herbie shell --seed 2019199 +o rules:numerics
(FPCore (a b c)
:name "Quadratic roots, full range"
(/ (+ (- b) (sqrt (- (* b b) (* (* 4.0 a) c)))) (* 2.0 a)))