\frac{\left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\begin{array}{l}
\mathbf{if}\;b \le -16283081095555591571721024035618816:\\
\;\;\;\;1 \cdot \left(-1 \cdot \frac{c}{b}\right)\\
\mathbf{elif}\;b \le \frac{-868252521030753}{3.634193621478034452746619039440022671768 \cdot 10^{134}}:\\
\;\;\;\;\frac{1}{\sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)} - b} \cdot \frac{\frac{4 \cdot \left(a \cdot c\right)}{2}}{a}\\
\mathbf{elif}\;b \le \frac{-8402861763014741}{4.994797680505587570210555567669066089198 \cdot 10^{145}}:\\
\;\;\;\;1 \cdot \left(-1 \cdot \frac{c}{b}\right)\\
\mathbf{elif}\;b \le \frac{3369331144082303}{11150372599265311570767859136324180752990000}:\\
\;\;\;\;1 \cdot \frac{\left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\
\mathbf{else}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\end{array}double f(double a, double b, double c) {
double r288852 = b;
double r288853 = -r288852;
double r288854 = r288852 * r288852;
double r288855 = 4.0;
double r288856 = a;
double r288857 = c;
double r288858 = r288856 * r288857;
double r288859 = r288855 * r288858;
double r288860 = r288854 - r288859;
double r288861 = sqrt(r288860);
double r288862 = r288853 - r288861;
double r288863 = 2.0;
double r288864 = r288863 * r288856;
double r288865 = r288862 / r288864;
return r288865;
}
double f(double a, double b, double c) {
double r288866 = b;
double r288867 = -1.6283081095555592e+34;
bool r288868 = r288866 <= r288867;
double r288869 = 1.0;
double r288870 = -1.0;
double r288871 = c;
double r288872 = r288871 / r288866;
double r288873 = r288870 * r288872;
double r288874 = r288869 * r288873;
double r288875 = -868252521030753.0;
double r288876 = 3.6341936214780345e+134;
double r288877 = r288875 / r288876;
bool r288878 = r288866 <= r288877;
double r288879 = r288866 * r288866;
double r288880 = 4.0;
double r288881 = a;
double r288882 = r288881 * r288871;
double r288883 = r288880 * r288882;
double r288884 = r288879 - r288883;
double r288885 = sqrt(r288884);
double r288886 = r288885 - r288866;
double r288887 = r288869 / r288886;
double r288888 = 2.0;
double r288889 = r288883 / r288888;
double r288890 = r288889 / r288881;
double r288891 = r288887 * r288890;
double r288892 = -8402861763014741.0;
double r288893 = 4.994797680505588e+145;
double r288894 = r288892 / r288893;
bool r288895 = r288866 <= r288894;
double r288896 = 3369331144082303.0;
double r288897 = 1.1150372599265312e+43;
double r288898 = r288896 / r288897;
bool r288899 = r288866 <= r288898;
double r288900 = -r288866;
double r288901 = r288900 - r288885;
double r288902 = r288888 * r288881;
double r288903 = r288901 / r288902;
double r288904 = r288869 * r288903;
double r288905 = 1.0;
double r288906 = r288866 / r288881;
double r288907 = r288872 - r288906;
double r288908 = r288905 * r288907;
double r288909 = r288899 ? r288904 : r288908;
double r288910 = r288895 ? r288874 : r288909;
double r288911 = r288878 ? r288891 : r288910;
double r288912 = r288868 ? r288874 : r288911;
return r288912;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 34.5 |
|---|---|
| Target | 20.9 |
| Herbie | 9.9 |
if b < -1.6283081095555592e+34 or -2.3891201500640816e-120 < b < -1.682322748689228e-130Initial program 55.5
rmApplied div-inv55.5
rmApplied *-un-lft-identity55.5
Applied associate-*l*55.5
Simplified55.5
Taylor expanded around -inf 5.6
if -1.6283081095555592e+34 < b < -2.3891201500640816e-120Initial program 39.8
rmApplied div-inv39.8
rmApplied flip--39.9
Applied frac-times43.6
Simplified22.7
rmApplied *-un-lft-identity22.7
Applied times-frac17.3
Simplified17.3
Simplified17.3
if -1.682322748689228e-130 < b < 3.0217206771227585e-28Initial program 12.8
rmApplied div-inv12.9
rmApplied *-un-lft-identity12.9
Applied associate-*l*12.9
Simplified12.8
if 3.0217206771227585e-28 < b Initial program 31.0
Taylor expanded around inf 8.0
Simplified8.0
Final simplification9.9
herbie shell --seed 350497007
(FPCore (a b c)
:name "quadm (p42, negative)"
:precision binary64
:herbie-target
(if (< b 0.0) (/ c (* a (/ (+ (- b) (sqrt (- (* b b) (* 4 (* a c))))) (* 2 a)))) (/ (- (- b) (sqrt (- (* b b) (* 4 (* a c))))) (* 2 a)))
(/ (- (- b) (sqrt (- (* b b) (* 4 (* a c))))) (* 2 a)))