\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 -2.377884926422666692774621211015073640738 \cdot 10^{-4}:\\
\;\;\;\;\begin{array}{l}
\mathbf{if}\;b \ge 0.0:\\
\;\;\;\;\frac{\frac{\left({b}^{2} - {b}^{2}\right) + \left(4 \cdot a\right) \cdot c}{\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 \left(\frac{\frac{a}{\sqrt[3]{b} \cdot \sqrt[3]{b}}}{\sqrt[3]{\sqrt[3]{b}} \cdot \sqrt[3]{\sqrt[3]{b}}} \cdot \frac{c}{\sqrt[3]{\sqrt[3]{b}}}\right) - 2 \cdot b}\\
\end{array}\\
\mathbf{elif}\;b \le 1.168631308857650236436712043710049643149 \cdot 10^{75}:\\
\;\;\;\;\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{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}} \cdot \sqrt{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\
\end{array}\\
\mathbf{elif}\;b \ge 0.0:\\
\;\;\;\;\frac{2 \cdot \frac{a \cdot c}{b} - 2 \cdot b}{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 r34300 = b;
double r34301 = 0.0;
bool r34302 = r34300 >= r34301;
double r34303 = -r34300;
double r34304 = r34300 * r34300;
double r34305 = 4.0;
double r34306 = a;
double r34307 = r34305 * r34306;
double r34308 = c;
double r34309 = r34307 * r34308;
double r34310 = r34304 - r34309;
double r34311 = sqrt(r34310);
double r34312 = r34303 - r34311;
double r34313 = 2.0;
double r34314 = r34313 * r34306;
double r34315 = r34312 / r34314;
double r34316 = r34313 * r34308;
double r34317 = r34303 + r34311;
double r34318 = r34316 / r34317;
double r34319 = r34302 ? r34315 : r34318;
return r34319;
}
double f(double a, double b, double c) {
double r34320 = b;
double r34321 = -0.00023778849264226667;
bool r34322 = r34320 <= r34321;
double r34323 = 0.0;
bool r34324 = r34320 >= r34323;
double r34325 = 2.0;
double r34326 = pow(r34320, r34325);
double r34327 = r34326 - r34326;
double r34328 = 4.0;
double r34329 = a;
double r34330 = r34328 * r34329;
double r34331 = c;
double r34332 = r34330 * r34331;
double r34333 = r34327 + r34332;
double r34334 = -r34320;
double r34335 = r34320 * r34320;
double r34336 = r34335 - r34332;
double r34337 = sqrt(r34336);
double r34338 = r34334 + r34337;
double r34339 = r34333 / r34338;
double r34340 = 2.0;
double r34341 = r34340 * r34329;
double r34342 = r34339 / r34341;
double r34343 = r34340 * r34331;
double r34344 = cbrt(r34320);
double r34345 = r34344 * r34344;
double r34346 = r34329 / r34345;
double r34347 = cbrt(r34344);
double r34348 = r34347 * r34347;
double r34349 = r34346 / r34348;
double r34350 = r34331 / r34347;
double r34351 = r34349 * r34350;
double r34352 = r34340 * r34351;
double r34353 = r34325 * r34320;
double r34354 = r34352 - r34353;
double r34355 = r34343 / r34354;
double r34356 = r34324 ? r34342 : r34355;
double r34357 = 1.1686313088576502e+75;
bool r34358 = r34320 <= r34357;
double r34359 = r34334 - r34337;
double r34360 = r34359 / r34341;
double r34361 = sqrt(r34337);
double r34362 = r34361 * r34361;
double r34363 = r34334 + r34362;
double r34364 = r34343 / r34363;
double r34365 = r34324 ? r34360 : r34364;
double r34366 = r34329 * r34331;
double r34367 = r34366 / r34320;
double r34368 = r34340 * r34367;
double r34369 = r34368 - r34353;
double r34370 = r34369 / r34341;
double r34371 = r34343 / r34338;
double r34372 = r34324 ? r34370 : r34371;
double r34373 = r34358 ? r34365 : r34372;
double r34374 = r34322 ? r34356 : r34373;
return r34374;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < -0.00023778849264226667Initial program 22.3
Taylor expanded around -inf 8.5
rmApplied add-cube-cbrt8.5
Applied times-frac6.0
rmApplied add-cube-cbrt6.0
Applied *-un-lft-identity6.0
Applied times-frac6.0
Applied associate-*r*6.0
Simplified6.0
rmApplied flip--6.0
Simplified6.0
if -0.00023778849264226667 < b < 1.1686313088576502e+75Initial program 10.2
rmApplied add-sqr-sqrt10.2
Applied sqrt-prod10.3
if 1.1686313088576502e+75 < b Initial program 43.1
Taylor expanded around inf 11.2
Final simplification9.0
herbie shell --seed 2019308
(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)))))))