\frac{\cosh x \cdot \frac{y}{x}}{z}\begin{array}{l}
\mathbf{if}\;y \le -1.72392562700703779 \cdot 10^{-25}:\\
\;\;\;\;\frac{\frac{\left({\left(e^{x}\right)}^{3} + {\left(e^{-x}\right)}^{3}\right) \cdot \left(-y\right)}{e^{x} \cdot e^{x} + \left(e^{-x} \cdot e^{-x} - e^{x} \cdot e^{-x}\right)}}{\left(-2 \cdot x\right) \cdot z}\\
\mathbf{elif}\;y \le 1.8559816678073198 \cdot 10^{-9}:\\
\;\;\;\;\frac{\frac{y}{x}}{\frac{z}{\cosh x}}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{\left(e^{x} + e^{-x}\right) \cdot \left(-y\right)}{z}}{-2 \cdot x}\\
\end{array}double code(double x, double y, double z) {
return ((cosh(x) * (y / x)) / z);
}
double code(double x, double y, double z) {
double VAR;
if ((y <= -1.7239256270070378e-25)) {
VAR = ((((pow(exp(x), 3.0) + pow(exp(-x), 3.0)) * -y) / ((exp(x) * exp(x)) + ((exp(-x) * exp(-x)) - (exp(x) * exp(-x))))) / ((-2.0 * x) * z));
} else {
double VAR_1;
if ((y <= 1.8559816678073198e-09)) {
VAR_1 = ((y / x) / (z / cosh(x)));
} else {
VAR_1 = ((((exp(x) + exp(-x)) * -y) / z) / (-2.0 * x));
}
VAR = VAR_1;
}
return VAR;
}




Bits error versus x




Bits error versus y




Bits error versus z
Results
| Original | 7.8 |
|---|---|
| Target | 0.5 |
| Herbie | 0.4 |
if y < -1.7239256270070378e-25Initial program 19.0
rmApplied frac-2neg19.0
Applied cosh-def19.0
Applied frac-times19.0
Applied associate-/l/0.4
Simplified0.4
rmApplied flip3-+0.5
Applied associate-*l/0.6
if -1.7239256270070378e-25 < y < 1.8559816678073198e-09Initial program 0.3
rmApplied *-commutative0.3
Applied associate-/l*0.3
if 1.8559816678073198e-09 < y Initial program 21.6
rmApplied frac-2neg21.6
Applied cosh-def21.6
Applied frac-times21.6
Applied associate-/l/0.3
Simplified0.3
rmApplied *-commutative0.3
Applied associate-/r*0.3
Final simplification0.4
herbie shell --seed 2020078
(FPCore (x y z)
:name "Linear.Quaternion:$ctan from linear-1.19.1.3"
:precision binary64
:herbie-target
(if (< y -4.618902267687042e-52) (* (/ (/ y z) x) (cosh x)) (if (< y 1.0385305359351529e-39) (/ (/ (* (cosh x) y) x) z) (* (/ (/ y z) x) (cosh x))))
(/ (* (cosh x) (/ y x)) z))