```
1 label sinh # The hyperbolic sine of an angle in radians
2 exp
3 ENTER
4 recip
5 -
6 2.000000000000000e+000
7 /
8 rtn
9 label cosh # The hyperbolic cosine of an angle in radians
10 exp
11 ENTER
12 recip
13 +
14 2.000000000000000e+000
15 /
16 rtn
17 label tanh # The hyperbolic tangent of an angle in radians
18 ENTER
19 gosub sinh
20 x<>y
21 gosub cosh
22 /
23 rtn
```