\frac{1 - \cos x}{\sin x}\begin{array}{l}
\mathbf{if}\;\frac{1 - \cos x}{\sin x} \le -0.0130850919083989967:\\
\;\;\;\;\frac{\frac{{1}^{3} - {\left(\cos x\right)}^{3}}{\cos x \cdot \left(\cos x + 1\right) + 1 \cdot 1}}{\sin x}\\
\mathbf{elif}\;\frac{1 - \cos x}{\sin x} \le 0.0:\\
\;\;\;\;\left(\frac{1}{24} \cdot {x}^{3} + \frac{1}{240} \cdot {x}^{5}\right) + \frac{1}{2} \cdot x\\
\mathbf{else}:\\
\;\;\;\;\frac{\log \left(e^{1 - \cos x}\right)}{\sin x}\\
\end{array}double code(double x) {
return ((double) (((double) (1.0 - ((double) cos(x)))) / ((double) sin(x))));
}
double code(double x) {
double VAR;
if ((((double) (((double) (1.0 - ((double) cos(x)))) / ((double) sin(x)))) <= -0.013085091908398997)) {
VAR = ((double) (((double) (((double) (((double) pow(1.0, 3.0)) - ((double) pow(((double) cos(x)), 3.0)))) / ((double) (((double) (((double) cos(x)) * ((double) (((double) cos(x)) + 1.0)))) + ((double) (1.0 * 1.0)))))) / ((double) sin(x))));
} else {
double VAR_1;
if ((((double) (((double) (1.0 - ((double) cos(x)))) / ((double) sin(x)))) <= 0.0)) {
VAR_1 = ((double) (((double) (((double) (0.041666666666666664 * ((double) pow(x, 3.0)))) + ((double) (0.004166666666666667 * ((double) pow(x, 5.0)))))) + ((double) (0.5 * x))));
} else {
VAR_1 = ((double) (((double) log(((double) exp(((double) (1.0 - ((double) cos(x)))))))) / ((double) sin(x))));
}
VAR = VAR_1;
}
return VAR;
}




Bits error versus x
Results
| Original | 30.3 |
|---|---|
| Target | 0.0 |
| Herbie | 0.7 |
if (/ (- 1.0 (cos x)) (sin x)) < -0.013085091908398997Initial program 0.8
rmApplied flip3--0.9
Simplified0.9
if -0.013085091908398997 < (/ (- 1.0 (cos x)) (sin x)) < 0.0Initial program 60.0
Taylor expanded around 0 0.2
rmApplied associate-+r+0.2
if 0.0 < (/ (- 1.0 (cos x)) (sin x)) Initial program 1.3
rmApplied add-log-exp1.5
Applied add-log-exp1.5
Applied diff-log1.7
Simplified1.5
Final simplification0.7
herbie shell --seed 2020148
(FPCore (x)
:name "tanhf (example 3.4)"
:precision binary64
:herbie-expected 2
:herbie-target
(tan (/ x 2.0))
(/ (- 1.0 (cos x)) (sin x)))