\begin{array}{l}
\mathbf{if}\;b \ge 0.0:\\
\;\;\;\;\frac{2 \cdot c}{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\
\mathbf{else}:\\
\;\;\;\;\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\
\end{array}\begin{array}{l}
\mathbf{if}\;b \le -2.70313261124652268 \cdot 10^{141} \lor \neg \left(b \le 2.0280952669618129 \cdot 10^{109}\right):\\
\;\;\;\;\begin{array}{l}
\mathbf{if}\;b \ge 0.0:\\
\;\;\;\;\frac{2 \cdot c}{\left(-b\right) - \left(b - 2 \cdot \left(\frac{a}{\sqrt[3]{b} \cdot \sqrt[3]{b}} \cdot \frac{c}{\sqrt[3]{b}}\right)\right)}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{-2 \cdot b}{2}}{a}\\
\end{array}\\
\mathbf{elif}\;b \ge 0.0:\\
\;\;\;\;\frac{2 \cdot c}{\left(-b\right) - \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}}}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c} - b}{2}}{a}\\
\end{array}double f(double a, double b, double c) {
double r29144 = b;
double r29145 = 0.0;
bool r29146 = r29144 >= r29145;
double r29147 = 2.0;
double r29148 = c;
double r29149 = r29147 * r29148;
double r29150 = -r29144;
double r29151 = r29144 * r29144;
double r29152 = 4.0;
double r29153 = a;
double r29154 = r29152 * r29153;
double r29155 = r29154 * r29148;
double r29156 = r29151 - r29155;
double r29157 = sqrt(r29156);
double r29158 = r29150 - r29157;
double r29159 = r29149 / r29158;
double r29160 = r29150 + r29157;
double r29161 = r29147 * r29153;
double r29162 = r29160 / r29161;
double r29163 = r29146 ? r29159 : r29162;
return r29163;
}
double f(double a, double b, double c) {
double r29164 = b;
double r29165 = -2.7031326112465227e+141;
bool r29166 = r29164 <= r29165;
double r29167 = 2.028095266961813e+109;
bool r29168 = r29164 <= r29167;
double r29169 = !r29168;
bool r29170 = r29166 || r29169;
double r29171 = 0.0;
bool r29172 = r29164 >= r29171;
double r29173 = 2.0;
double r29174 = c;
double r29175 = r29173 * r29174;
double r29176 = -r29164;
double r29177 = a;
double r29178 = cbrt(r29164);
double r29179 = r29178 * r29178;
double r29180 = r29177 / r29179;
double r29181 = r29174 / r29178;
double r29182 = r29180 * r29181;
double r29183 = r29173 * r29182;
double r29184 = r29164 - r29183;
double r29185 = r29176 - r29184;
double r29186 = r29175 / r29185;
double r29187 = -2.0;
double r29188 = r29187 * r29164;
double r29189 = r29188 / r29173;
double r29190 = r29189 / r29177;
double r29191 = r29172 ? r29186 : r29190;
double r29192 = r29164 * r29164;
double r29193 = 4.0;
double r29194 = r29193 * r29177;
double r29195 = r29194 * r29174;
double r29196 = r29192 - r29195;
double r29197 = cbrt(r29196);
double r29198 = fabs(r29197);
double r29199 = sqrt(r29197);
double r29200 = r29198 * r29199;
double r29201 = r29176 - r29200;
double r29202 = r29175 / r29201;
double r29203 = sqrt(r29196);
double r29204 = r29203 - r29164;
double r29205 = r29204 / r29173;
double r29206 = r29205 / r29177;
double r29207 = r29172 ? r29202 : r29206;
double r29208 = r29170 ? r29191 : r29207;
return r29208;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < -2.7031326112465227e+141 or 2.028095266961813e+109 < b Initial program 41.3
Simplified41.3
Taylor expanded around inf 25.1
rmApplied add-cube-cbrt25.1
Applied times-frac22.6
rmApplied add-sqr-sqrt22.6
Applied sqrt-prod22.6
Applied fma-neg22.6
Taylor expanded around -inf 2.6
Simplified2.6
if -2.7031326112465227e+141 < b < 2.028095266961813e+109Initial program 8.7
Simplified8.7
rmApplied add-cube-cbrt8.9
Applied sqrt-prod8.9
Simplified8.9
Final simplification6.7
herbie shell --seed 2020047 +o rules:numerics
(FPCore (a b c)
:name "jeff quadratic root 2"
:precision binary64
(if (>= b 0.0) (/ (* 2 c) (- (- b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))))