x - \frac{\log \left(\left(1 - y\right) + y \cdot e^{z}\right)}{t}\begin{array}{l}
\mathbf{if}\;e^{z} \le 0.0:\\
\;\;\;\;x - \frac{\log \left(\sqrt{\left(1 - y\right) + y \cdot e^{z}}\right) + \log \left(\sqrt{\left(1 - y\right) + y \cdot e^{z}}\right)}{t}\\
\mathbf{else}:\\
\;\;\;\;x - \left(1 \cdot \left(\left(\sqrt[3]{\frac{z}{\sqrt[3]{t} \cdot \sqrt[3]{t}}} \cdot \sqrt[3]{\frac{z}{\sqrt[3]{t} \cdot \sqrt[3]{t}}}\right) \cdot \left(\sqrt[3]{\frac{z}{\sqrt[3]{t} \cdot \sqrt[3]{t}}} \cdot \frac{y}{\sqrt[3]{t}}\right)\right) + \frac{\log 1}{t}\right)\\
\end{array}double code(double x, double y, double z, double t) {
return ((double) (x - ((double) (((double) log(((double) (((double) (1.0 - y)) + ((double) (y * ((double) exp(z)))))))) / t))));
}
double code(double x, double y, double z, double t) {
double VAR;
if ((((double) exp(z)) <= 0.0)) {
VAR = ((double) (x - ((double) (((double) (((double) log(((double) sqrt(((double) (((double) (1.0 - y)) + ((double) (y * ((double) exp(z)))))))))) + ((double) log(((double) sqrt(((double) (((double) (1.0 - y)) + ((double) (y * ((double) exp(z)))))))))))) / t))));
} else {
VAR = ((double) (x - ((double) (((double) (1.0 * ((double) (((double) (((double) cbrt(((double) (z / ((double) (((double) cbrt(t)) * ((double) cbrt(t)))))))) * ((double) cbrt(((double) (z / ((double) (((double) cbrt(t)) * ((double) cbrt(t)))))))))) * ((double) (((double) cbrt(((double) (z / ((double) (((double) cbrt(t)) * ((double) cbrt(t)))))))) * ((double) (y / ((double) cbrt(t)))))))))) + ((double) (((double) log(1.0)) / t))))));
}
return VAR;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t
Results
| Original | 25.0 |
|---|---|
| Target | 16.0 |
| Herbie | 8.8 |
if (exp z) < 0.0Initial program 11.4
rmApplied add-sqr-sqrt11.4
Applied log-prod11.4
if 0.0 < (exp z) Initial program 30.7
Taylor expanded around 0 8.0
rmApplied add-cube-cbrt8.1
Applied times-frac7.6
rmApplied add-cube-cbrt7.6
Applied associate-*l*7.6
Final simplification8.8
herbie shell --seed 2020123 +o rules:numerics
(FPCore (x y z t)
:name "System.Random.MWC.Distributions:truncatedExp from mwc-random-0.13.3.2"
:precision binary64
:herbie-target
(if (< z -2.8874623088207947e+119) (- (- x (/ (/ (- 0.5) (* y t)) (* z z))) (* (/ (- 0.5) (* y t)) (/ (/ 2 z) (* z z)))) (- x (/ (log (+ 1 (* z y))) t)))
(- x (/ (log (+ (- 1 y) (* y (exp z)))) t)))