\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\frac{1}{2} \cdot \frac{\frac{4 \cdot \left(a \cdot c\right)}{a}}{\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}}}double f(double a, double b, double c) {
double r32784 = b;
double r32785 = -r32784;
double r32786 = r32784 * r32784;
double r32787 = 4.0;
double r32788 = a;
double r32789 = r32787 * r32788;
double r32790 = c;
double r32791 = r32789 * r32790;
double r32792 = r32786 - r32791;
double r32793 = sqrt(r32792);
double r32794 = r32785 + r32793;
double r32795 = 2.0;
double r32796 = r32795 * r32788;
double r32797 = r32794 / r32796;
return r32797;
}
double f(double a, double b, double c) {
double r32798 = 1.0;
double r32799 = 2.0;
double r32800 = r32798 / r32799;
double r32801 = 4.0;
double r32802 = a;
double r32803 = c;
double r32804 = r32802 * r32803;
double r32805 = r32801 * r32804;
double r32806 = r32805 / r32802;
double r32807 = b;
double r32808 = -r32807;
double r32809 = 4.0;
double r32810 = pow(r32807, r32809);
double r32811 = r32805 * r32805;
double r32812 = r32810 - r32811;
double r32813 = r32807 * r32807;
double r32814 = r32801 * r32802;
double r32815 = r32814 * r32803;
double r32816 = r32813 + r32815;
double r32817 = r32812 / r32816;
double r32818 = sqrt(r32817);
double r32819 = r32808 - r32818;
double r32820 = r32806 / r32819;
double r32821 = r32800 * r32820;
return r32821;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 44.0
rmApplied flip-+44.0
Simplified0.4
rmApplied *-un-lft-identity0.4
Applied *-un-lft-identity0.4
Applied times-frac0.4
Applied times-frac0.4
Simplified0.4
Simplified0.4
rmApplied associate-/r*0.2
rmApplied flip--0.3
Simplified0.3
Final simplification0.3
herbie shell --seed 2020018
(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)))