1 - \frac{1}{2 + \left(2 - \frac{\frac{2}{t}}{1 + \frac{1}{t}}\right) \cdot \left(2 - \frac{\frac{2}{t}}{1 + \frac{1}{t}}\right)}1 - \mathsf{expm1}\left(\mathsf{log1p}\left(\frac{1}{2 + \left(2 - \frac{\frac{2}{t}}{1 + \frac{1}{t}}\right) \cdot \left(2 - \frac{\frac{2}{t}}{1 + \frac{1}{t}}\right)}\right)\right)double code(double t) {
return ((double) (1.0 - ((double) (1.0 / ((double) (2.0 + ((double) (((double) (2.0 - ((double) (((double) (2.0 / t)) / ((double) (1.0 + ((double) (1.0 / t)))))))) * ((double) (2.0 - ((double) (((double) (2.0 / t)) / ((double) (1.0 + ((double) (1.0 / t))))))))))))))));
}
double code(double t) {
return ((double) (1.0 - ((double) expm1(((double) log1p(((double) (1.0 / ((double) (2.0 + ((double) (((double) (2.0 - ((double) (((double) (2.0 / t)) / ((double) (1.0 + ((double) (1.0 / t)))))))) * ((double) (2.0 - ((double) (((double) (2.0 / t)) / ((double) (1.0 + ((double) (1.0 / t))))))))))))))))))));
}



Bits error versus t
Results
Initial program 0.0
rmApplied expm1-log1p-u0.0
Final simplification0.0
herbie shell --seed 2020123 +o rules:numerics
(FPCore (t)
:name "Kahan p13 Example 3"
:precision binary64
(- 1 (/ 1 (+ 2 (* (- 2 (/ (/ 2 t) (+ 1 (/ 1 t)))) (- 2 (/ (/ 2 t) (+ 1 (/ 1 t)))))))))