\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\frac{\left(a \cdot c\right) \cdot 4}{\left(-\left(\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c} \cdot a + b \cdot a\right)\right) \cdot 2}double f(double a, double b, double c) {
double r37630 = b;
double r37631 = -r37630;
double r37632 = r37630 * r37630;
double r37633 = 4.0;
double r37634 = a;
double r37635 = r37633 * r37634;
double r37636 = c;
double r37637 = r37635 * r37636;
double r37638 = r37632 - r37637;
double r37639 = sqrt(r37638);
double r37640 = r37631 + r37639;
double r37641 = 2.0;
double r37642 = r37641 * r37634;
double r37643 = r37640 / r37642;
return r37643;
}
double f(double a, double b, double c) {
double r37644 = a;
double r37645 = c;
double r37646 = r37644 * r37645;
double r37647 = 4.0;
double r37648 = r37646 * r37647;
double r37649 = b;
double r37650 = r37649 * r37649;
double r37651 = r37647 * r37644;
double r37652 = r37651 * r37645;
double r37653 = r37650 - r37652;
double r37654 = sqrt(r37653);
double r37655 = r37654 * r37644;
double r37656 = r37649 * r37644;
double r37657 = r37655 + r37656;
double r37658 = -r37657;
double r37659 = 2.0;
double r37660 = r37658 * r37659;
double r37661 = r37648 / r37660;
return r37661;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
Initial program 28.4
rmApplied flip-+28.4
Simplified0.5
rmApplied div-inv0.5
Applied associate-/l*0.5
Simplified0.5
rmApplied sub-neg0.5
Applied distribute-lft-in0.4
Simplified0.4
Simplified0.4
Final simplification0.4
herbie shell --seed 2019326 +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)))