\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.7936624356974993 \cdot 10^{-4}:\\
\;\;\;\;\frac{\frac{\frac{b \cdot b - \mathsf{fma}\left(b, b, \left(4 \cdot a\right) \cdot c\right)}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c} + b}}{2}}{a}\\
\mathbf{else}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r25062 = b;
double r25063 = -r25062;
double r25064 = r25062 * r25062;
double r25065 = 4.0;
double r25066 = a;
double r25067 = r25065 * r25066;
double r25068 = c;
double r25069 = r25067 * r25068;
double r25070 = r25064 - r25069;
double r25071 = sqrt(r25070);
double r25072 = r25063 + r25071;
double r25073 = 2.0;
double r25074 = r25073 * r25066;
double r25075 = r25072 / r25074;
return r25075;
}
double f(double a, double b, double c) {
double r25076 = b;
double r25077 = 0.00017936624356974993;
bool r25078 = r25076 <= r25077;
double r25079 = r25076 * r25076;
double r25080 = 4.0;
double r25081 = a;
double r25082 = r25080 * r25081;
double r25083 = c;
double r25084 = r25082 * r25083;
double r25085 = fma(r25076, r25076, r25084);
double r25086 = r25079 - r25085;
double r25087 = r25079 - r25084;
double r25088 = sqrt(r25087);
double r25089 = r25088 + r25076;
double r25090 = r25086 / r25089;
double r25091 = 2.0;
double r25092 = r25090 / r25091;
double r25093 = r25092 / r25081;
double r25094 = -1.0;
double r25095 = r25083 / r25076;
double r25096 = r25094 * r25095;
double r25097 = r25078 ? r25093 : r25096;
return r25097;
}



Bits error versus a



Bits error versus b



Bits error versus c
if b < 0.00017936624356974993Initial program 18.3
Simplified18.3
rmApplied flip--18.3
Simplified17.5
if 0.00017936624356974993 < b Initial program 45.6
Simplified45.6
Taylor expanded around inf 10.7
Final simplification11.2
herbie shell --seed 2020047 +o rules:numerics
(FPCore (a b c)
:name "Quadratic roots, medium range"
:precision binary64
:pre (and (< 1.11022e-16 a 9.0072e+15) (< 1.11022e-16 b 9.0072e+15) (< 1.11022e-16 c 9.0072e+15))
(/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))