\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\frac{\frac{1}{\frac{-1}{a}}}{\frac{\left(a \cdot 2\right) \cdot \frac{\sqrt{b \cdot b - \left(a \cdot 4\right) \cdot c} + b}{4}}{c}}double f(double a, double b, double c) {
double r51928 = b;
double r51929 = -r51928;
double r51930 = r51928 * r51928;
double r51931 = 4.0;
double r51932 = a;
double r51933 = r51931 * r51932;
double r51934 = c;
double r51935 = r51933 * r51934;
double r51936 = r51930 - r51935;
double r51937 = sqrt(r51936);
double r51938 = r51929 + r51937;
double r51939 = 2.0;
double r51940 = r51939 * r51932;
double r51941 = r51938 / r51940;
return r51941;
}
double f(double a, double b, double c) {
double r51942 = 1.0;
double r51943 = -1.0;
double r51944 = a;
double r51945 = r51943 / r51944;
double r51946 = r51942 / r51945;
double r51947 = 2.0;
double r51948 = r51944 * r51947;
double r51949 = b;
double r51950 = r51949 * r51949;
double r51951 = 4.0;
double r51952 = r51944 * r51951;
double r51953 = c;
double r51954 = r51952 * r51953;
double r51955 = r51950 - r51954;
double r51956 = sqrt(r51955);
double r51957 = r51956 + r51949;
double r51958 = r51957 / r51951;
double r51959 = r51948 * r51958;
double r51960 = r51959 / r51953;
double r51961 = r51946 / r51960;
return r51961;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 28.1
rmApplied flip-+28.1
Simplified0.5
Simplified0.5
rmApplied clear-num0.5
Simplified0.5
rmApplied *-un-lft-identity0.5
Applied neg-mul-10.5
Applied times-frac0.6
Applied times-frac0.6
Applied add-cube-cbrt0.6
Applied times-frac0.5
Simplified0.5
Simplified0.5
rmApplied associate-/l*0.5
Simplified0.5
Final simplification0.5
herbie shell --seed 2019179
(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)))