\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 -8.00336887744975224 \cdot 10^{118}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le -3.72191682831812008 \cdot 10^{-246}:\\
\;\;\;\;\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\
\mathbf{elif}\;b \le 5.54044500863652378 \cdot 10^{145}:\\
\;\;\;\;\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 r61042 = b;
double r61043 = -r61042;
double r61044 = r61042 * r61042;
double r61045 = 4.0;
double r61046 = a;
double r61047 = r61045 * r61046;
double r61048 = c;
double r61049 = r61047 * r61048;
double r61050 = r61044 - r61049;
double r61051 = sqrt(r61050);
double r61052 = r61043 + r61051;
double r61053 = 2.0;
double r61054 = r61053 * r61046;
double r61055 = r61052 / r61054;
return r61055;
}
double f(double a, double b, double c) {
double r61056 = b;
double r61057 = -8.003368877449752e+118;
bool r61058 = r61056 <= r61057;
double r61059 = 1.0;
double r61060 = c;
double r61061 = r61060 / r61056;
double r61062 = a;
double r61063 = r61056 / r61062;
double r61064 = r61061 - r61063;
double r61065 = r61059 * r61064;
double r61066 = -3.72191682831812e-246;
bool r61067 = r61056 <= r61066;
double r61068 = -r61056;
double r61069 = r61056 * r61056;
double r61070 = 4.0;
double r61071 = r61070 * r61062;
double r61072 = r61071 * r61060;
double r61073 = r61069 - r61072;
double r61074 = sqrt(r61073);
double r61075 = r61068 + r61074;
double r61076 = 2.0;
double r61077 = r61076 * r61062;
double r61078 = r61075 / r61077;
double r61079 = 5.540445008636524e+145;
bool r61080 = r61056 <= r61079;
double r61081 = 1.0;
double r61082 = r61076 / r61070;
double r61083 = r61081 / r61082;
double r61084 = r61083 * r61060;
double r61085 = r61068 - r61074;
double r61086 = r61084 / r61085;
double r61087 = -1.0;
double r61088 = r61087 * r61061;
double r61089 = r61080 ? r61086 : r61088;
double r61090 = r61067 ? r61078 : r61089;
double r61091 = r61058 ? r61065 : r61090;
return r61091;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < -8.003368877449752e+118Initial program 52.1
Taylor expanded around -inf 2.9
Simplified2.9
if -8.003368877449752e+118 < b < -3.72191682831812e-246Initial program 7.5
if -3.72191682831812e-246 < b < 5.540445008636524e+145Initial program 32.4
rmApplied flip-+32.5
Simplified15.8
rmApplied clear-num16.0
Simplified14.7
rmApplied times-frac14.7
Simplified9.1
rmApplied associate-/r*8.6
Simplified8.6
if 5.540445008636524e+145 < b Initial program 63.2
Taylor expanded around inf 1.8
Final simplification6.2
herbie shell --seed 2020049 +o rules:numerics
(FPCore (a b c)
:name "Quadratic roots, full range"
:precision binary64
(/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))