\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\frac{\frac{\left(a \cdot 4\right) \cdot c}{a}}{-\mathsf{fma}\left(\sqrt{b}, \sqrt{b}, \sqrt{\mathsf{fma}\left(-c, a \cdot 4, b \cdot b\right)}\right)} \cdot \frac{1}{2}double f(double a, double b, double c) {
double r41146 = b;
double r41147 = -r41146;
double r41148 = r41146 * r41146;
double r41149 = 4.0;
double r41150 = a;
double r41151 = r41149 * r41150;
double r41152 = c;
double r41153 = r41151 * r41152;
double r41154 = r41148 - r41153;
double r41155 = sqrt(r41154);
double r41156 = r41147 + r41155;
double r41157 = 2.0;
double r41158 = r41157 * r41150;
double r41159 = r41156 / r41158;
return r41159;
}
double f(double a, double b, double c) {
double r41160 = a;
double r41161 = 4.0;
double r41162 = r41160 * r41161;
double r41163 = c;
double r41164 = r41162 * r41163;
double r41165 = r41164 / r41160;
double r41166 = b;
double r41167 = sqrt(r41166);
double r41168 = -r41163;
double r41169 = r41166 * r41166;
double r41170 = fma(r41168, r41162, r41169);
double r41171 = sqrt(r41170);
double r41172 = fma(r41167, r41167, r41171);
double r41173 = -r41172;
double r41174 = r41165 / r41173;
double r41175 = 1.0;
double r41176 = 2.0;
double r41177 = r41175 / r41176;
double r41178 = r41174 * r41177;
return r41178;
}



Bits error versus a



Bits error versus b



Bits error versus c
Initial program 28.2
rmApplied flip-+28.2
Simplified0.5
Simplified0.5
rmApplied *-un-lft-identity0.5
Applied *-un-lft-identity0.5
Applied times-frac0.5
Applied times-frac0.5
Simplified0.5
Simplified0.3
rmApplied add-sqr-sqrt0.5
Applied fma-def0.4
Final simplification0.4
herbie shell --seed 2019194 +o rules:numerics
(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.0 a) c)))) (* 2.0 a)))