+- HP Forums (https://www.hpmuseum.org/forum)
+-- Forum: HP Software Libraries (/forum-10.html)
+--- Forum: General Software Library (/forum-13.html)
+--- Thread: (42S) Quickie RPN Routines (/thread-12800.html)
(42S) Quickie RPN Routines - Eddie W. Shore - 04-13-2019 02:14 PM
http://edspi31415.blogspot.com/2019/04/quickie-rpn-routines-hp-42s-dm42-free-42.html
X, Y refer to their respective stacks and their values
1 + 1 /( 3^(2*X)) + 1/(5^(2*X))
Routine A:
(Labels are omitted for these exercises)
2
*
ENTER
ENTER
3
X <> Y
Y ↑X
1 / X
X <> Y
5
X <> Y
Y ↑ X
1 / X
+
1
+
END
Routine B:
2
*
+ / -
3
X <> Y
Y ↑ X
LAST X
5
X <> Y
Y ↑ X
+
1
+
END
Examples:
X: 2.0000, Result: 1.0139
X: 3.1666, Result: 1.0010
(X + Y)*(X^2 + Y^2)
Routine A:
ENTER
X ↑ 2
R ↓
X <> Y
+
LAST X
X ↑ 2
R ↑
+
*
END
Routine B:
STO ST Z
X ↑ 2
X <> Y
STO + ST Z
X ↑ 2
+
*
END
Examples:
X: 4.0000, Y: 3.0000, Result: 175.0000
X: 2.7000, Y: 3.6000, Result: 127.5750
√(1 + X^2) / √(1 - X^2)
Routine A:
X ↑ 2
1
X <> Y
-
LAST X
1
+
X <> Y
÷
SQRT
END
Routine B:
X ↑ 2
ENTER
ENTER
1
STO + ST Z
STO - ST Y
R ↓
+ / -
÷
SQRT
END
Examples:
X: 0.5556, Result: 1.3759
X: 0.7278, Result: 1.8035
X / √(X^2 + Y^2)
Routine:
X ↑ 2
X <> Y
STO ST Z
X ↑ 2
+
SQRT
÷
END
Examples:
X: 0.5000, Y: 0.7500, Result: 0.5547
X: 1.8080, Y: 1.0220, Result: 0.8705
(X + Y) / (X * Y)
Routine A:
STO ST Z
X <> Y
STO + ST Z
*
÷
END
Routine B:
ENTER
R ↓
X <> Y
+
LAST X
R ↑
*
÷
END
Examples:
X: 5.0000, Y: 4.0000, Result: 0.4500
X: 2.9505, Y: 3.8181, Result: 0.6008
X^Y + Y^X
Routine A:
ENTER
R ↓
X <> Y
Y ↑ X
LAST X
R ↑
Y ↑ X
+
END
Routine B:
ENTER
R ↓
X <> Y
Y ↑ X
LAST X
R ↑
Y ↑ X
+
END
Examples:
X: 3.9050, Y: 2.7006, Result: 88.0041
X: 4.2650, Y: 4.8750, Result: 2036.6461