Displays X.
Calculates
second
value
of
X.
Calculates
X = C 4-
AX.
Stores
second
value
of
X.
Displays X.
Goes
back
for
a
new
case.
054.0,
A04D
Defines the beginning of the imaginary
computation routine.
Q30
VIEW.X
Q31
RCL tr
Q32
RCL*
fl
Q33
RCL*
X
Q34
STO
X
Q35
VIEW
X
Q36
GTO
Q
Bytes
and
Checksum:
101
LBL
I
102
ABS
103
SQRT
104
2
105
RCLx
fl
106
*
107
STO
I
108
RCL
B
109
+/-
110
LASTx
111
*
112
STO
R
113
RCL
I
114
RCL
R
115
VIEW
R
116
VIEW
I
117
GTO
Q
Bytes
and
Checksum:
Calculates
absolute
value
of
V(B2
-
4AQ
-5-2A.
Stores the imaginary part.
Retrieves
2A.
Stores the real
part
in R.
Retrieves the imaginary part of X.
Retrieves the real part of
X.
Displays the real part.
Displays the imaginary part.
Goes
back
for
a
new
case.
025.5,
DA3B
Flags Used:
Flag
0 is used to
remember
the signof
(—B).
If
(—B)
is
negative, then flag 0 is set.
Flag
0 is tested later in the
program
to
assure
that the first real root computed is the one of largest absolute
value.
If
(—B)
is negative
(flag
0 is
set),
then the routinesubtracts the
square
rootof the
discriminant
from
(—B).
If
(—B)
is
positive
(flag
0 is
clear),
then
the
routine
adds
the
square root.
12:
Mathematics
Programs
193
To Next Page
Loading...
