Easter Sunday Trigs ( rpn38-CX)

[Gerson W. Barbosa]

.
Note: A more accurate updated version is available (Post #23).

Trigonometric Functions (RPN-38 CX)

Code:


01 - 21 73 9      STO .9
02 - 31           ENTER
03 - 61           ×
04 - 31           ENTER
05 - 31           ENTER
06 - 31           ENTER
07 - 86 61 8      RCL × .8
08 - 86 51 7      RCL + .7
09 - 61           ×
10 - 86 41 6      RCL − .6
11 - 61           ×
12 - 86 51 0      RCL + .0
13 - 86 61 9      RCL × .9
14 - 31           ENTER
15 - 31           ENTER
16 - 61           ×
17 - 4            4
18 - 61           ×
19 - 32           CHS
20 - 3            3
21 - 51           +
22 - 61           ×
23 - 31           ENTER
24 - 31           ENTER
25 - 61           ×
26 - 32           CHS
27 - 1            1
28 - 51           +
29 - 24 21        √x
30 - 25 7 00      GTO 00
31 - 25 6         x=0
32 - 25 7 00      GTO 00
33 - 31           ENTER
34 - 61           ×
35 - 24 71        1/x
36 - 1            1
37 - 41           −
38 - 25 6         x=0
39 - 25 7 98      GTO 98
40 - 24 71        1/x
41 - 25 7 47      GTO 47
42 - 31           ENTER
43 - 61           ×
44 - 24 71        1/x
45 - 1            1
46 - 41           −
47 - 24 21        √x
48 - 25 6         x=0
49 - 25 7 00      GTO 00
50 - 1            1
51 - 33           x≷y
52 - 25 5         x≤y
53 - 25 7 56      GTO 56
54 - 24 71        1/x
55 - 9            9
56 - 0            0
57 - 21 9         STO 9
58 - 25 33        R↓
59 - 24 71        1/x
60 - 21 73 9      STO .9
61 - 31           ENTER
62 - 61           ×
63 - 51           +
64 - 24 21        √x
65 - 86 41 9      RCL − .9
66 - 21 73 9      STO .9
67 - 31           ENTER
68 - 61           ×
69 - 31           ENTER
70 - 31           ENTER
71 - 31           ENTER
72 - 86 61 5      RCL × .5
73 - 86 41 4      RCL − .4
74 - 61           ×
75 - 86 51 3      RCL + .3
76 - 61           ×
77 - 86 41 2      RCL − .2
78 - 61           ×
79 - 86 51 1      RCL + .1
80 - 61           ×
81 - 3            3
82 - 24 71        1/x
83 - 41           −
84 - 61           ×
85 - 1            1
86 - 51           +
87 - 86 61 9      RCL × .9
88 - 8            8
89 - 25 12        12÷
90 - 61           ×
91 - 86 71 0      RCL ÷ .0
92 - 22 9         RCL 9
93 - 25 6         x=0
94 - 33           x≷y
95 - 33           x≷y
96 - 41           −
97 - 25 7 00      GTO 00
98 - 9            9
99 - 0            0

------------------------------------

R.0: 5.8177641733144E-03
R.1: 0.199999779
R.2: 0.142841665
R.3: 1.107161127E-01
R.4: 0.086263068
R.5: 0.05051923
R.6: 3.281837579E-08
R.7: 5.5538386E-14
R.8: -4.4502E-20

Angles in DEGREES

-90 =< x <= 90

R/S    --> cos(x)
x<>y   --> sin(x)
x<>y / --> tan(x)

GTO 31 R/S --> asin(x)
GTO 42 R/S --> acos(x)
GTO 48 R/S --> atan(x)

------------------------------------------

Constants:

5.817764173E-03 ENTER
3.144E-13 + STO .0

0.199999779 STO .1
0.142841665 STO .2
1.107161127E-01 STO .3
0.086263068 STO .4
0.05051923 STO .5

3.281837579E-08 STO .6
5.5538386E-14 STO .7
-4.4502E-20 STO .9

------------------------------------------

Trigononometric Functions:

Enter angles in degrees, -90 =< x <= 90

R/S => cos(x)
x<>y => sin(x)
x<>y / => tan(x)


Inverse Trigonometric Functions:

GTO 35 R/S => arcsin(x)
GTO 44 R/S => arccos(x)
GTO 50 R/S => arctan(x)

------------------------------------------

0.0001 R/S --> 1.000000000 ; cos(0.0001)
x<>y --> 1.745329252E-06 ; sin(0.0001)
/ --> 1.745329252E-06 ; tan(0.0001)

0.9999 GTO 31 R/S --> 89.18960856 ; asin(0.9999)
0.9999 GTO 42 R/S --> 0.8102914371 ; acos(0.9999)
0.9999 GTO 48 R/S --> 44.99713507 ; atan(0.9999)


Other examples:

sin(0.01) = 1.745329243E-04
cos(0.01) = 0.9999999848
tan(0.01) = 1.745329270E-04

sin(30) = 0.5000000000
cos(30) = 0.8660254038
tan(30) = 0.5773502692

sin(60) = 0.500000000(1)
cos(60) = 0.866025403(7)
tan(60) = 1.73205080(7)

sin(89.99) = 0.9999999848
cos(89.99) = 1.7453(38006)E-4
tan(89.99) = 5729.5(49127)

sin(89.9999) = 1.000000000
cos(89.9999) = 1.74(6171960)E-6
tan(89.9999) = 572(681.2838)

asin(0) = 0.000000000
acos(0) = Error 0
atan(0) = 0.000000000

asin(1) = 90.00000000
acos(1) = 0.000000000
atan(1) = 45.00000000

asin(1E10) = 90.00000000

atan(0.4142135624) = 22.50000000

acos(0.8660254038) = 30.00000000

atan(50) = 88.85423716

------------------------------------------

Forensic result:

9 R/S x<>y R/S R/S / GTO 48 R/S GTO 42 R/S GTO 31 R/S --> 9.000000275

------------------------------------------

Edited to fix a couple of typos (two constants inside the code box).