\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.2724541866372811 \cdot 10^{165}:\\
\;\;\;\;\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{\frac{2 \cdot \frac{a \cdot c}{b} - 2 \cdot b}{2}}{a}\\
\end{array}\\
\mathbf{elif}\;b \le 3.2649111998892948 \cdot 10^{111}:\\
\;\;\;\;\begin{array}{l}
\mathbf{if}\;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}\\
\mathbf{elif}\;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{\frac{\left(b \cdot b - \left(4 \cdot a\right) \cdot c\right) - b \cdot b}{\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 r28013 = b;
double r28014 = 0.0;
bool r28015 = r28013 >= r28014;
double r28016 = 2.0;
double r28017 = c;
double r28018 = r28016 * r28017;
double r28019 = -r28013;
double r28020 = r28013 * r28013;
double r28021 = 4.0;
double r28022 = a;
double r28023 = r28021 * r28022;
double r28024 = r28023 * r28017;
double r28025 = r28020 - r28024;
double r28026 = sqrt(r28025);
double r28027 = r28019 - r28026;
double r28028 = r28018 / r28027;
double r28029 = r28019 + r28026;
double r28030 = r28016 * r28022;
double r28031 = r28029 / r28030;
double r28032 = r28015 ? r28028 : r28031;
return r28032;
}
double f(double a, double b, double c) {
double r28033 = b;
double r28034 = -2.272454186637281e+165;
bool r28035 = r28033 <= r28034;
double r28036 = 0.0;
bool r28037 = r28033 >= r28036;
double r28038 = 2.0;
double r28039 = c;
double r28040 = r28038 * r28039;
double r28041 = -r28033;
double r28042 = r28033 * r28033;
double r28043 = 4.0;
double r28044 = a;
double r28045 = r28043 * r28044;
double r28046 = r28045 * r28039;
double r28047 = r28042 - r28046;
double r28048 = sqrt(r28047);
double r28049 = r28041 - r28048;
double r28050 = r28040 / r28049;
double r28051 = r28044 * r28039;
double r28052 = r28051 / r28033;
double r28053 = r28038 * r28052;
double r28054 = 2.0;
double r28055 = r28054 * r28033;
double r28056 = r28053 - r28055;
double r28057 = r28056 / r28038;
double r28058 = r28057 / r28044;
double r28059 = r28037 ? r28050 : r28058;
double r28060 = 3.264911199889295e+111;
bool r28061 = r28033 <= r28060;
double r28062 = cbrt(r28047);
double r28063 = fabs(r28062);
double r28064 = sqrt(r28062);
double r28065 = r28063 * r28064;
double r28066 = r28041 - r28065;
double r28067 = r28040 / r28066;
double r28068 = r28048 - r28033;
double r28069 = r28068 / r28038;
double r28070 = r28069 / r28044;
double r28071 = r28037 ? r28067 : r28070;
double r28072 = cbrt(r28033);
double r28073 = r28072 * r28072;
double r28074 = r28044 / r28073;
double r28075 = r28039 / r28072;
double r28076 = r28074 * r28075;
double r28077 = r28038 * r28076;
double r28078 = r28033 - r28077;
double r28079 = r28041 - r28078;
double r28080 = r28040 / r28079;
double r28081 = r28047 - r28042;
double r28082 = r28048 + r28033;
double r28083 = r28081 / r28082;
double r28084 = r28083 / r28038;
double r28085 = r28084 / r28044;
double r28086 = r28037 ? r28080 : r28085;
double r28087 = r28061 ? r28071 : r28086;
double r28088 = r28035 ? r28059 : r28087;
return r28088;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < -2.272454186637281e+165Initial program 64.0
Simplified64.0
Taylor expanded around -inf 10.2
if -2.272454186637281e+165 < b < 3.264911199889295e+111Initial program 9.2
Simplified9.2
rmApplied add-cube-cbrt9.4
Applied sqrt-prod9.4
Simplified9.4
if 3.264911199889295e+111 < b Initial program 31.6
Simplified31.6
Taylor expanded around inf 6.2
rmApplied add-cube-cbrt6.2
Applied times-frac2.2
rmApplied flip--2.2
Simplified2.2
Final simplification7.9
herbie shell --seed 2020047
(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))))