\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\begin{array}{l}
\mathbf{if}\;b \le -1.7884666465826799 \cdot 10^{121}:\\
\;\;\;\;\frac{2 \cdot \frac{a \cdot c}{b} - 2 \cdot b}{2 \cdot a}\\
\mathbf{elif}\;b \le -6.27850456875614525 \cdot 10^{-182}:\\
\;\;\;\;\frac{\left(-b\right) + \sqrt{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}} \cdot \sqrt{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\
\mathbf{elif}\;b \le 1.32579379880372662 \cdot 10^{154}:\\
\;\;\;\;\frac{\frac{c}{0.5}}{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{\frac{0.5}{c} \cdot \left(2 \cdot \frac{a \cdot c}{b} - 2 \cdot b\right)}\\
\end{array}double f(double a, double b, double c) {
double r51804 = b;
double r51805 = -r51804;
double r51806 = r51804 * r51804;
double r51807 = 4.0;
double r51808 = a;
double r51809 = r51807 * r51808;
double r51810 = c;
double r51811 = r51809 * r51810;
double r51812 = r51806 - r51811;
double r51813 = sqrt(r51812);
double r51814 = r51805 + r51813;
double r51815 = 2.0;
double r51816 = r51815 * r51808;
double r51817 = r51814 / r51816;
return r51817;
}
double f(double a, double b, double c) {
double r51818 = b;
double r51819 = -1.78846664658268e+121;
bool r51820 = r51818 <= r51819;
double r51821 = 2.0;
double r51822 = a;
double r51823 = c;
double r51824 = r51822 * r51823;
double r51825 = r51824 / r51818;
double r51826 = r51821 * r51825;
double r51827 = 2.0;
double r51828 = r51827 * r51818;
double r51829 = r51826 - r51828;
double r51830 = r51821 * r51822;
double r51831 = r51829 / r51830;
double r51832 = -6.278504568756145e-182;
bool r51833 = r51818 <= r51832;
double r51834 = -r51818;
double r51835 = r51818 * r51818;
double r51836 = 4.0;
double r51837 = r51836 * r51822;
double r51838 = r51837 * r51823;
double r51839 = r51835 - r51838;
double r51840 = sqrt(r51839);
double r51841 = sqrt(r51840);
double r51842 = r51841 * r51841;
double r51843 = r51834 + r51842;
double r51844 = r51843 / r51830;
double r51845 = 1.3257937988037266e+154;
bool r51846 = r51818 <= r51845;
double r51847 = 0.5;
double r51848 = r51823 / r51847;
double r51849 = r51834 - r51840;
double r51850 = r51848 / r51849;
double r51851 = 1.0;
double r51852 = r51847 / r51823;
double r51853 = r51852 * r51829;
double r51854 = r51851 / r51853;
double r51855 = r51846 ? r51850 : r51854;
double r51856 = r51833 ? r51844 : r51855;
double r51857 = r51820 ? r51831 : r51856;
return r51857;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < -1.78846664658268e+121Initial program 52.3
Taylor expanded around -inf 10.1
if -1.78846664658268e+121 < b < -6.278504568756145e-182Initial program 7.0
rmApplied add-sqr-sqrt7.0
Applied sqrt-prod7.2
if -6.278504568756145e-182 < b < 1.3257937988037266e+154Initial program 31.2
rmApplied flip-+31.3
Simplified15.4
rmApplied clear-num15.6
Simplified14.5
Taylor expanded around 0 9.6
rmApplied associate-/r*9.2
Simplified9.1
if 1.3257937988037266e+154 < b Initial program 64.0
rmApplied flip-+64.0
Simplified37.6
rmApplied clear-num37.6
Simplified37.6
Taylor expanded around 0 37.5
Taylor expanded around inf 8.1
Final simplification8.6
herbie shell --seed 2020021
(FPCore (a b c)
:name "Quadratic roots, full range"
:precision binary64
(/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))