\frac{\left(-b_2\right) - \sqrt{b_2 \cdot b_2 - a \cdot c}}{a}\begin{array}{l}
\mathbf{if}\;b_2 \le -31202666053494416225599488:\\
\;\;\;\;1 \cdot \left(\frac{-1}{2} \cdot \frac{c}{b_2}\right)\\
\mathbf{elif}\;b_2 \le -2.198298561806402727361079035927886117853 \cdot 10^{-291}:\\
\;\;\;\;1 \cdot \frac{\frac{1 \cdot \left(\left({b_2}^{2} - {b_2}^{2}\right) + a \cdot c\right)}{a}}{\left(-b_2\right) + \sqrt{b_2 \cdot b_2 - a \cdot c}}\\
\mathbf{elif}\;b_2 \le 5.379869857595589463811898652808656389365 \cdot 10^{128}:\\
\;\;\;\;1 \cdot \frac{\left(-b_2\right) - \sqrt{b_2 \cdot b_2 - a \cdot c}}{a}\\
\mathbf{else}:\\
\;\;\;\;1 \cdot \left(\frac{1}{2} \cdot \frac{c}{b_2} - 2 \cdot \frac{b_2}{a}\right)\\
\end{array}double f(double a, double b_2, double c) {
double r15051 = b_2;
double r15052 = -r15051;
double r15053 = r15051 * r15051;
double r15054 = a;
double r15055 = c;
double r15056 = r15054 * r15055;
double r15057 = r15053 - r15056;
double r15058 = sqrt(r15057);
double r15059 = r15052 - r15058;
double r15060 = r15059 / r15054;
return r15060;
}
double f(double a, double b_2, double c) {
double r15061 = b_2;
double r15062 = -3.1202666053494416e+25;
bool r15063 = r15061 <= r15062;
double r15064 = 1.0;
double r15065 = -0.5;
double r15066 = c;
double r15067 = r15066 / r15061;
double r15068 = r15065 * r15067;
double r15069 = r15064 * r15068;
double r15070 = -2.1982985618064027e-291;
bool r15071 = r15061 <= r15070;
double r15072 = 2.0;
double r15073 = pow(r15061, r15072);
double r15074 = r15073 - r15073;
double r15075 = a;
double r15076 = r15075 * r15066;
double r15077 = r15074 + r15076;
double r15078 = r15064 * r15077;
double r15079 = r15078 / r15075;
double r15080 = -r15061;
double r15081 = r15061 * r15061;
double r15082 = r15081 - r15076;
double r15083 = sqrt(r15082);
double r15084 = r15080 + r15083;
double r15085 = r15079 / r15084;
double r15086 = r15064 * r15085;
double r15087 = 5.3798698575955895e+128;
bool r15088 = r15061 <= r15087;
double r15089 = r15080 - r15083;
double r15090 = r15089 / r15075;
double r15091 = r15064 * r15090;
double r15092 = 0.5;
double r15093 = r15092 * r15067;
double r15094 = r15061 / r15075;
double r15095 = r15072 * r15094;
double r15096 = r15093 - r15095;
double r15097 = r15064 * r15096;
double r15098 = r15088 ? r15091 : r15097;
double r15099 = r15071 ? r15086 : r15098;
double r15100 = r15063 ? r15069 : r15099;
return r15100;
}



Bits error versus a



Bits error versus b_2



Bits error versus c
Results
if b_2 < -3.1202666053494416e+25Initial program 56.4
rmApplied clear-num56.4
rmApplied *-un-lft-identity56.4
Applied *-un-lft-identity56.4
Applied times-frac56.4
Applied add-cube-cbrt56.4
Applied times-frac56.4
Simplified56.4
Simplified56.4
Taylor expanded around -inf 4.8
if -3.1202666053494416e+25 < b_2 < -2.1982985618064027e-291Initial program 27.7
rmApplied clear-num27.7
rmApplied *-un-lft-identity27.7
Applied *-un-lft-identity27.7
Applied times-frac27.7
Applied add-cube-cbrt27.7
Applied times-frac27.7
Simplified27.7
Simplified27.7
rmApplied clear-num27.7
rmApplied flip--27.8
Applied associate-/r/27.8
Applied associate-/r*27.8
Simplified16.2
if -2.1982985618064027e-291 < b_2 < 5.3798698575955895e+128Initial program 8.7
rmApplied clear-num8.8
rmApplied *-un-lft-identity8.8
Applied *-un-lft-identity8.8
Applied times-frac8.8
Applied add-cube-cbrt8.8
Applied times-frac8.8
Simplified8.8
Simplified8.7
if 5.3798698575955895e+128 < b_2 Initial program 54.4
rmApplied clear-num54.4
rmApplied *-un-lft-identity54.4
Applied *-un-lft-identity54.4
Applied times-frac54.4
Applied add-cube-cbrt54.4
Applied times-frac54.4
Simplified54.4
Simplified54.4
Taylor expanded around inf 3.1
Final simplification8.5
herbie shell --seed 2019356
(FPCore (a b_2 c)
:name "quad2m (problem 3.2.1, negative)"
:precision binary64
(/ (- (- b_2) (sqrt (- (* b_2 b_2) (* a c)))) a))