\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 -1.6581383089037873 \cdot 10^{81}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le 2.45811587950602871 \cdot 10^{-136}:\\
\;\;\;\;\frac{1}{\frac{2 \cdot a}{\sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}} - \frac{b}{2 \cdot a}\\
\mathbf{else}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r81917 = b;
double r81918 = -r81917;
double r81919 = r81917 * r81917;
double r81920 = 4.0;
double r81921 = a;
double r81922 = c;
double r81923 = r81921 * r81922;
double r81924 = r81920 * r81923;
double r81925 = r81919 - r81924;
double r81926 = sqrt(r81925);
double r81927 = r81918 + r81926;
double r81928 = 2.0;
double r81929 = r81928 * r81921;
double r81930 = r81927 / r81929;
return r81930;
}
double f(double a, double b, double c) {
double r81931 = b;
double r81932 = -1.6581383089037873e+81;
bool r81933 = r81931 <= r81932;
double r81934 = 1.0;
double r81935 = c;
double r81936 = r81935 / r81931;
double r81937 = a;
double r81938 = r81931 / r81937;
double r81939 = r81936 - r81938;
double r81940 = r81934 * r81939;
double r81941 = 2.4581158795060287e-136;
bool r81942 = r81931 <= r81941;
double r81943 = 1.0;
double r81944 = 2.0;
double r81945 = r81944 * r81937;
double r81946 = r81931 * r81931;
double r81947 = 4.0;
double r81948 = r81937 * r81935;
double r81949 = r81947 * r81948;
double r81950 = r81946 - r81949;
double r81951 = sqrt(r81950);
double r81952 = r81945 / r81951;
double r81953 = r81943 / r81952;
double r81954 = r81931 / r81945;
double r81955 = r81953 - r81954;
double r81956 = -1.0;
double r81957 = r81956 * r81936;
double r81958 = r81942 ? r81955 : r81957;
double r81959 = r81933 ? r81940 : r81958;
return r81959;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 34.6 |
|---|---|
| Target | 21.3 |
| Herbie | 10.5 |
if b < -1.6581383089037873e+81Initial program 43.9
Simplified43.9
Taylor expanded around -inf 3.6
Simplified3.6
if -1.6581383089037873e+81 < b < 2.4581158795060287e-136Initial program 11.7
Simplified11.7
rmApplied div-sub11.7
rmApplied *-un-lft-identity11.7
Applied sqrt-prod11.7
Applied associate-/l*11.8
if 2.4581158795060287e-136 < b Initial program 50.8
Simplified50.8
Taylor expanded around inf 12.0
Final simplification10.5
herbie shell --seed 2019199
(FPCore (a b c)
:name "quadp (p42, positive)"
:herbie-target
(if (< b 0.0) (/ (+ (- b) (sqrt (- (* b b) (* 4.0 (* a c))))) (* 2.0 a)) (/ c (* a (/ (- (- b) (sqrt (- (* b b) (* 4.0 (* a c))))) (* 2.0 a)))))
(/ (+ (- b) (sqrt (- (* b b) (* 4.0 (* a c))))) (* 2.0 a)))