\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\frac{\frac{0 + 4 \cdot \left(a \cdot c\right)}{\left(-b\right) - \sqrt{\frac{{b}^{4} - \left(4 \cdot \left(a \cdot c\right)\right) \cdot \left(4 \cdot \left(a \cdot c\right)\right)}{b \cdot b + \left(4 \cdot a\right) \cdot c}}}}{2 \cdot a}double f(double a, double b, double c) {
double r38031 = b;
double r38032 = -r38031;
double r38033 = r38031 * r38031;
double r38034 = 4.0;
double r38035 = a;
double r38036 = r38034 * r38035;
double r38037 = c;
double r38038 = r38036 * r38037;
double r38039 = r38033 - r38038;
double r38040 = sqrt(r38039);
double r38041 = r38032 + r38040;
double r38042 = 2.0;
double r38043 = r38042 * r38035;
double r38044 = r38041 / r38043;
return r38044;
}
double f(double a, double b, double c) {
double r38045 = 0.0;
double r38046 = 4.0;
double r38047 = a;
double r38048 = c;
double r38049 = r38047 * r38048;
double r38050 = r38046 * r38049;
double r38051 = r38045 + r38050;
double r38052 = b;
double r38053 = -r38052;
double r38054 = 4.0;
double r38055 = pow(r38052, r38054);
double r38056 = r38050 * r38050;
double r38057 = r38055 - r38056;
double r38058 = r38052 * r38052;
double r38059 = r38046 * r38047;
double r38060 = r38059 * r38048;
double r38061 = r38058 + r38060;
double r38062 = r38057 / r38061;
double r38063 = sqrt(r38062);
double r38064 = r38053 - r38063;
double r38065 = r38051 / r38064;
double r38066 = 2.0;
double r38067 = r38066 * r38047;
double r38068 = r38065 / r38067;
return r38068;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 43.5
rmApplied flip-+43.6
Simplified0.4
rmApplied flip--0.4
Simplified0.4
Final simplification0.4
herbie shell --seed 2020059
(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)))