# HP -28S Manual Page 88

Define the function.
~
IHoP
IT]
P+R
IT] x
.OJ
G
P+R
IT]
y
I
ENTER
I
2:
(4.85~53.46)
1: «
~
X
~
'R~P(~~R(x)+
P~R(~")I
"
DDlIDl1IIIJIIIICIBIllD_
The closing parentheses and delimiters are added for you.
This program means: take two arguments from the stack (in RPN syn-
tax) or from the expression (in algebraic syntax) and call them
x
and
y;
then calculate the polar coordinates of the sum of the rectangular co-
ordinates of x and y.
Store the program in a variable PSUM.
~
PSUM
I
STO
I
3:
(13.1313,2.1313)
2:
(1.57,-1.32)
1:
(4.85,53.46)
DDlIDl1IIIJIIIICIBIllD_
Now use PSUM to repeat the previous calculation, once in RPN syn-
tax and once in algebraic syntax.
Enter the first distance and bearing.
IT]
2
Q
36
I
ENTER
I
' - ::3-: ------:(:-:-1-. =5=7-, --1. , . . . . . - -:3"' " ' 2 ". . , . . . , )
2:
(4.85,53.46)
1:
(2.1313,36.1313)
DDlIDl1IIIJIIIICIBIllD_
Enter the second distance and bearing.
IT]
3
Q
65
2:
(4.85,53.46)
1:
(2.1313,36.1313)
Execute PSUM.
I
USER
I
PSUM
(3,650
DDlIDl1IIIJIIIICIBIllD_
3:
(1.57,-1.32)
2:
(4.85,53.46)
1:
(4.85,53.46)
1ImI . . . . . .
ImIlI_
6: Complex-Number Functions
87