\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 91.36334998724752:\\
\;\;\;\;\frac{\frac{\left(\left(c \cdot a\right) \cdot -4 + b \cdot b\right) \cdot \sqrt{\left(c \cdot a\right) \cdot -4 + b \cdot b} - b \cdot \left(b \cdot b\right)}{b \cdot \sqrt{\left(c \cdot a\right) \cdot -4 + b \cdot b} + \left(b \cdot b + \left(\left(c \cdot a\right) \cdot -4 + b \cdot b\right)\right)}}{a \cdot 2}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{\frac{b}{c} \cdot \left(-\frac{a}{a}\right)}\\
\end{array}double f(double a, double b, double c) {
double r459201 = b;
double r459202 = -r459201;
double r459203 = r459201 * r459201;
double r459204 = 4.0;
double r459205 = a;
double r459206 = r459204 * r459205;
double r459207 = c;
double r459208 = r459206 * r459207;
double r459209 = r459203 - r459208;
double r459210 = sqrt(r459209);
double r459211 = r459202 + r459210;
double r459212 = 2.0;
double r459213 = r459212 * r459205;
double r459214 = r459211 / r459213;
return r459214;
}
double f(double a, double b, double c) {
double r459215 = b;
double r459216 = 91.36334998724752;
bool r459217 = r459215 <= r459216;
double r459218 = c;
double r459219 = a;
double r459220 = r459218 * r459219;
double r459221 = -4.0;
double r459222 = r459220 * r459221;
double r459223 = r459215 * r459215;
double r459224 = r459222 + r459223;
double r459225 = sqrt(r459224);
double r459226 = r459224 * r459225;
double r459227 = r459215 * r459223;
double r459228 = r459226 - r459227;
double r459229 = r459215 * r459225;
double r459230 = r459223 + r459224;
double r459231 = r459229 + r459230;
double r459232 = r459228 / r459231;
double r459233 = 2.0;
double r459234 = r459219 * r459233;
double r459235 = r459232 / r459234;
double r459236 = 1.0;
double r459237 = r459215 / r459218;
double r459238 = r459219 / r459219;
double r459239 = -r459238;
double r459240 = r459237 * r459239;
double r459241 = r459236 / r459240;
double r459242 = r459217 ? r459235 : r459241;
return r459242;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < 91.36334998724752Initial program 15.2
Simplified15.2
rmApplied flip3--15.3
Simplified14.6
Simplified14.6
if 91.36334998724752 < b Initial program 34.2
Simplified34.2
Taylor expanded around inf 17.9
rmApplied clear-num17.9
Simplified17.9
Final simplification16.9
herbie shell --seed 2019128
(FPCore (a b c)
:name "Quadratic roots, narrow range"
:pre (and (< 1.0536712127723509e-08 a 94906265.62425156) (< 1.0536712127723509e-08 b 94906265.62425156) (< 1.0536712127723509e-08 c 94906265.62425156))
(/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))