x - \frac{\log \left(\left(1 - y\right) + y \cdot e^{z}\right)}{t}\begin{array}{l}
\mathbf{if}\;e^{z} \le 0.998271172497884218:\\
\;\;\;\;x - \frac{\sqrt[3]{\log \left(\left(1 - y\right) + y \cdot e^{z}\right)} \cdot \sqrt[3]{\log \left(\left(1 - y\right) + y \cdot e^{z}\right)}}{\sqrt[3]{t} \cdot \sqrt[3]{t}} \cdot \frac{\sqrt[3]{\log \left(\left(1 - y\right) + y \cdot e^{z}\right)}}{\sqrt[3]{t}}\\
\mathbf{else}:\\
\;\;\;\;x - \left(1 \cdot \frac{z \cdot y}{t} + \frac{\log 1}{t}\right)\\
\end{array}double code(double x, double y, double z, double t) {
return ((double) (x - (((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.9982711724978842)) {
VAR = ((double) (x - ((double) ((((double) (((double) cbrt(((double) log(((double) (((double) (1.0 - y)) + ((double) (y * ((double) exp(z)))))))))) * ((double) cbrt(((double) log(((double) (((double) (1.0 - y)) + ((double) (y * ((double) exp(z)))))))))))) / ((double) (((double) cbrt(t)) * ((double) cbrt(t))))) * (((double) cbrt(((double) log(((double) (((double) (1.0 - y)) + ((double) (y * ((double) exp(z)))))))))) / ((double) cbrt(t)))))));
} else {
VAR = ((double) (x - ((double) (((double) (1.0 * (((double) (z * y)) / t))) + (((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.1 |
|---|---|
| Target | 16.0 |
| Herbie | 8.7 |
if (exp z) < 0.998271172497884218Initial program 11.6
rmApplied add-cube-cbrt11.7
Applied add-cube-cbrt11.8
Applied times-frac11.8
if 0.998271172497884218 < (exp z) Initial program 31.1
Taylor expanded around 0 7.3
Simplified7.3
Taylor expanded around 0 7.4
Final simplification8.7
herbie shell --seed 2020182
(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 (/ (/ (neg 0.5) (* y t)) (* z z))) (* (/ (neg 0.5) (* y t)) (/ (/ 2.0 z) (* z z)))) (- x (/ (log (+ 1.0 (* z y))) t)))
(- x (/ (log (+ (- 1.0 y) (* y (exp z)))) t)))