\begin{array}{l}
\mathbf{if}\;b \ge 0.0:\\
\;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\
\mathbf{else}:\\
\;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\
\end{array}\begin{array}{l}
\mathbf{if}\;b \le -3.688468976067862917923558349816908192872 \cdot 10^{161}:\\
\;\;\;\;\begin{array}{l}
\mathbf{if}\;b \ge 0.0:\\
\;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\
\mathbf{else}:\\
\;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left(2 \cdot \frac{a \cdot c}{b} - b\right)}\\
\end{array}\\
\mathbf{elif}\;b \le 1.822077811116170988501030000586664884528 \cdot 10^{78}:\\
\;\;\;\;\begin{array}{l}
\mathbf{if}\;b \ge 0.0:\\
\;\;\;\;\frac{\left(-b\right) - \sqrt{\sqrt{\mathsf{fma}\left(b, b, -\left(4 \cdot a\right) \cdot c\right)}} \cdot \sqrt{\sqrt{\mathsf{fma}\left(b, b, -\left(4 \cdot a\right) \cdot c\right)}}}{2 \cdot a}\\
\mathbf{else}:\\
\;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\
\end{array}\\
\mathbf{elif}\;b \ge 0.0:\\
\;\;\;\;\frac{\mathsf{fma}\left(\frac{a \cdot c}{b}, 2, b \cdot -2\right)}{2 \cdot a}\\
\mathbf{else}:\\
\;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\
\end{array}double f(double a, double b, double c) {
double r39773 = b;
double r39774 = 0.0;
bool r39775 = r39773 >= r39774;
double r39776 = -r39773;
double r39777 = r39773 * r39773;
double r39778 = 4.0;
double r39779 = a;
double r39780 = r39778 * r39779;
double r39781 = c;
double r39782 = r39780 * r39781;
double r39783 = r39777 - r39782;
double r39784 = sqrt(r39783);
double r39785 = r39776 - r39784;
double r39786 = 2.0;
double r39787 = r39786 * r39779;
double r39788 = r39785 / r39787;
double r39789 = r39786 * r39781;
double r39790 = r39776 + r39784;
double r39791 = r39789 / r39790;
double r39792 = r39775 ? r39788 : r39791;
return r39792;
}
double f(double a, double b, double c) {
double r39793 = b;
double r39794 = -3.688468976067863e+161;
bool r39795 = r39793 <= r39794;
double r39796 = 0.0;
bool r39797 = r39793 >= r39796;
double r39798 = -r39793;
double r39799 = r39793 * r39793;
double r39800 = 4.0;
double r39801 = a;
double r39802 = r39800 * r39801;
double r39803 = c;
double r39804 = r39802 * r39803;
double r39805 = r39799 - r39804;
double r39806 = sqrt(r39805);
double r39807 = r39798 - r39806;
double r39808 = 2.0;
double r39809 = r39808 * r39801;
double r39810 = r39807 / r39809;
double r39811 = r39808 * r39803;
double r39812 = r39801 * r39803;
double r39813 = r39812 / r39793;
double r39814 = r39808 * r39813;
double r39815 = r39814 - r39793;
double r39816 = r39798 + r39815;
double r39817 = r39811 / r39816;
double r39818 = r39797 ? r39810 : r39817;
double r39819 = 1.822077811116171e+78;
bool r39820 = r39793 <= r39819;
double r39821 = -r39804;
double r39822 = fma(r39793, r39793, r39821);
double r39823 = sqrt(r39822);
double r39824 = sqrt(r39823);
double r39825 = r39824 * r39824;
double r39826 = r39798 - r39825;
double r39827 = r39826 / r39809;
double r39828 = r39798 + r39806;
double r39829 = r39811 / r39828;
double r39830 = r39797 ? r39827 : r39829;
double r39831 = -2.0;
double r39832 = r39793 * r39831;
double r39833 = fma(r39813, r39808, r39832);
double r39834 = r39833 / r39809;
double r39835 = r39797 ? r39834 : r39829;
double r39836 = r39820 ? r39830 : r39835;
double r39837 = r39795 ? r39818 : r39836;
return r39837;
}



Bits error versus a



Bits error versus b



Bits error versus c
if b < -3.688468976067863e+161Initial program 39.1
Taylor expanded around -inf 7.5
if -3.688468976067863e+161 < b < 1.822077811116171e+78Initial program 8.9
rmApplied add-sqr-sqrt8.9
Applied sqrt-prod9.0
Simplified9.0
Simplified9.0
if 1.822077811116171e+78 < b Initial program 43.0
rmApplied add-sqr-sqrt43.0
Applied sqrt-prod43.0
Simplified43.0
Simplified43.0
Taylor expanded around inf 11.2
Simplified11.2
Final simplification9.1
herbie shell --seed 2019303 +o rules:numerics
(FPCore (a b c)
:name "jeff quadratic root 1"
:precision binary64
(if (>= b 0.0) (/ (- (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))))))