\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\frac{\frac{c \cdot \left(4 \cdot a\right)}{\left(-b\right) - \sqrt{\frac{{b}^{4} - \left(\left(4 \cdot a\right) \cdot c\right) \cdot \left(\left(4 \cdot a\right) \cdot c\right)}{b \cdot b + \left(4 \cdot a\right) \cdot c}}}}{2 \cdot a}double f(double a, double b, double c) {
double r37853 = b;
double r37854 = -r37853;
double r37855 = r37853 * r37853;
double r37856 = 4.0;
double r37857 = a;
double r37858 = r37856 * r37857;
double r37859 = c;
double r37860 = r37858 * r37859;
double r37861 = r37855 - r37860;
double r37862 = sqrt(r37861);
double r37863 = r37854 + r37862;
double r37864 = 2.0;
double r37865 = r37864 * r37857;
double r37866 = r37863 / r37865;
return r37866;
}
double f(double a, double b, double c) {
double r37867 = c;
double r37868 = 4.0;
double r37869 = a;
double r37870 = r37868 * r37869;
double r37871 = r37867 * r37870;
double r37872 = b;
double r37873 = -r37872;
double r37874 = 4.0;
double r37875 = pow(r37872, r37874);
double r37876 = r37870 * r37867;
double r37877 = r37876 * r37876;
double r37878 = r37875 - r37877;
double r37879 = r37872 * r37872;
double r37880 = r37879 + r37876;
double r37881 = r37878 / r37880;
double r37882 = sqrt(r37881);
double r37883 = r37873 - r37882;
double r37884 = r37871 / r37883;
double r37885 = 2.0;
double r37886 = r37885 * r37869;
double r37887 = r37884 / r37886;
return r37887;
}



Bits error versus a



Bits error versus b



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