\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)}{\mathsf{fma}\left(b, b, \left(4 \cdot a\right) \cdot c\right)}}}}{2 \cdot a}double f(double a, double b, double c) {
double r35916 = b;
double r35917 = -r35916;
double r35918 = r35916 * r35916;
double r35919 = 4.0;
double r35920 = a;
double r35921 = r35919 * r35920;
double r35922 = c;
double r35923 = r35921 * r35922;
double r35924 = r35918 - r35923;
double r35925 = sqrt(r35924);
double r35926 = r35917 + r35925;
double r35927 = 2.0;
double r35928 = r35927 * r35920;
double r35929 = r35926 / r35928;
return r35929;
}
double f(double a, double b, double c) {
double r35930 = 0.0;
double r35931 = 4.0;
double r35932 = a;
double r35933 = c;
double r35934 = r35932 * r35933;
double r35935 = r35931 * r35934;
double r35936 = r35930 + r35935;
double r35937 = b;
double r35938 = -r35937;
double r35939 = 4.0;
double r35940 = pow(r35937, r35939);
double r35941 = r35935 * r35935;
double r35942 = r35940 - r35941;
double r35943 = r35931 * r35932;
double r35944 = r35943 * r35933;
double r35945 = fma(r35937, r35937, r35944);
double r35946 = r35942 / r35945;
double r35947 = sqrt(r35946);
double r35948 = r35938 - r35947;
double r35949 = r35936 / r35948;
double r35950 = 2.0;
double r35951 = r35950 * r35932;
double r35952 = r35949 / r35951;
return r35952;
}



Bits error versus a



Bits error versus b



Bits error versus c
Initial program 52.4
rmApplied flip-+52.4
Simplified0.4
rmApplied flip--0.4
Simplified0.4
Simplified0.4
Final simplification0.4
herbie shell --seed 2020062 +o rules:numerics
(FPCore (a b c)
:name "Quadratic roots, wide range"
:precision binary64
:pre (and (< 4.9303800000000003e-32 a 2.02824e+31) (< 4.9303800000000003e-32 b 2.02824e+31) (< 4.9303800000000003e-32 c 2.02824e+31))
(/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))