\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\frac{0 + 4 \cdot \left(a \cdot c\right)}{a} \cdot \frac{\frac{1}{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2}double f(double a, double b, double c) {
double r33157 = b;
double r33158 = -r33157;
double r33159 = r33157 * r33157;
double r33160 = 4.0;
double r33161 = a;
double r33162 = r33160 * r33161;
double r33163 = c;
double r33164 = r33162 * r33163;
double r33165 = r33159 - r33164;
double r33166 = sqrt(r33165);
double r33167 = r33158 + r33166;
double r33168 = 2.0;
double r33169 = r33168 * r33161;
double r33170 = r33167 / r33169;
return r33170;
}
double f(double a, double b, double c) {
double r33171 = 0.0;
double r33172 = 4.0;
double r33173 = a;
double r33174 = c;
double r33175 = r33173 * r33174;
double r33176 = r33172 * r33175;
double r33177 = r33171 + r33176;
double r33178 = r33177 / r33173;
double r33179 = 1.0;
double r33180 = b;
double r33181 = -r33180;
double r33182 = r33180 * r33180;
double r33183 = r33172 * r33173;
double r33184 = r33183 * r33174;
double r33185 = r33182 - r33184;
double r33186 = sqrt(r33185);
double r33187 = r33181 - r33186;
double r33188 = r33179 / r33187;
double r33189 = 2.0;
double r33190 = r33188 / r33189;
double r33191 = r33178 * r33190;
return r33191;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 28.8
rmApplied flip-+28.8
Simplified0.5
rmApplied flip-+0.5
Applied associate-/l/0.6
rmApplied *-un-lft-identity0.6
Applied times-frac0.5
Applied times-frac0.5
Simplified0.4
Final simplification0.4
herbie shell --seed 2019354
(FPCore (a b c)
:name "Quadratic roots, narrow range"
:precision binary64
: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)))