\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\frac{1}{2} \cdot \frac{\frac{c \cdot 4}{1}}{\mathsf{fma}\left(\sqrt{b}, -\sqrt{b}, -\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}\right)}double f(double a, double b, double c) {
double r32986 = b;
double r32987 = -r32986;
double r32988 = r32986 * r32986;
double r32989 = 4.0;
double r32990 = a;
double r32991 = r32989 * r32990;
double r32992 = c;
double r32993 = r32991 * r32992;
double r32994 = r32988 - r32993;
double r32995 = sqrt(r32994);
double r32996 = r32987 + r32995;
double r32997 = 2.0;
double r32998 = r32997 * r32990;
double r32999 = r32996 / r32998;
return r32999;
}
double f(double a, double b, double c) {
double r33000 = 1.0;
double r33001 = 2.0;
double r33002 = r33000 / r33001;
double r33003 = c;
double r33004 = 4.0;
double r33005 = r33003 * r33004;
double r33006 = r33005 / r33000;
double r33007 = b;
double r33008 = sqrt(r33007);
double r33009 = -r33008;
double r33010 = r33007 * r33007;
double r33011 = a;
double r33012 = r33004 * r33011;
double r33013 = r33012 * r33003;
double r33014 = r33010 - r33013;
double r33015 = sqrt(r33014);
double r33016 = -r33015;
double r33017 = fma(r33008, r33009, r33016);
double r33018 = r33006 / r33017;
double r33019 = r33002 * r33018;
return r33019;
}



Bits error versus a



Bits error versus b



Bits error versus c
Initial program 28.2
rmApplied flip-+28.2
Simplified0.5
rmApplied *-un-lft-identity0.5
Applied *-un-lft-identity0.5
Applied times-frac0.5
Applied times-frac0.5
Simplified0.5
Simplified0.4
rmApplied associate-/r*0.3
Simplified0.3
rmApplied add-sqr-sqrt0.4
Applied distribute-rgt-neg-in0.4
Applied fma-neg0.3
Final simplification0.3
herbie shell --seed 2020060 +o rules:numerics
(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)))