\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.110214784432646624286492509170028545964 \cdot 10^{104}:\\
\;\;\;\;\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{\left(2 \cdot \frac{a \cdot c}{b} - b\right) - b}{2}}{a}\\
\end{array}\\
\mathbf{elif}\;b \le 1.543825893317561644388565621512305891312 \cdot 10^{106}:\\
\;\;\;\;\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{\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}} - b}{2}}{a}\\
\end{array}\\
\mathbf{elif}\;b \ge 0.0:\\
\;\;\;\;\frac{2 \cdot c}{\left(-b\right) - \left(b - 2 \cdot \frac{a \cdot c}{b}\right)}\\
\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 r31811 = b;
double r31812 = 0.0;
bool r31813 = r31811 >= r31812;
double r31814 = 2.0;
double r31815 = c;
double r31816 = r31814 * r31815;
double r31817 = -r31811;
double r31818 = r31811 * r31811;
double r31819 = 4.0;
double r31820 = a;
double r31821 = r31819 * r31820;
double r31822 = r31821 * r31815;
double r31823 = r31818 - r31822;
double r31824 = sqrt(r31823);
double r31825 = r31817 - r31824;
double r31826 = r31816 / r31825;
double r31827 = r31817 + r31824;
double r31828 = r31814 * r31820;
double r31829 = r31827 / r31828;
double r31830 = r31813 ? r31826 : r31829;
return r31830;
}
double f(double a, double b, double c) {
double r31831 = b;
double r31832 = -2.1102147844326466e+104;
bool r31833 = r31831 <= r31832;
double r31834 = 0.0;
bool r31835 = r31831 >= r31834;
double r31836 = 2.0;
double r31837 = c;
double r31838 = r31836 * r31837;
double r31839 = -r31831;
double r31840 = r31831 * r31831;
double r31841 = 4.0;
double r31842 = a;
double r31843 = r31841 * r31842;
double r31844 = r31843 * r31837;
double r31845 = r31840 - r31844;
double r31846 = sqrt(r31845);
double r31847 = r31839 - r31846;
double r31848 = r31838 / r31847;
double r31849 = r31842 * r31837;
double r31850 = r31849 / r31831;
double r31851 = r31836 * r31850;
double r31852 = r31851 - r31831;
double r31853 = r31852 - r31831;
double r31854 = r31853 / r31836;
double r31855 = r31854 / r31842;
double r31856 = r31835 ? r31848 : r31855;
double r31857 = 1.5438258933175616e+106;
bool r31858 = r31831 <= r31857;
double r31859 = sqrt(r31846);
double r31860 = r31859 * r31859;
double r31861 = r31860 - r31831;
double r31862 = r31861 / r31836;
double r31863 = r31862 / r31842;
double r31864 = r31835 ? r31848 : r31863;
double r31865 = r31831 - r31851;
double r31866 = r31839 - r31865;
double r31867 = r31838 / r31866;
double r31868 = r31846 - r31831;
double r31869 = r31868 / r31836;
double r31870 = r31869 / r31842;
double r31871 = r31835 ? r31867 : r31870;
double r31872 = r31858 ? r31864 : r31871;
double r31873 = r31833 ? r31856 : r31872;
return r31873;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < -2.1102147844326466e+104Initial program 48.3
Simplified48.3
Taylor expanded around -inf 9.5
if -2.1102147844326466e+104 < b < 1.5438258933175616e+106Initial program 9.1
Simplified9.1
rmApplied add-sqr-sqrt9.1
Applied sqrt-prod9.2
if 1.5438258933175616e+106 < b Initial program 30.0
Simplified30.0
Taylor expanded around inf 5.7
Final simplification8.4
herbie shell --seed 2019235 +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))))