Hyperbolic operations on HP-41

This program adds hyperbolic operations to the HP-41. I wrote this code in October 1986. I uses modified functions to improve accuracy.

Instructions

The labels automatically map to the user keyboard. Note that some hyperbolic operations leave the stack disturbed.

Examples

Calculate the sinh(1)

Listing

Available through the repository

• Requires
  • X-Functions module on the HP-41cv
• Available as
  • source code
  • raw code for the V41 emulator
  • bar code for the HP Wand (HP82153A)
• Size
  • 12 registers; 78 bytes including END; 1 magnetic track (78/112=0.70)

 01	LBL "HYP"

02	LBL H	; [sinh]
03	STO M
04	E^X-1
05	LASTX
06	E^X
07	/
08	RCL M
09	E^X-1
10	+
11	LBL 00
12	2
13	/
14	RTN

15	LBL I 	; [cosh]
16	E^X
17	1/X
18	LASTX
19	+
20	GTO 00

21	LBL J	; [tanh]
22	XEQ H
23	RCL M
24	XEQ I
25	/
26	RTN

27	LBL C	; [asinh]
28	X^2
29	LASTX
30	X<>Y
31	 E
32	+
33	GTO 01

34	LBL E	; [atanh]
35	 E
36	+
37	ENTER^
38	ENTER^
39	2
40	-
41	/
42	CHS
43	LN
44	GTO 00

45	LBL D	; [acosh]
46	X^2
47	LASTX
48	X<>Y
49	 E
50	-
51	LBL 01
52	SQRT
53	+
54	LN
55	END