\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 -3.12428337420519208 \cdot 10^{57}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le 3.84613441880260993 \cdot 10^{-81}:\\
\;\;\;\;\frac{\sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)} - b}{2} \cdot \frac{1}{a}\\
\mathbf{else}:\\
\;\;\;\;\frac{-2 \cdot \frac{c}{b}}{2}\\
\end{array}double f(double a, double b, double c) {
double r94942 = b;
double r94943 = -r94942;
double r94944 = r94942 * r94942;
double r94945 = 4.0;
double r94946 = a;
double r94947 = c;
double r94948 = r94946 * r94947;
double r94949 = r94945 * r94948;
double r94950 = r94944 - r94949;
double r94951 = sqrt(r94950);
double r94952 = r94943 + r94951;
double r94953 = 2.0;
double r94954 = r94953 * r94946;
double r94955 = r94952 / r94954;
return r94955;
}
double f(double a, double b, double c) {
double r94956 = b;
double r94957 = -3.124283374205192e+57;
bool r94958 = r94956 <= r94957;
double r94959 = 1.0;
double r94960 = c;
double r94961 = r94960 / r94956;
double r94962 = a;
double r94963 = r94956 / r94962;
double r94964 = r94961 - r94963;
double r94965 = r94959 * r94964;
double r94966 = 3.84613441880261e-81;
bool r94967 = r94956 <= r94966;
double r94968 = r94956 * r94956;
double r94969 = 4.0;
double r94970 = r94962 * r94960;
double r94971 = r94969 * r94970;
double r94972 = r94968 - r94971;
double r94973 = sqrt(r94972);
double r94974 = r94973 - r94956;
double r94975 = 2.0;
double r94976 = r94974 / r94975;
double r94977 = 1.0;
double r94978 = r94977 / r94962;
double r94979 = r94976 * r94978;
double r94980 = -2.0;
double r94981 = r94980 * r94961;
double r94982 = r94981 / r94975;
double r94983 = r94967 ? r94979 : r94982;
double r94984 = r94958 ? r94965 : r94983;
return r94984;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 33.8 |
|---|---|
| Target | 20.4 |
| Herbie | 10.1 |
if b < -3.124283374205192e+57Initial program 39.5
Simplified39.5
Taylor expanded around -inf 5.4
Simplified5.4
if -3.124283374205192e+57 < b < 3.84613441880261e-81Initial program 12.7
Simplified12.7
rmApplied div-inv12.8
if 3.84613441880261e-81 < b Initial program 53.0
Simplified53.0
rmApplied div-inv53.0
rmApplied associate-*l/53.0
Simplified53.0
Taylor expanded around inf 9.5
Final simplification10.1
herbie shell --seed 2020045
(FPCore (a b c)
:name "quadp (p42, positive)"
:precision binary64
:herbie-target
(if (< b 0.0) (/ (+ (- b) (sqrt (- (* b b) (* 4 (* a c))))) (* 2 a)) (/ c (* a (/ (- (- b) (sqrt (- (* b b) (* 4 (* a c))))) (* 2 a)))))
(/ (+ (- b) (sqrt (- (* b b) (* 4 (* a c))))) (* 2 a)))