\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 14.47301515261621:\\
\;\;\;\;\frac{\left(b \cdot b - 4 \cdot \left(c \cdot a\right)\right) \cdot \sqrt{b \cdot b - 4 \cdot \left(c \cdot a\right)} - \left(b \cdot b\right) \cdot b}{\left(2 \cdot a\right) \cdot \left(\left(b \cdot b + b \cdot \sqrt{b \cdot b - 4 \cdot \left(c \cdot a\right)}\right) + \sqrt{b \cdot b - 4 \cdot \left(c \cdot a\right)} \cdot \sqrt{b \cdot b - 4 \cdot \left(c \cdot a\right)}\right)}\\
\mathbf{elif}\;b \le 104.16184656521519:\\
\;\;\;\;-\frac{c}{b}\\
\mathbf{elif}\;b \le 5435.554752918428:\\
\;\;\;\;\frac{\left(b \cdot b - 4 \cdot \left(c \cdot a\right)\right) \cdot \sqrt{b \cdot b - 4 \cdot \left(c \cdot a\right)} - \left(b \cdot b\right) \cdot b}{\left(2 \cdot a\right) \cdot \left(\left(b \cdot b + b \cdot \sqrt{b \cdot b - 4 \cdot \left(c \cdot a\right)}\right) + \sqrt{b \cdot b - 4 \cdot \left(c \cdot a\right)} \cdot \sqrt{b \cdot b - 4 \cdot \left(c \cdot a\right)}\right)}\\
\mathbf{else}:\\
\;\;\;\;-\frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r7887005 = b;
double r7887006 = -r7887005;
double r7887007 = r7887005 * r7887005;
double r7887008 = 4.0;
double r7887009 = a;
double r7887010 = r7887008 * r7887009;
double r7887011 = c;
double r7887012 = r7887010 * r7887011;
double r7887013 = r7887007 - r7887012;
double r7887014 = sqrt(r7887013);
double r7887015 = r7887006 + r7887014;
double r7887016 = 2.0;
double r7887017 = r7887016 * r7887009;
double r7887018 = r7887015 / r7887017;
return r7887018;
}
double f(double a, double b, double c) {
double r7887019 = b;
double r7887020 = 14.47301515261621;
bool r7887021 = r7887019 <= r7887020;
double r7887022 = r7887019 * r7887019;
double r7887023 = 4.0;
double r7887024 = c;
double r7887025 = a;
double r7887026 = r7887024 * r7887025;
double r7887027 = r7887023 * r7887026;
double r7887028 = r7887022 - r7887027;
double r7887029 = sqrt(r7887028);
double r7887030 = r7887028 * r7887029;
double r7887031 = r7887022 * r7887019;
double r7887032 = r7887030 - r7887031;
double r7887033 = 2.0;
double r7887034 = r7887033 * r7887025;
double r7887035 = r7887019 * r7887029;
double r7887036 = r7887022 + r7887035;
double r7887037 = r7887029 * r7887029;
double r7887038 = r7887036 + r7887037;
double r7887039 = r7887034 * r7887038;
double r7887040 = r7887032 / r7887039;
double r7887041 = 104.16184656521519;
bool r7887042 = r7887019 <= r7887041;
double r7887043 = r7887024 / r7887019;
double r7887044 = -r7887043;
double r7887045 = 5435.554752918428;
bool r7887046 = r7887019 <= r7887045;
double r7887047 = r7887046 ? r7887040 : r7887044;
double r7887048 = r7887042 ? r7887044 : r7887047;
double r7887049 = r7887021 ? r7887040 : r7887048;
return r7887049;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < 14.47301515261621 or 104.16184656521519 < b < 5435.554752918428Initial program 18.0
Simplified18.0
rmApplied flip3--18.1
Applied associate-/l/18.1
Simplified17.4
if 14.47301515261621 < b < 104.16184656521519 or 5435.554752918428 < b Initial program 35.4
Simplified35.4
Taylor expanded around inf 16.9
Simplified16.9
Final simplification17.1
herbie shell --seed 2019120
(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)))