\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 -7.031540569065605192102577441461744221788 \cdot 10^{154}:\\
\;\;\;\;\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}{-2 \cdot b}\\
\end{array}\\
\mathbf{elif}\;b \le 2000198799923726.5:\\
\;\;\;\;\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}{\mathsf{fma}\left(\sqrt{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}, \sqrt{\left|\sqrt[3]{b \cdot b - \left(4 \cdot a\right) \cdot c}\right| \cdot \sqrt{\sqrt[3]{b \cdot b - \left(4 \cdot a\right) \cdot c}}}, -b\right)}\\
\end{array}\\
\mathbf{elif}\;b \ge 0.0:\\
\;\;\;\;\frac{\left(-b\right) - \left(b - 2 \cdot \frac{a \cdot c}{b}\right)}{2 \cdot a}\\
\mathbf{else}:\\
\;\;\;\;\frac{2 \cdot c}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c} - b}\\
\end{array}double f(double a, double b, double c) {
double r34093 = b;
double r34094 = 0.0;
bool r34095 = r34093 >= r34094;
double r34096 = -r34093;
double r34097 = r34093 * r34093;
double r34098 = 4.0;
double r34099 = a;
double r34100 = r34098 * r34099;
double r34101 = c;
double r34102 = r34100 * r34101;
double r34103 = r34097 - r34102;
double r34104 = sqrt(r34103);
double r34105 = r34096 - r34104;
double r34106 = 2.0;
double r34107 = r34106 * r34099;
double r34108 = r34105 / r34107;
double r34109 = r34106 * r34101;
double r34110 = r34096 + r34104;
double r34111 = r34109 / r34110;
double r34112 = r34095 ? r34108 : r34111;
return r34112;
}
double f(double a, double b, double c) {
double r34113 = b;
double r34114 = -7.031540569065605e+154;
bool r34115 = r34113 <= r34114;
double r34116 = 0.0;
bool r34117 = r34113 >= r34116;
double r34118 = -r34113;
double r34119 = r34113 * r34113;
double r34120 = 4.0;
double r34121 = a;
double r34122 = r34120 * r34121;
double r34123 = c;
double r34124 = r34122 * r34123;
double r34125 = r34119 - r34124;
double r34126 = sqrt(r34125);
double r34127 = r34118 - r34126;
double r34128 = 2.0;
double r34129 = r34128 * r34121;
double r34130 = r34127 / r34129;
double r34131 = r34128 * r34123;
double r34132 = -2.0;
double r34133 = r34132 * r34113;
double r34134 = r34131 / r34133;
double r34135 = r34117 ? r34130 : r34134;
double r34136 = 2000198799923726.5;
bool r34137 = r34113 <= r34136;
double r34138 = sqrt(r34126);
double r34139 = cbrt(r34125);
double r34140 = fabs(r34139);
double r34141 = sqrt(r34139);
double r34142 = r34140 * r34141;
double r34143 = sqrt(r34142);
double r34144 = fma(r34138, r34143, r34118);
double r34145 = r34131 / r34144;
double r34146 = r34117 ? r34130 : r34145;
double r34147 = r34121 * r34123;
double r34148 = r34147 / r34113;
double r34149 = r34128 * r34148;
double r34150 = r34113 - r34149;
double r34151 = r34118 - r34150;
double r34152 = r34151 / r34129;
double r34153 = r34126 - r34113;
double r34154 = r34131 / r34153;
double r34155 = r34117 ? r34152 : r34154;
double r34156 = r34137 ? r34146 : r34155;
double r34157 = r34115 ? r34135 : r34156;
return r34157;
}



Bits error versus a



Bits error versus b



Bits error versus c
if b < -7.031540569065605e+154Initial program 37.9
Simplified37.9
rmApplied add-sqr-sqrt37.9
Applied sqrt-prod37.9
Applied fma-neg37.9
Taylor expanded around -inf 1.4
Simplified1.4
if -7.031540569065605e+154 < b < 2000198799923726.5Initial program 9.0
Simplified9.0
rmApplied add-sqr-sqrt9.0
Applied sqrt-prod9.2
Applied fma-neg9.1
rmApplied add-cube-cbrt9.2
Applied sqrt-prod9.2
Simplified9.2
if 2000198799923726.5 < b Initial program 34.0
Simplified34.0
Taylor expanded around inf 11.6
Final simplification8.4
herbie shell --seed 2019208 +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)))))))