\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 r37654 = b;
double r37655 = -r37654;
double r37656 = r37654 * r37654;
double r37657 = 4.0;
double r37658 = a;
double r37659 = r37657 * r37658;
double r37660 = c;
double r37661 = r37659 * r37660;
double r37662 = r37656 - r37661;
double r37663 = sqrt(r37662);
double r37664 = r37655 + r37663;
double r37665 = 2.0;
double r37666 = r37665 * r37658;
double r37667 = r37664 / r37666;
return r37667;
}
double f(double a, double b, double c) {
double r37668 = 1.0;
double r37669 = 2.0;
double r37670 = r37668 / r37669;
double r37671 = c;
double r37672 = 4.0;
double r37673 = r37671 * r37672;
double r37674 = r37673 / r37668;
double r37675 = b;
double r37676 = sqrt(r37675);
double r37677 = -r37676;
double r37678 = r37675 * r37675;
double r37679 = a;
double r37680 = r37672 * r37679;
double r37681 = r37680 * r37671;
double r37682 = r37678 - r37681;
double r37683 = sqrt(r37682);
double r37684 = -r37683;
double r37685 = fma(r37676, r37677, r37684);
double r37686 = r37674 / r37685;
double r37687 = r37670 * r37686;
return r37687;
}



Bits error versus a



Bits error versus b



Bits error versus c
Initial program 52.8
rmApplied flip-+52.8
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
Simplified0.1
rmApplied add-sqr-sqrt0.3
Applied distribute-rgt-neg-in0.3
Applied fma-neg0.1
Final simplification0.1
herbie shell --seed 2020057 +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)))