14_FP15T2 14 FP15T2

14_FP15T2 14_FP15T2

User Manual: 14_FP15T2

Open the PDF directly: View PDF PDF.
Page Count: 80

C)
o
PAGE:
1
FP1~T~
SRC
()
I 0
0
0
0
(10000
R
'~vJ0~?00
A
vJ0vHIJ1
R kH;)0000 A
00002
R
000vJ~0
A
0
0~HH13
R
00(1~kJ(o
A
vJ0004 R
vHJ00~2
R
00005
R
0vJ0ro~2
R
0
00006
R
0620~1
A
0kH107 R
652462
A
000l.0
f~
~J00200
A
0
00011
R A
0'~
02
0 R
0{iJ0000
A
0002~
R
00QH1v.)v,
A
0
00022
R
000v)00
A
00023
R 0000i()kj A
00024
R
~'0 vH~
0
V,
A
0
00025
R
000~H:)0
A
0(1)026 R
0vJ00~~'
A
00y.~27
R
000000
A
0
00030
R
000000
A
000~l
R
0U000k~
A
0
0
0
0
0
0
0
0
0
'FP15T2'
I~ST
MOD~bE
FOR
SYSTEM
EXERCISER
.TITLE
'Fr~5T~'
T~ST
MODU~E
FOR
SYSTEM
EXERCIS~R
,EBREL 0
0
IVERS
ION{jo
A °
ICOPYR1GHT
SEPT,
~2,
1971
IDIGITA~
EQUI~~ENT
CO~~ORATIQN,
MAYNARD
MASS.
01754
IPROGRAMMER:
~AR~-~,
~OUS~
I
I
ITHIS
PROGRAM
IS
D~SI~NED
AS
A
RANDOM
FP15
IN~TRUCTION
EXERCISER
IFQR
THE
FP15
E~OATIN~
potNT
PROCESSOR,
I
I
USERSW
0
I~OAD
AS
A
'CP'
MODU~E.
'1
vJ
o
,DSA
,DSA
.StxBI
200
~BhOCK
7
SYSERR
v)
o
~RGODE
'1
o
o
o
o
o
o
o
I
(~JECI
S£RVICE;
INIT
-
'f.Pl~T2'
/DATA
SWITCH
l0
INHIBITS
TEST,
IERROR
INDICATOR
fOR
MONITQR.
..
_-
---
----
--
-- --
.-.
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
PAGE
~
FP1,T2
SRC
00001~J
A
000020
A
0vJ0000 A
C500040 A
0001?J0 A
0fQ0~0fD
A
000400
A
001
~~f~
A
0030vJf1 A
0~)360k)
A
71200'1 A
7154v)~j
A
715600 A
001~0v)
A
Q1f120kH)
A
0024kHrJ A
0060k?0
A
0074~~J
A
710~y}~
A
710100 A
7132~0
A
7166k11 A
7166~2
A
716~'~3
A
716604
A
7;1.6~~~
A
7166:l.F) A
71662k
j A
0064~0
A
717300 A
717200 A
7103:1,4 A
'F
P15T2'
T~ST
MOD~~E
rOR
SYSTEM
EX~RCISER
ITO
STORE
ADDR;SSES
JNTO
~XEGUTIVE
AT
bOAD
rINg
IDEFl.NITIONS
FOR
EXERCISER
UR~10
- -
IUNROUNDED
UN~20
IUNNORMA~I~ED
Vu$3~
IUNNORMAhIt~O/UNROUNDEO
FL;40
IFbOAT~NG
DP;100
IDQU8~E
PRECISION
IM?200
11MME.DlATE
$U8;40~
ISUBTRACT
RSUB;1
0
00
IR~VERSE
SUBTRACT
~D;300~
IBAsIC
FP
~OAD
ST;lMl3400
ISTORE
IMM~OIATE
OV;7b2~00
/BASIC
DIVIDE
~Jt~715400
IbOAD
JUMP
EXIT
REGISTER
SJ~s7~'600
ISToRE
JUMP
ExtT
R~GISTER
MUb;l400 IBASIC
MU~TIPLY
OIV;g000
IBASIC
DIVIDE
RDIV~2~00
IBASIC
REV~RSE
DIVIDE
ADDs6000
IBASIC
ADD
OP6T09;7400
IOPCOUE
6
TO
9
MASK
ORR=.7~~000
IOIAGNOSTIC
READ
R~GlSTERS
OSR;710100
/PJAGNOSTIQ
ST~P
AND
READ
REGlSTERS
fNt1;;'71~25C~
INORMAl.I~e:-
FMA
CASIGN)
EPA
<
B~A;716601
ISRANCH
IF
FMA
~ERO
8MA;716602
IBRANCH
IF
FMA
NEGATIV~
BL~~116603
IBRANCH
IF
FMA
<
OR
= 0
8PA;1~~604
IBRANCH
IF
FHA
POSlTIVE
BRU;716606
IBRANCH
UNCONDITIONAL
8NA;11~610
IBRANCH
If
FMA
NONe2ERQ
SAC;71~620
IBRANCH
IF
qUARe
BIT
J5
SeT
UR;6400
IBAsIC
BRANCH
DM~;717300
IDIAGNOSTIC
MAINTENANCE
MODE
ON
OMF;717200
/PIAGNOSTIC
MAtNTENANtE
MODE
OfF
FPT;71~314
IF~OATING
POINT
T~ST
.EJECT
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
------~----.
---
..
---
.
0
0
PAGE
FP1~T?
SRC
0
00032
fi 00vJ0v)0 A
0
00~63
R 7kj7"164 A
0~Hi)34
R
2kHa~32
R
000J5
R
'J4
00
S2
R
0
00036
R 1400t:!0 R
00037
R
140Y.)t:!~
R
160040 Ii
140022
R
0
0001~
R
777f;J~Qj
A
00042
R
v}40545
R
0 0kH643 R
776~0.0
A
00044
R
vj40~~o
R
00045
R
77740(~
A
00046
f~
044Sbl
R
0 100047 H
l~HJ~S~
R
000e;>0 R
10426!5
R
0eH~j51
R
71vJ~14
A
0 00052 R
6r~4266
R
00053
R
204~/2
R
00054
R
0400-;3
R
()
00055
H 777'1
;j
(,j
A
000:>6 R
0445~5
R
00057
H
204~7~3
R
0 130.060 R 044='13 R
000~~
R
6042~6
R
0
0
0
00062
R
\Q0tt.HH10
A
0 0v)v)63 R 7
077
24 A
00f'164
R
750eHD4
A
00065
R
5~J00i0
R
0
00v.H,6
R
7402~0
A
00067
H
604256
R
00070
R
7154kHJ
A
00v.j71 R
fJ(14!5'14
R
0
00072
R
620(073
R
00073
R
000000
A
0
0
0
0
0
'PP15T2 1
TEST
MOD~~E
FOR
SYSTEM
EXERCISER
IINITIALltE
THE
'~Pl~r2'
TEST,
INIT I
o
EBA
bAC
DAC
D7!M
OZM
D2M
b
AW
OAC
kAW
PAC
6A~J
DAC
Jt-'1S
Ji',1S
fPT
J~1P
6AC
PAC
LAW
DAC
k,A.C
DAC
J~1P
I
I
I
I
I
I
tNIT
SERVJ9
E
SYSER~
SYSERH~l
EROOOE
~i000-
K~"100
~200ki
Kt~000
"400 -
RATIO
FPRAN
H9~DS~
~HROR~
(fPEXER
D§TSW~
~~0
-
PASCNT
(/20000
PGMLOP-
EXITM~
IC~~AR
THE
ERROR
~OCATIONSt
IINITIALl~E
OP~COOE
BUPFER,
ICHECK
FOR
THE
HO~O
SWITCH.
IT~ST
FOR
THE
FP15
IPP15
Is
NOT
OUT
THERE;
ISET
UP
DISTRIBUTION
SWITCH,
ISTART
THE
T£::5T,
IS~RVICE
ENTRANC~
FOR
THE
fp~5T2.
I
~ERVICE
0
ESA
LAS
AND
S2A
J~1P
l",JE:
(XJEA)
JMPu
DSTSW0
0
I
.EJECT
115
TH~
HObO
SWITCH
SET?
E:XITt~!:;;
.,.
. IYf,:S,
r:XIT
,
I~OAD
THE
'JEA'
REGISTER.
PSTSW~
IPROGRAM
DISTRIBUTION
LOCATION,
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
---.
--.--~-~---~------~~---.----'--."-
---~
--
-----
--
--~-
-------
---------
-
-------_._------_.-
---
---
--
-~--------
--
--
----------
---
---
--_._----
-
----~----
-~-~--------------
-
---------
o
'0
PAGE
4
FP1~T~
o
00~)74
H
140540
00~J75
R
140;;3~
00076
R
1405~1
o
00077
R
1405,s7
00100
R 140542
00101 R
140543
210102 R 140544
o
00:1.03 R
224547
o
00~"'4
R
044~S2
vJ0105
r~
444:>47
00106
R
224~~2
0(Q107 R
kj40~27
o
00;110
R
:1.005~7
00111
R
101'~9.
001~2
R
2005~7
o
00113
H
504!;)75
00114
R
544576
00115
r~
61910.53
00116
R 544517
o
00117 R 60;1,040
o
00120
R
544~~0
0k?121
r~
60104,
0012~
R
5446~i
o
00123
R
6010~2
00124
R
544602
00:1.25 H
601057
o
00126
R
60:1.0~~
o
00127
R
200527
00130
t~
504~~3
o 00131 R
544604
00132
R
6vJ01~2
00133
R
2~14~v.J~
001:54
R
Qj403!:>~
00135
R 2yJ46yj6
o
00136
R
D4022~
o
001.37
R
2v)46~7
vH:J140
R
040~~0
0014:1, R
600163
00142
R
200527
00143
R
5n4610
o
00144
R
544604
00145
R
600i~5
00146
f:t
204~ll
o
00147
R
0403~2
001e;0
R
20
4212
00:l.~:t
R
f')40225
o
00:t~~
R 20461:5
o
00153
R
0403,0
00:1,54 H
60vJl~3
o
o
SRG
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
R
f~
R
R
R
R
R
R
R
R
'FP15T2'
T~ST
MOD~bE
FOR
SYSTEM
EXERCJSER
/FPU
EXERCISER
RANOOM
HARDWARE
OP~90DE
EXECUTIONER
FPEXER
D2M
DVRFbR
. .
D~M
OVRF~~
D~M
UNDFbN·
[)
t
~1
U N d F b
~
D~M
DVByrJ0
07!M
OVRFbX
02M
IOV8Y0
LAC~
AUTOAG
IRANDOM
OPERATION
OAC
AORESS#
1St
AUTORG
~AC*
AORESS
[JAG
OPCOlJ~
JMS
RANoAt
IG~NERATE
RANDOM
NUMBERS.
JMS
IFRESt
IINTE~ER
FbOATING
RESTRICTIONS
FOR
RANDEX
bAC
OP90Q~
ANO
(OP6TQ9)
SAD
(APO) .
JMP
FPPAUq
ISOFTWARE
,."ADDITION
SAD
(SUB)
JMP
F~PSUB
1,,~@SUBTRA9TION
SAO
(MUl.,)·
JMP
FP~Au~
1,.,.MUbTIPLICATION
SAD
(PIV)'
JMP
F~PPIV
I,
~"DIVISION
SAD
(RSUB)
JMP
PPPRS~
l,t,.REVERSE
SUBTRACTJON
jMP
F~PRO~
/,,~.REVERSE
DIVIStON
ISOFTWARE
COMPU~ATtONS
COMP~ET~~**~O*ouo**.*o**
I*o**o*******~~o*i***i********o***o************
IINITIALJ~E
FPU
HARDWARE
QPERATIONAb
BOoKEgPING
FPUXAl
hAC
OPCOO~
AND
(EC)
~
SAD
(CAb>
JMP
PPUXA2
/INT~GER
QPERATINOS
l..AC
(%ANSH~)
OAC
FPANSR
hAC
(%XFAC1)
DAe
FPPMA-
13
OR
~
WORD
XfER
F~OATING
FMA
hAC
(%XHAC;l.)
CAe
F~~MB-
lAND
fLOATING
PMB
.JMP
FPQXA3
PPUXA2
~AC
O~aOD~
AND
(UP)
".
SAO
(CA~)
J~1P
FPl)X2A
hAG
(%ANSR~)
DAC
FPANSR
l..AC
(%XFAC2)
DAe
F~FMA-
/2
OR
1
WORD
XfER
INTEGER
FMA
LAC
(i!XHAg~)
DAC
FPFMB
IANp
INTEGER
FMS
JMP
FPOXA~
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
Cj
()
PAGE
5
FP1~T~
SRC
I
()
00155
R
204614
R
00156
r~
(i}40~~2
R
00157
R
2~J46i5
R.
k10160
f~
040225
R
0016~
R
20461~
R
00162
R
vJ40~~0
R
o
o
001.63
R
200527
R
00164
H
504~l'1
R
00165
R 34462v) H
o vJ01§6 R
~344621
R
~10~67
R
040224
R
00170
R
200527
R
001'/~
R
504622
R
o
00172
R
344623
R
00173
R
0403~1
H
o
0K)174
R
504624
R
00175
R
344625
R
0KJl76
R
0402i'ki
R
o
00177
R
10:1.5~~
R
002(10
R
101~~;j
f~
o
o
o
00201
R
204~~1
R
00202
R
7401~r1
A
0VJ203 R
777400
A
00204
R yj445§;l, R
00205
R
1042~~
R
00206
R
444~45
R
o 0020"1 R
6002J.6
R
00210
R
104252
R
0fc12l~
R
7777,s0
A
o
00212
R
'iJ44~4:;
R
'10213
R
4445~6
R
0VJ214
R
741~0t?j
A
o
00215
R
6042~1
R
0{1)216
F~
141462
R
00217
H
141~,j~
R
o
00220
R
141436
f~
0022~
R
141~~0
R
00222
t~
200224
R
o
00223
R
044:'?5
R
00224
R
000kH!0
A
00225
R 0000kH!? A
o
o
o
o
o
'PP15T2'
TEST
MOO~~E
POR
SYSTEM
EXERCISER
FPUX?A
hAC
(%ANSH~)
DAC
F'PANSH
bAC
(%XF'AC3)
PAC
FPFt1A-
hAC
(%XHAC3)
DAC
FPfMS-
.
FPUXA3
LAC
O~~OD~
AND
(71k}367>
TAD
CUR)
--
.
TAr)
(~D)
DAC
FPUt,P
L,AC
OPCOPE:
AND
(770'J,
77)
TAP
(ST)
.
13?00
IAbWAYS
IMM~OIATE
/AkWAYS
URlUN
DAC
FPUST
AND
(~OU~l)
TA.D
(URlUN)
DAC
CF'PUST
Jt~S
IFREst
Jt"1S
DPFRES
ISOFTWAR~
OPE~~T'ONS
20MP~~TEO
AND
ADDRESSES
RESERVED
I
I V 1 A H A R 0
vJ
ARE
9 Q M P
l)
T E
THE
f.
P U
FUN
C T
ION
IN"
0 P
COO
E "
1-·
IINITIALltE
HARDWARE
TO
SOFTWARE
EXECUTION
RATIO
40.0
TO
1
bAC
RATlt)~
S~1
A
~A
~~
OAC
F'P~OQP
Jt~S
lSi!
JMP
J~1S
I.,AW
OAC
lS~
SKP
J~1P
Oz::M
Dr-
M
DlM
Dt,M
I,.,AC
OAC
PPUl.,O
CAb
FPFMA
CAL
~4~H1
RATIO
HObDSW
PASCNT
.7 -
, .
PCNEXT
'!I!S~
-
PASCNT
P~M~OP
EXITM4
XJEA
"-
XJEAtiI~
xjtA+4
XJEA+6
PPULJ)-
FfAlb~~
,EJECT
ICH~CK
FOR
TH~
HOLD
SWITCH,
IEXIT
',.,5' I
ITYPE
'DONE:'
IMODIFIED
TO
CONTAIN
HARDWARE
~OAD
UR+QPCOOE',
•• ,ETC.
IMODIFIED
TO
CONTAIN
AODRESS
%XFAC~
OR
%XEAC2
.
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
-..
----.---.~.-
,'"
J
\........
o
0 o
PAGE
6
FPlt?T~
SRC
'PP15T2 f
TEST
MOD~kE
FOR
SYSTEM
EXERCISER
0 IIF' DPI
OR
OPF
AND
MANTISS
=
400000
000000
IHARDWARE
vJI
LC
STQHE
AS
000000
000000
0022('
R 2("21527 R
l,.AC
OrCaDE:
o
0
00227
R
5':i49;J.'~
R
AND
(OP)
0023~)
R 5446:t,fLl R
SAD
(9
P)
0kJ2~1
R 741000 A
SKP
o
0
00232
R
600247
H
J.
t'1
P
CFPl)
ISINGLE
PREClSloN
00233
R 20051;5 R
t.,AC
%XF'AC3
o
0
0
00234
R
7402'~0
A St A
00235
R
6002~7
F~
JMP
CFPU
IF'MA
LOvJ
NOT
..
000000
00236
R
200514
R
~AC
%XFAC2
0Qj2~7
R
544~2~
R
SAO
(q~0000)
00240
R
140'14
H
DiM
%XF,AC2
IfMA
HIGH
...
400000
AND
FMA
","OW
:::;
000000-
00241
R
200520
R
bAC
%XHAcj
o
o
00242
R 7402160 A
S~A
0
0
0
0
00243
R
600247
R
J~1P
CFfU
00244
R
200~i7
R
bAC
%XHAC2
00245
R
544626
R
SAD
(~~0~~0)
00246
R
140~1.7
H
DtM
%XHACi:?
IIF
FL.OATING
AND
~1ANTISSAS
= 0
Cl:.EAR
EXPONENT
%XPAC1
FOR
COMPARISON
lIN
CTE:ST~
f3UPPY
BROT~E:R
~H9247
R
2C~0527
R CFPl)
hAC
OPCOPE
0025121
R
504627
H
AND
(QP:f~)
0025\
R
54460~5
R
SAD
(
~
b )
00252
R 74100"-' A S
~<p
ISPP
00253
R
6002~3
R
JMP
,+l0
IPPF
o
o.
o
o
0
00254
R
2005l.~
R
L,AC
%XFAC~
0~255
R
5046~~j
R
AND
(777000)
00256
R
54fJ::>14
R
SAD
%XFAC~
o
002,7
74020k)
-
"-
. .
R A
S~A
0
00260
R
600262
R
Jt1P
,+2
0026~
R
1405i3
R
DtM
%Xf:AC~
IMANTISSA
,.
0
"'
o
0
00262
R
6'ij02~kj
R
J~1P
.1f,e
00263
R
200514
H
~AC
%XFAC2
002f,;4 R 540:;'15 R
SAO
%X[AC~
00265
R 74020,:? A
S?!A
o
0
00266
R
7410~0
A
s~<p
o
QH4267
R
140513
R
Or.M
%XFACl
0 ,EJECr-
-.
o
0 o
0 o
0 o
0 o
0 o
0 o
o
()
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
PAGE
I
FP1~T~
SRC
0027r~J
R
v.1~HHH1k')
A
00271
R
400652
R
0~272
R
7777'77
A
00273
R
044;J~4
R
00274
R
20yj527
R
00275
R
5'-'J4~?'1
R
002'16
R
5446U4
R
00277
R
741@~0
A
003~0
R 6010304 R
00301
R
200,i5
R
00302
R
544626
R
00303
R
600J5;,s
R
003'~4
f~
2014~2
R
00305
R 7402vJ0 A
v)0306 R
6015~2
R
00307
R
20j.4.s4
R
003:1,vj
R
74
v
J200
A
003~l
R
6~':l.5@2
R
003;1.2 R
2014~6
R
0~)3l3
r~
7402kHJ
A
00314
R
6015~2
R
00315
R
20144k1
R
00316
R
74020VJ
A
00317
R
601502
R
00320
R
200,34
R
00321
R
544~~1
R
00322
B
741000
A
00323
R
604~S7~J
R
00324
R
200~35
R
00325
R
5442
6l R
0v.;326 R 7410U0 A
0032'1 R
604~70
R
00330
R
200;>i3
R
0033:1. R
540~~1
H
00332
R 7 41
kH~k'
A
0~33..s
H
604~l'Q
R
00334
R 20'1;>15 R
0k)335
R
540;'.s~
R
00336
R 741000 A
00337
R
6043;'1
R
v.J0340 R
2~)0514
R
0034~
R
5405~2
R
0vJ342 R 74:1.0U0 A
00343
R
6046"(0
R
0~344
R
144554
R
'PP15T2'
T~ST
MOD~kE
POR
SYSTEM
EX~RCISER
ICONFIRM
LOAD/STOR~",UR".FUNCTIONS
PROPERLY
CFPUST
CAb
1ST
ORE
UR:UN
FPANSR'40~00~
IINDIRECT
FPAN$R
INO
JEA
EXCEPTI6~8
SHOULD
HAVE
OCC0RREO
I
_....
,..
..
IM1GHT
LOOK
LIKE
REDUNDANT
CHECKING
BUT
1T
ISN'T
ISOFTWARE
MIG~T
E~PECT
A
JEA
FUNCTION
BUT
THAT
FUNCTION
SHOULD
NOT
OCCUR
HERE
I
...
..
.
-.
-
IEXC~PT
IF
SIN~~E
PR~2ISI0N
INTEGER
AND
FMA
= 400000
THEN
EXPECT
OVERF~OW
#30
bAW
el
DAC
COMPbP#
6AC
OPCQDE.
AND
(OPlf~)
SAD
(CAl.,)
SKP
-
J~1P
CT~STkl
~AC
%XFAC3
SAD
(4~vH100)
!.H1P
TPRT·
~.
IE::XPECT
OVE:RFL,OW
#30
01E.5T0
kAC
X~;A
S~A
JMP
XfkOW
IUNEXPECTED
OV~RF~OW
~AC
X~~A+'?
StA
JMP
XE~OW
tUNEXPECTED
UNOERF~OW
~AC
X~~A+1
St
A
JMP
Xf~OW
IUNEXPECTED
ABNORMAL
DIVISION
bAG
XJ;A+~
S2A
JMP
X[bOW
IUN~XPECTEP
ILbEGA~
MEM
REPERENCE
~AC
%NAl
SAD
(~1)
SKP
J~1P
ERROR~
l~AC
%NA2
.
SAD
(~~)
SKP
..IMP
ERRQR!")
CTESTl
~AC
%~FAC~
SAD
%ANSk;
S~<p
JMP
~RROR?
IEXPONENT
FA!~URE
LOAD/STORE
CTEST3
~AC
%XFACj
SAD
%ANSR3
SKP
JMP
ERROR~
IFMA
FAI~URE
~OAa/$TOR~
CT~ST2
bAC
%XFAC2
SAD
%ANSR~
SKP
JMP
ERROR~
/FHA
FAlbURE
~OAO/STOR~
D~~1
COMPbD
,EJECT
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
()
(J
PAGE
8
FP:l.5T~
0
00345
f~
20vJ5c7 R
00346
R
vJ4(~~S~7
R
0034'1
R
740040
A
0
00350
R
ej000~0
A
0035l,
R 0(1)00'9 0 A
0
003S2
R
~i000{D0
A
00353
R
2014~2
R
0
~10354
R
7402~0
A
00355
R
600361
R
00356
R
200~10
R
0
00357
R
7~020V,J
A
00360
R
601~40
R
00361
R
2C~)0!;)32
R
0 100362 R
74020kJ
A
00363
R
601'42
R
00364
R
('0543
20 R
0
00365
R
740200
A
00366
F~
601!,>44 R
00367
R
201~~4
R
0
00310
R 7402,?kJ A
0kl371 R
600400
R
0~3'l2
R
200541.
R
0
00373
R 740200 A
0YJ374 R
60~512
R
0~375
R
2fH'J5~'1
R
0
00376
R
740200
A
00377
R
601'~0
R
00400
R
2014j6
R
0
00401
R
74~3200
A
00402
R
600~il
R
00403
R
200~~2
R
0
00404
R
740~00
A
00405
H
6015~2
R
00406
H
200544
R
C)
00407
R
7402~0
A
0041~j
R
6015~4
R
0
0
0
0
0
0
0
SRq
'FP15T2'
TEST
MOOY~E
FOR
SYSTEM
EX~RCISER
hAC
OPgOf')E
DAC
.+~
XX
FPFt~8
CAb
IA~L.
OPE:RATION~
FPl,)ST
CAb
IMOOlflEO
TO
CONTAIN
ADDRESS
%XHACl
OR
%XHAC2
COMPbETED
AND
SAVED
IN
2'S
COMP
COMPARE
RESU~TS
-
. -
IMODIFIED
TO
CONTAIN
HARDWARE
STORE
••
~~,ETC,
FPANSR
CAL
IHARPWAR£
OPERATIONS
TPRT
~AC
XJEA
..
SeA
,.
Jt~P
TPRT~
l.AC
OVRFk,H
S7!A
Jt··1P
ElNT;l.l
l"AC
OVRfb~
StA
J
~1
P
t:
I N T
;l.
~
LAC
OVRFl..X
St,A
~H1P
EINT30
TPRT~
bAC
X~~A~2
S2A
Jf'1P
TPRT~
~AC
UNQFbN
S7!A
J~·1P
EINl13
hAC
uN9F~;
St
A
Jt¥1P
E 1
NT~4
TPRT2
LAC
xJ~A+'~
S~A
J~1p
TEST~
bAC
OV8y~~
S2A
JMP
EINT1'
I~AC
lqVBY~
S2A
Jt~P
E I
NT3!:;>
,EJECT
IMOOlFIED
TO
CONTAIN
AODRESS
%ANSRl
OR
%ANSR2
20MP~~TE~CHECK
FOR
UNOCC~RED
BUT
EXPECTED
JEA
EXCEPTIONS
IOVERFLOW
EXPECTED.,.
I., ,ETC
II"BUT
NONE
OCCUREO
1,,!A8NQRMAL
DIVISION
EXPECTED
BUT
NONE
ogCURED
I,I,INTEGER
DIVISION
BY
tERQ
EXPECTED
aUT
NONE
OCCURED
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
-~----
------
---
~-
--
----
--
0
0
PAGE
9
FP1~r~
SRe
0 004:1..1 R
20~j5J~
R
00412
R
34vl~40
H
004;1,3
~(
340~4t
R
()
004;1,4 R
340537
R
004;1.5 H
34(~54~
R
100416 R
3405~Z
R
0
00417
R
340544
R
0k1420 R
7402Uf:1
A
00421
I~
600443
R
0
00422
R
2037~~
R
00423
R
540~01
R
00424
R 74:1.000 A
0
0042=>
R
:t004~6
R
100426 R
203706
R
100427 R
540533
R
0
00430
R
741000
A
0~4~l
R
1001~q
R
004~2
R 2037kJ5 R
0 100433 R
540532
R
00434
R
600441
R
00435
R
100436
R
0
00436
F~
0000~10
A
00437
R
104332
R
00440
R
600444
R
0
0044l
R
444~~1
R
00442
R
600205
R
100443 R
10:1.~~5
R
0
00444
R
104205
f~
00445
R
20454'l
R
0
00446
R
544~:S2
R
~J0447
R
7410~19
A
004~0
R
600074
H
0
0
0
0
0
0
0
0
0
'FP15T2'
T~ST
MOP~~E
FOR
SYSTEM
EXERCISER
TEST;!,
~AC
TAO
TAD
TAD
TAD
TAO
TAD
S2A
OVRFbJ.
OVRFbR
UNDPbN
UNDfl,.l
OVRFbX
OVSY00
19VBY~
Jr'1P
FPAl..~OK+~
bAC
%EAC~
SAD
%ANSRl.
SKP
JMS
FPERROR
TEST~
~AC
%FAC~
SAD
%ANSR~
SKP
Jt~S
TEST2
bAC
SAO
J~1P
J~1S
FPERROR
GAb
FPERRQR
%FAC2
'
%ANSR2
FPALLOK
F~;RRcjR
Jt~S
ERROH2
JMP
FPABO~~T
FPA~~OK
IS~
RA!IO
J~~p
FPbOOP
JMS
TF8RA
IEXP~CTED
INTERRUPT
EXCEPTION
OCCUREP·~
I~NORE
RESULT
/SOFTWARE
RESU~T
IHARf)WARE
RE:SUt.,
T
/~PA
RESU~T
WRONG
ISOFTWARE'RESUbT
IHARDWARE
RESlJl~
T
IFMA
(~OW
ORDER)
RESU~T
WRONG
/SOFTWARE
RESUbT
IHAROWARE
RESUbT
IFMA
(HIGH
ORDER)
RESU~T
WRONG
/JMS
IS
FOR
OIAGNOSTI~
AID,
BOY,
IRATIO
QPERATjONS
COM~kETE
PPA80RT
JMS
HO~USW
ICHECK
FOR
HOLD
SWITCH.
~AC
AUTOfiG
SAD
CAEOPCQB
S~<P
.~
~
JMP
P~~XER
.EJECT
lEND
OF
OP~COD~
BUFFER?
IY~S,
RESET
TA8~E
'
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
PAGE
1'1
FP:J.~T~
0
00451
R
440:'~~
00452
R
600455
00453
R
101776
0
00454
R
600505
00455
R 440;)45
004,6
R
600505
0
0(i)4~7
R
777~00
00460
R
fj405~5
0046:1.
R 2vJ4663
0
00462
R
~J44547
00463
R 7777').6
00464
R
vJ44?5l
0
00465
R
104~i5
00466
R 504664
0046'7
R
fj40~~r~
0
004'lC;J
R
344~35
0k1~71
R
7401Y:JC1
0047~
R
600465
0
0047~
H
204~~~
00474
R
~340560
00475
R 7411,¥,?
0
00476
R
60046,
00477
R
200~~0
00500
R
064,47
0
00501
R 444547
00502
R 7401000
00503
R
444~5i
0
00504
R
600465
00505
~~
20463J
00506
R
f~j445~7
0
0v)5~7
R
6'100/4
0
0
0
0
0
0
0
0
0
SRC
R
R
R
H
R
R
A
F<
R
R
A
R
~~
R
H
R
A
R
R
R
A
R
R
R
R
A
R
R
R
R
R
'FP15T2'
T~ST
MQOYkE
FOR
SYSTEM
EXERCISER
lSi:
KT2f4'4VJ
JI'~P
I+'~---
~)MS
INITAC)R
.JMP
r-EXIT
lSi:
K~000
JMP
FE
X i'r
I"AW
~;~VJ~~
[JAC
K100y,?
hAC
(AOPCQBF)
DAC
AUTORG
bAW
t!t62
-
DAC
T£MP2
bOOPl
JMS
RANG~N
AND
(31777)
13~K
[JAC
TEMP
-
TAD
C;SOP9DB,.,;)
S~1A
~Jt1P
!...OOP~
bAC
(edpCOSF~l)
TAP
T~MP··
..
SPA
Jt1P
~OOP;1,
hAC
TEMP
OAC*
AUTOHG
152
AUTORG
i~op
-.
- -
IS2
TE:MP2
J~'1P
kOOPl
FEXIT
kAC
(AOP~UBF)
PAC
AYTORG,
I.H1P
fPEXEH
,ElJEej
~
-
['
U
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
0
PAGE
11
FP1:>T~
0 0051,0 R
0vH~00'~
A
(~0511
R
9)00000
A
00512
R
(~frj0~v.?0
A
0
00513
R 000v.H)0. A
00514
R
QH~00~0
A
00515
R
0(iJQHH)'~
A
0 00516 R
v)00000
A
00517 R
vJ
0v.HJ00
A
00520
R
000000
A
0
00521
R
000(iJ~0
A
100522 R
0rj0000
A
v)fo
523
R
00000~;;
A
0
00524
R
fHH.HHJ0
A
00525
R
kH)0000
A
00526
R (100VJ00 A
0
00527
R
0kHJvJkl0
A
00530
R
0005j0
R
0
00531
R
000000
A
0053Z
R 0000kHD A
1210533
R
f100000
A
0
00534
R 777777 A
vJ0535 R 7777?7 A
00536
R
000000
A
0
005~
'7
R 0fH!J000 A
00540
R
0':)0000
A
0054~
R
000000
A
0
00542
R D0fH10fJ A
00543
R
kJ000@0
A
00544
R
0rQ00~v)
A
0 0YJ545 R 7770.'00 A
00546
R 7'/60vJ0 A
0
0
0
0
0
0
0
0
0
$RC
'fP15T2'
TEST
MOD~LE
POR
SYSTEM
EXERCISER
FAC~OC
0
ESGLOC
(1
EXPb.-OC
0
%XFAC1
0
%XFAC2
0
%XPAG3
0
%XHAC1
0
%XHAC2
0
%XHAC3
0
AC1LOC
12'
AC~l..OC
0
AC~~OC
0
OIVSW
0
RSW
(1
F'PACTV
0
OPCOOe:
V)
TEMP
.OSA
TEMP
IRESULTANT
HAAbwAR~
%ANSRl
0
%ANSR2
vJ
%ANSR3
(()
%NAl
bAW
~l
%NA2
~AvJ
~1
OVRFbJ.
0
UNPFb1
0
OVRFbR
0
UNOFb,N
0
OV8Y00
v.J
OVRF~X
0
1[)V8Y0
0
Kl~00
~AW";~0~
KT~000
hAW
~2~~0
t
EJEct~"
"
ITEMPORARY
ISOFTWARE
IFMA
IT~MPORARY
ISOFTWARE
IFM8
/%XfAC1,
%XHAC~
I%XFAC2,
%XHAC2
I%XFAC~,
%XHAC3
ITEMPORARY
STORAGE
CAkCUL.ATIONS
IEXPONENT
.,.
WORD
1
DPF
AND
SPF
tWORO
2
OPE
AND
SPF
WORD
1 OPl
IWORD
3
DPF
WORD
2
DPI
WORD
1
SPI
tERROR
IF;
WORD
3
WHEN
OPI
OR
WORD
I~RROR
IF~
WORD
3
WHEN
SPI
IEXPONENT
OVERrLOW
IEXPONENO
UNDERF~OW
IOVERF~OW
VIA
ROUNDING
tUNOE.RF~OW
VIA
NORMA~ltlNG
tAaNORMA~
DIVIDE
.
/INT~GER
OVERFbOW
IINT~~ER
PIVISION
BY
~~RO
o
o
0
0
0
0
0
0
0
2
WHEN
SPI
0
0
0 I
0
()
0
0
0
0
0
0
0
0
--_.-
---
-
_.-
--
- - -
_.
---
--
-_
..
-_.-
--
-
-- --
-
---
---
---
--
-.-
.-
- - -
---
--
.
0
0
PAGE
12
FP1~T~
SRC
0
00547
R
0046.~4
R
00550
R
e104Q04
R
0
0055:1.
R
0v)4~04
R
00552
R
~104604
R
0055~
R
'J£i4604
R
0
00554
R
t104604
R
0k15~5
R
004604
R
00556
H
004~04
R
0
00557
R
0049~1
R
00560
H
004604
R
00561
R
0k'4~Q4
R
0
005~~
R
004604
R
100563 R
f)046~~
R
0~5~4
R
004604
R
0
00565
R
004~~4
R
0~1566
R
004604
R
0
0
0
0
0 210567 R
vj00~67
R
0057vJ
H
104~i5
R
0
0f)57:l
R
040513
R
005"12 R
104515
R
00573
R
vJ40~14
R
0 0v.'574 R
lvJ45l5
R
00575
R
04fJ515
R
00576
R
104515
R
0
00577
H
040~l6
R
00600
R
104515
R
0(1601
R
04051'7
R
0
006k'2
R
104~15
R
00603
R
04052(1
R
0~604
R
2(10527
R
0
006~5
R 504:>'75 R
00606
R
544600
R
00607
R
6002~~.?
R
0
00610
R
54460l
R
00611
F~
620567
R
00612
R
544607
R
0
00613
R
6~0~~'1
R
0
0
'FP15T2'
I~ST
MOP~kE
FOR
SYSTEM
EXERClSER
IO~AGNOSTIC
REGISTER
REGADR
tOSA
(CAb)
,[)SA
<CAb)
.DSA
(CAb)
~UFFER
FIL.LED
FRO~1
"ORR"
.
IBMB
00",17
ISTATlJS
ISTA00
ISTA01
ISTA02
ISTA~3
ISTA04
ISTA05
ISTA06
ISTA~7
ISTA08
ISTA09
ISTAl0
ISTA~l
,OSA
<gAb)
.OSA
(9A~j
anSA
~9Ah~
tDSA
(CAb)
tDSA
(CAb)
,DSA(gAb)
tOSA
~9A~~
.OSA
(9Ab)
,OSA
~9Ah~
,OSA
(t;Ab)
.OSA
~9AI~)
,rJSA (gAl..)
IOSA
!9Ak)
REGISTER
~0~11
.~
_.....
-'
..
/STA;1,2~17
RANDAT
,DSA
RANDAT
J~1S
RANGEN
DAC
%XF"ACl
JMS
RANGEN
bAC
%XfAG2
Jr'1S
RANGEN
OAC
%XF'AQ~
~H1S
RANGEN
DAC
%XHACi
J~'1S
RANGEN
DAC
%XHAC~
JMS
RANGEN
DAC
%XHAC~
kAC
OPQQPE
AND
(OP6T09)
SAD
(MUL)
Jt>'lP
RANOTl
SAD
(DIV)"
JMP*
RANDAT
SAD
(ROIV)
~,JMP*
RANOAT
,EJECT
18MB
18~35
ISC
12~17
AND
IR
06"17
I
E:P
A
fH~hd.
7
IA
SI~N
AND
FMA
01"17
IF'r~A
18~35
IEPB
00~:1.7
18
SIGN
AND
PMS
01~17
IPMS
18t-35
/8
SIGN
AND
FMQ
1"17
IPt'1Q
18e'135
/ADD~R
00!'!!~7
IA(JOER
18~~:'
IJ;A
00!'l1l7
ISTA
00~17
(SEE
8E~OW)
IAR
00~,,7
BIT
EXP~ANATlON
/fP~5
BUSY
Ir~TCH
CYCbE
lOP
AND
CYCk;:
IE:XP
CYC~E
IPIJN
CYCLE
/NQR
CYCL.E
IWRITE
CYCb~
IJNTl
IINT2
lTJME
STATE
1
ITIHE
STATE
2
ITIME:
STATE
3
IOIAG
INST
REG
12~17
IDIVISIQN
~
EXIT
IDIVISION
"
EXIT
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
-_
...
-
...
-
--
0
0
PAGE
1~
FP1~T?
0
00614
R
200516
R
00615
R
50464~
R
0
00616
R
3405~~
R
0061"/
R
0405i6
R
00620
R
2!2HJ527
R
0
00621
R
504610
H
00622
R
544610
R
00623
F~
620~67
R
0
00624
R
200516
R
00625
R
504641
H
00626
R
~j40~i6
R
0
00627
R
6205~7
R
0 0k1630 H
20052'1
R
006jl
R
50462l
R
00632
R
544604
R
0
00633
F~
741'1v)0 A
00634
R
600644
R
00635
R
2005~5
R
0
~J0636
R
504642
R
00637
H
0405i5
R
00640
R 20052v) R
0
00641
R
504642
H
00642
Vi
040~20
R
00643
R
620~67
R
0
00644
H
544610
R
00645 R
741k1i10
A
00646
R 620S&', R
0
00647
H 2005;4 R
00650
H
504642
R
00651.
R
040514
R
0 006:>2 R
200~;\?
R
00653
R
50464~
R
00654
R
040,17
R
0
00655
R
620~?7
R
0
0
0
0
0
0
0
-~
SRe
'FP15T2'
T;ST
MOD~bE
fOR
SYSTEM
EXERCISER
IAODITION
AND
§UBTRACIION
MASKS
~AC
%XHAGl
iND
(37)·
,
IOOU8~E
PRECISION
TAD
%XFACl
DAC
%XHACi
t
..
AC
OPCQDE
AND
(9
P) -
SAD
(OP)
Jt1P':;
RANOA,
~AC
%XHACl
~ND
(~7)·
.
ISING~E
PRECISION
r)AC
%XHACl
Jt4P*
RANDAl
ITO
MASK
WHEN
OPCODE
IS
INTEGER
MULTIPkY
TO
~ESSEN
OVERFLOWS
lAND
INCREASE
l.NTE:GER"OPEHArlON
RANDTl
kAC
OP90
D
;
AND
CDPlFl.,)
SAD
(CAL.)·
SKP
..
,
J~1P
RANfJT
2
bAC
%XFAC~
ISINGLE
PRECISION
INT~GER
AND
(1'/T7)
OAC
%XF-
AcJ
~AC
%X~fAt3
AND
(;~7'1)
DAC
%XHAC3
J
f-1
P *
RAN
PAT
RANDT2
SAO
(OP)
SKP
".
JMP*
RANPAT
hAC
%XFA92
IOOUBLE
PRECISION
INT~GER
AND
(i/(r/)
DAC
%XF'AC2
L.:AC
%XHACg
AND
(177'1)
DAC
%X~iAC2
~H1P*
HANoAr
.EJEct
o
o
01
o
o
o
o
o
o
o
o
o
o
o
o
o
o
0,
o
o
o
c'
--
------
_ .. -_ .. -
_._------
--
----
-
--
-
_._-_
...
-
_.
-
---
--_.
_.-
-
---
--
--
--
--
---
----
--~
-- --
---
---_.
-_
.•
-
-.-
._-
-
----
_
..
---
---
-_.- -
---
---
_.-
----
--
_.-
--
-
----
-- -
--
--- - --
--
-
--
--
---
----
--
._--
-
_.-
--
-
--
-
--
~
--- ..
_--
_.-
---
._-
---
--
~
----_.-
-----
-
--
-
--
-_._-
--
---------
-- --
--
-_._-_
..
_._.
()
0
i 0 0
PAGE
14
FP1~T~
SRC
'fP15T2'
T~ST
MOD~bE
FOR
SYSTEM
EXERCIS£H
0 IF6 0
ATJNG
POINT
HANDO~
OP,,900E
SUFFER
SETUP
AND
RANDOM
"R"
PRIMEH
0
0Y;'J656
R
000000
A
FPRAN
0
006,7
R
2(~46~3
R
bAC
(AOPCIJBF)
0
00660
R kJ44547 R
PAC
AUT(JRG
/8E;GINNING
OF
8UFFE:R
0
00661
R
6~~j~~2
R
~JMP*
,_
..
PPRAN
ILEGAL
Fb()ATlN~
p61N~I
OPERATIONS
TO
OATE
0 I 0
I~,
•• SUBTRACT.!.,
0 I 0
00662
R
710~~~
A
OPODBP
7:t0~0~
IlSS
ISPl
00663
R
7l~J5~(a
A
7l050~
lESS
IOPJ
00664
R
710~1(1
A
710~4~
IPse ISPF
0
00665
R
7;l,04:HJ
A
710~5~
/URFSB
SPF
UR
0
00666
R 71.012 0 A
7:1.046~
IUNFSB
ISPF
UN
0066'1 R
710470
A
710.~7@
IUUFSB
ISPF
UR
UN
0 00671:' R
71v;5~0
A
710540
IOS8
IOPF
0
0067;1
R
7~0:;~t~
A
71.0~5~
IURDS8
IDPf
UR
00672
R
710~~'Q
A
71056~
IUNDS8
IOPF
UN
0
00673
R
71vj5?vJ
A
71,057~
IIJUDSB
IDPF
UP
UN
0
I
0
I',
... , R
~
V E R S E
~UBTHACT!".
0
I
00674
R
711~v~0
A
71l00~
IIRS ISPI
0({)675
R 7111")0 A
71110~
IERS
IDPl
0
00676
R 71101'1 A
711Vj4~
/fRS
ISPF 0
00677
R
711v)!";>0
A
71:1J!l5~
IURFRS
ISPf
UR
00700
R
711060
A
711060
IUNFRS
ISPF
UN
0
00701
R
71,1Y.J7v)
A
711~7~
IUUF'RS
ISPF
UR
UN
0
00702
R
711i1o
A
71114~
IORS
IDPP
0070~S
R
7111~Y)
A
~111150
IUHORS
IOPf
UR
0
00704
R 711120 A 71116@ I\JNORS
IOPP
UN
0
00705
R
7111~~
A
71117~
IUUORS
/QPf
UR
UN
/
0
/;.~tMULTIPbY,!!,
0
I
00706
H
711~~'~
A
711~0~
lIMP
ISPl
0
00707
R
7115~0
A
71150~
IEMP
IOPI
0
0071,0
R
711~1vJ
A 711440
IPMp
ISPF
00711
R
711~~~
A
71145~
IURFMP
/SPF
UR
0
00712
R
711460
A
71146k'
IUNFNP
/SPF
UN
0
0¥)'l~3
R 711470 A
711470
/UUFMP
ISPF
UR
UN
00714
R
711540
A
71154~
I(J~1P
IOPF'
0
00715
R 711550 A
71l55~
IURDMP
IOPF
UR
0
007;1,6 R 7115
§0
A
71l56~
IlJNDMP
IDPF
IJN
0071'7
R
7115'10
A
71157~
IUUDMP
IDPF'
UR
UN
0
,EJECT
0
0 0
0 0
0 0
0 0
o 0 I
I
0
PAGE
15
rpl~T?
SRC
'FP15T2'
T;51'
t"IO()YkE
FOR
SYSTEM
EXERCISEr<
C)
I
~
, , t D J V I
OE
,
~
, , 0
I
00720
R
712~~~
A
712~0~
IIOV
ISPl
0072~
R
712100
A
7121.0~
I~PV
lOP!
0Q)722
R
7;t20~~
A
71204~
/FOV
ISPF
o 0
210723
R
73.20'0
A
7:t205~
ItJRFDV
/SPF
UR
00724 R
712110
A
71214~
IODV
IDPF
00725
R
7121~r.~
A
71215~
IURDDV
IDPf
UR
o 0
I
I,',
! I
REVERSE
9
IV
J
DE
~
,
••
o 0
I
00726
R
7121Y:'~
A
7:1.2~0~
IIRO
ISPI
00727
R
7;1.2:>00
A
71250~
IERD
IDPl
007~vJ
R
712~~~j
A
712~4@
IFRD
ISPF
0073~
R
7;1.24?0
A
7j,,2~5~
IURFRD
ISPF
UR
00732
R 712 5
10
A
71254~
lORD
IDfF
o
o
0
0
00733
R
712~~0
A
7l,255~
IURDRD
IDfF
UR
I
1,.,.AODITION"!t
o 0
I
00'734
R
7160~10
A
716~00
IlAD
ISPl
00735 R
7;1.61~~
A
716100
lEAD
IOPl
00736
R 7l.604Q) A
71604~
IFAD
/SPF
o 0
00737
R 71.60:5W A
71605~
/lJRFAD
ISPF'
lJR
100740 R
7160~r~
A
716060
IUNFAD
ISPF
UN
00741
R
7160./k'
A
7:t6VJ7~
IUUFAfJ
ISPF
UR
UN
00742
R
716i~t1
A
7;t614~
lOAD
IDPF
00743
R
7~61~'~'
A
71615~
/LJRDAD
IOPF
UR
00744
R
7161~'!)
A
71
6
16@
Il)NDAD
IDPF
UN
00745 R
7161,7ej
A
E.OPCPB
7;t.617~
/UUOAD
IOPF:.
UR
UN
00746
R
0kH~H!J64
A
EOPCDB~OPCOBF+l
o
o
o
0
0
0
0YH~J0~2
A
AXKX=EOPCDB~OP~P~E~l
IFROM
THIS
TABkE
OF
AOORESSES
THE
FPU
OPERATIONS
ITHIS
TABL,E
WI~L
BE
S2
RA
MBI",ED
EVERY
10(1-'0
PASSES
lAND
RESET
TO
,.
T
Hr:
t~ISIING
EVERY
20@0
pASSf:S
o
Wl~L
BE
8~ED
0
o
.EJECT
0
o 0
o 0
o 0
o 0
10
0
o 0
o
C'
.....
-
....
--
-
...
---
0
0
PAGE
1~
FP1~T~
0 0074"1 R
0v)0o?2
00750
H
~10066.s
0
00751
R
kH106Q4
00752
R
f;)006~5
00753
R
000666
0
00754
R
000661
00755
R
KH106
'Iv)
00756
R
vJ00?'~1
0
00757
R
0006'12
~J0760
R
0~0673
0~7~~
R
0006'i4
0
0~j762
R
0006'1~
00763
R
0VJ0~'/6.
00764
R
yJ'~JV"
~
7 7
0
00765
R
000700
00766
R
fJ007~1
0~767
R
0v)Q)7'P2
0
00770
R
~10070j
007'71 R
000'10
il
00772
R
~J001vj5
0
00773
R
000706
00774
R
0007~7
00775
R
vJ0071v.)
0
007'76
R
000"/11
00777
R 0007:1,2
01000
R 000"113
0
01vHL~
R
0007:l4
01002
R
0007;15
0;1003
R
000716
0
01004
R
eH10'lij
01005
R
0")0720
01~J06
R
000'l~1
0
01007
R
0007t!2
01vJ10 R 0100723
01vJll
R
(100724
0
01012
R
(100725
010:1.3 R
000726
01014
R
000727
0
01015
R
0VJ07~0
01016
R
0007~i
01017
R 0007..52
0
01020
R
000733
0102~
R
0007J4
01022
R
0007~~
0
01023
R
0007J6
01024
R
00073'/
01025
R
0007~v)
0
01026
R
0k'07~1
01027
R 0'10742
010~0
R
C;j0vr143
0
01034,
R
(:H)0744
01032
R
vJVJ07~5
0
0
SRC
R
R
R
~~
R
R
*R
R
~.
R
R
{t
R
R
*R
R
*R
R
*R
R
~R
R
*R
R
*R
R
*R
H
~R
R
*R
R
~R
R
*R
R
~R
R
i~
R
R
~R
R
~·R
R
*R
R
~R
R
~R
R
*R
R
~tR
R
*R
R
*R
R
-ItR
R
"tR
R
{~R
R
*R
R
*R
R
*R
R
*R
R
~R
R
*R
R
~·R
R
*R
R
*R
R
~~
R
R
{lR
R
*R
R
*R
H
~·R
R
nR
R
*R
R
*R
R
~H
R
*R
R
nR
R
'PP15r2'
TEST
MOO~bE
FOR
SYSTEM
EXERCISER
AQPCDBF
OPCOBF
,REPT"-AXKX,l
OPCOBEIt'l .
AEOPCDf3
EopeDS
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
(=) 0
0 0
PAGE
:1,7
FP1~T~
SRQ
'FP15T2'
TEST
MO(J~LnE
POR
SYSTEM
EXERCISER
0
1****oADOITJON*****
0
I
01~33
R
200~27
R
rPPADD
~AC
OP9QD~
0
0i0~4
R
504o~0
R
ANO
(DP)
0
01035
R
544~i0
r~
SAD
(DP)
01036
H
60:L~~1
R
JMP
D~[I,Aq
IPOUShE
PRECISION
FbOATING
AND
INGEGER
ADO
0
010~7
R
60110;;
R
JMP
SP~~AIJ
ISING
AND
lNTEGERl.,E
PRECISION
FL,OATING
ADO
0
I
0
l*o***SUBTRACI1ON****~
0
I
01040
R
200527
R
fPPSIJ8
L,AC
OPCQUE,:
01041
R
504~lyj
R
AND
(DP)
0 01042 R
544~l0
R
SAO
(UP) 0
01043
R
60l0'l3
R
J~1P
DP~l.~B
IDOUBLE
PRECISloN
f~OATING
ANO
INTEGER
SUBTRACT
0104 4 R
6yJ11~7
R
Jt4P
SPf~SB
ISING
AND
~NTEGER~e:
PRECISION
F'l..OATING
SUBTRACT
0 I 0
1*****MULTtPLI9ATIQN*****
"
.,
I
0
01
015 R
200527
R
FPPMUl.
hAC
OPCODE
0
01046
R
5046lvJ
R
AND
(Df
~
..
01017 R
5446.~0
R
SAD
(
[)
P )
0
01050
R
601015
R
JM.P
DPF'LMl
..
IOOUSLE
PR
E9ISIoN
F~OATING
AND
INTEGER
MU~TIPL.Y
0
01051
R
6011~1
R
J~1P
SP~LML
ISING
AND
INTEGERL.C
PRECISION
PL.OATING
MU~TIPLY
0
l*oo~*PIVISION***o*
0
I
01052
R
200527
R fPPDJV
~AC
ope
oDE
01053
R
504610
R
AND
(UP)
~.
0
01054
R 5446.3.0 R
SAD
(OP)
0
01055
R
6~lY)17
R
~H~P
D~E~OV
IDOU6LE
PRECISION
F~OATING
AN()
JNTE:GER
OIVIDE
vJ1056
R
601i13
R
JMP
S~f'~DV
ISING
AND
INTEGERl..E
PREcISION
Pl..OATING
OIVIDf:
0 I 0
I*~~***REVERSE
§lJ8IRACIIONn~u**
I
0
01057
R
200~27
R
FPPRSB
hAC
OP~OD~
0
01060
R
504610
R
AND
(OP)
01061
R
5446i~j
R
SAD
(ljp)
0
01062
R
601i01
R
JMP
DPF'L,RS
IpOU8hE
PREOISION
FLOATING
ANO
INTEGER
HEYERSE
SlJ8TRACTlON
0
010q3
R
6011i.~
R
Jt'1P
S~EL.RS
ISlNG
AND
INTEGERI.-E
PRECISXON
FL.OATING
REVERSE
SUBTRACTION
I
0
I~~**{~*REVERSE
OlV.l.SION,i;**o*
0
I
01064
R
2~H?)527
R
FPPROV
l~A
0
OPCQDE
0
01065
R
5~)46;t,0
R
AND
( D
P)
--
0
01066
R 544610 R
SAD
(UP)
01067
R
601l~3
R
Jt·1P
DPF~RD
IOOU8L.E
PRECISION
PLOATING
AND
INTEGER
REVERSE
DIVISION
0
01070
R
601117
H
Jt~P
S~fbRq
ISING
AND
JNTEGER~E
PRECISlO
N
PLOATING
R~~ERSE
DIVISlON
0
,EJECT
0 0
0 0
0 0
0 0
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
PAGE
18
o
07:1,
R
750~~0
A
o
0/2
R
601~l1
R
01073
R
204~~3
R
0l0'l4
R
601.2l~
R
01075
R
2f
l46
11
R
01076
R
60~211
R
01077
R
2046~5
R
011~0
R
601211
R
01101
R
2vJ4~~6
R
01102
R 6012;1,4 R
0110J
R
2049~7
R
01104
R 601211, R
'PP15T2'
T~ST
MO[)~~E
FOR
SYSTEM
EXERClSEH
ISOFTWARE
OIR~9TOR
OF
DOU8~E
PRECISION
FLOATING
AND
INTEGER",
I
ISOFTWARE:
MANIlSSA PR;V
IOU~L
Y
LOADED
BY
"D~AC"
I
I,,~ADOITION
I
OPFL.AD
CLA
\JMP
DPF~~E~
I
I
.'
, , S
lJ
8 T
HAC
T I 9 N
I
f)pFL,SE3
!,AC
(1)
Jt~P
D~E~EX
I
1",MUbTIPblCAIION
I
OPFLML
l..AC
(2)
Jr.1P
O~f~EX
I
I
'.
t 0 I V I S ION
I
PPF~PV
bAC
(3)
JMP
D~f.k,EX
I
1~'fREVERSE S~BTRAGT19N
I
DpFL,RS
~AC
(4)
J~1P
D~t~E0
I
I;.,REVERSE
D~VlS~ON
I
OPFLHD
~AC
(:;)
J~1P
D~f.LE.X
I
I
I
I
I
I
,EJECT
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
(j
o
()
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
PAGE;
19
FP1~T~
SRC
01105
R
2046~0
R
01106
R
6012~~
R
01107
R
2046~1
R
01110
R
60121~!
R
01;1.11 R
204~2r~
R
01112
R
60l2~~
R
011;1.3 R
2~j4~~2
R
01114
R
6012~4
R
0111'
R
204§~3.
R
01116 R
6012~4
R
01117
R
204~~1
R
0i120
R
60~2~~
R
'PPl5T2'
T~ST
MOOYbE
FOR
SYSTEM
EXERCISER
ISOFTWARE
PIR~gTOR
OF
SING
AND
INTE~ERbE
PRECISION
F~OATING!t,
I
ISOFTWARE:
MANI1SSA
PR~VIOUSL.Y
kOADEO
BY
"FbAC"
I
l'~
!
ADD
I T
ION
I
SPF~AD
L'3AC
(6)
JMP
S~[L,~X
I
1,.!SlJf:3TRACTION
I
SPFLSB
I..AC
("I)
,
JMP
S~~~E.X
I
I
'.
M
tJ
bTl P b leA !
ION
I
SPFLMl~
l.AC
(1"-')
J~1P
SPFLEX
I
I',' , ! 0 I V I S
ION
I
SPF~OV
kAC
(11)
Jt4P
S~f.~E;X
I
I;,!REVERSE
S~8TRACTlqN
I
SPFkRS
bAC
(l~l
JMP
SP[l"r:
X
I
I,,!REVERSE
DJVISlON
I
SPfLRO
LAC
(13)
J,MP
SPf:L~X
I
I
I
I
I
I
I ,
EJECT
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
__
.
_____
__
..
___
._
-
__
._
-
__
.
___
••
__
•.
_____
____
-
_.
__
_________
- -
__
- -
______
••
___
-
~
______
- -
____
.
_______
- "
__
_._
-
___
-
_____
- -
____
-
_____
••
__________
- - -
__
-------
~
- -
____
~
- - -
_______
~
-
~_.
_________
- -
_._
- -
______
----
__
- - - - - - - -
__
- - - -
__
~
- - -
__
" _
.•
___
0-
_____________
._
••.
__
PAGE:
20
FP1~T~
SRC
0112l
H
204~63
R
01122 R
041i~!)
R
01123
R 103722 R
01124
R
000~;1.4
R
01,125 R
~)(H?JVJ00
A
01126
R
000~i6
R
01.127
R
200527
R
01130
R 504!:)15 H
0113l
R
544600
R
01132
R
741000
A
01133
R
601i~7
R
01134
R
200~47
R
01135
R
504610
R
01136
R
5446~0
R
0113"
R
601143
R
01140
R
203?~l
R
0114~
f~
74vJ2~)0
A
0i14~
R 44054;,s R
01143
R
2k'37~,
R
0;1.1~4
R
7402~H1
A
(~1145
H
44(~5~3
R
01146
R
2037~6
R
01147
R
740200.
A
12'1150 R 44054;S R
0115~
R
2037kl7
R
01152
R 74402(1) A
01.153 R
043705
R
011~4
R
204~~5
R
01155
R 74002vJ A
01156
R
043706
R
'PP15T2 f
TEST
MODYbE
FOR
SYSTEM
EXERCISER
ISING~E
AND
DOUBbE
PRgCISION
INTEGER
SOFTWARE
EXECUTIONER
OPIEX
bAC
SOFTEX
PAC
odlEX'
JMS
oLAe
I~OAO
3
RANUOM
WORDS
;OSA
~XFAC~
lAND
F~OAT
IF
INTEGER
OOIEX
CA~
- -
,DSA
%XHACl,
lnAG
OPCOD~
AND
(OP'~T09)
SAP
(M~~)
SKP
J~1P
DPIEXl
IOPERATION
IS"JNTtGER
MU~TIP~Y
IMUST
SWAP
AND
'SHlFT
ONE
RIGHT
BECAUSE
OF
sOFTWARE
FINISH
POINT
IMY
FMQ
=
%FAd~
ANa
%FAC3
WITH
THE
HlGH
ORD~R
BITS
IIF
%FAC2
OR
%FAC~
NOT
=
0,
+1
TO
OVRFbX
IIF
;
@,
SWAP'~FA~2,
~
WITH
%FAC4,
~A
LAC
OPCQOE
AND
«jp>
M
SAD
(OP)
JMP
,~4
LAC
%EAC~
S7!A
IS2
OVRFl.,X
hAC
%FAC2
.
-
..
S2A
1 Si!
OVRF'hX
l"AC
%F~
Ac~
.
SeA
lSi!
OVRFbX
!.zAC
%F;
AC4
'
RCR
O.AC
%FAC2
bAC
%fAC4A
RAR
DAC
%fAC;S
,EJECT
G
01
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
(j
0
PAGE
21
FP1~T~
0 01157 R
203705
R
01160
R
543706
R
0
0116~
R
7402@Cj
A
01162
R
6012~v.'
H
01163
R
143~kJ4
R
0 01164 R
1437~7
R
01165
R
l4372;
R
0
01166
R
200544
R
011b7
R
741200
A
0
01170
R
600127
R
011'11 R 2005:1.5 R
0117~
R
7402t~0
A
0
01173
R 44054J R
01174 R
200520
R
01175 R
740200
A
0
01176
R
440543
H
011~7
R
600127
R
0
01200
R
1021~J2
R
01201
R 2vJ3721 R
01202
R
744100
A
0
01203
R
600127
R
01204
R
2037~~
R
01,205 R
740~S.1
A
0
01206
R
043706
R
0~207
R
2037~~
R
01210
R 741401 A
0
0l.21~
R
344643
R
0121~
R
043';/~'
R
01213
R 600i2'7 R
0
0
0
0
0
0
0
0
0
SRG
'FP15T2'
TEST
MOD~~E
FOR
SYSTEM
EXERCISER
IIF
RESU~T
IS
~ERO
~
~~EAR
EXPONENT
QPIEXl
LAC
%FAC~
,
SAD
%FAC3
SeA
-.
-
JMP
DPJEX2
D2M
%fACl
P2M
%FAC4
OtM
%E~I~N
IIF
INTEGER
DIVISION
~y
tERO
IS
EXPECTED
AND
THE
FMA
lS
NOT
00~000
ITHEN
EXPECT
OVERE~OW
#30
A~SO
WHEN
SPI
STORE
hAC
19VBY~
SNA
J~1P
FPUXA1
l,AC
%XFAC~
S2A
lS~
OVRF~X
18~CAUSE
%XFAC3
IS
NORMAbI2EO
IN
FPU
HARDWARE
L.AC
%XHAC~
S~A
IS2
OVRF6~
J~IP
FPUXAl
IC()MBINE
SlGN-el'r"~JITH
AC
PPIEX2
JMS
%FIX,
-
IFlx
BACK
TO
INTEGER
bAC
%E§I9N
St·1A
t CLl,
~Jr1P
FPUXAl
bAC
%~Aq~"
TCA
PAC
%fAC3
bAC
%FAC2
Cf"1A:
s~~
TAD
(1)'
DAC
%FAC2
JMP
FPUXAl
,EJEct
.-
.'
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
C)
0
PAGE
22
FP1~T~
0
01214
R 34143.5
01215
R
041226
0
01216
R
044
523
01217
R
200~2'1
01220
R
504603
0
0122:1,
R
544§04
01222
R
6011~1
01223
R 101 3
:10
0 0122'1 R
103722
01225
R
00051~S
01226
R 0G00k:J0
0
01227
R
010051.2
01230
R
20~$7~5
0
0123~
R
543706
01232
R 74020k1
01233
R
60:l,21°
C)
01234
R 14371d4
01235
R
1431~7
01236
R
14372l
0 01237 R 60012'7
0lr2~0
R
203721
0
0124~
R 3437105
0j,2~2
R
04370~
01243
R
6001~7
0
0
0
0
0
0
0
0
0
0
0
SRC
R
R
R
R
R
R
R
R
R
R
A
R
R
R
A
H
R
R
R
R
R
R
R
R
'FP15T2f
fEST
MOOY~E
fOR
SYSTEM
EXERCISER
IDOUBLE
PRECJS10N
F~OATING
SOFTWAR~
EXECUTIONER
DPFL~X
TAD
sbfcau
PAC
OOFEX'
OAC
SOFTI;Xft
l.AC
OPCQPE
AND
(Fb)
"
SAD
(CAL)
Jt'1P
DPtEX
J~1S
SOFI~R
Jt~S
QL.AC
DSA
%XFACl
.
'."
DOFEX
CA~
ISOFTWARE
CA~cULATlaN~
.DSA
%XHAC~
IIF
RESU~T
IS'2ER~
~
96EAR
EXPONENT
l,AC
%FAC4
SAD
%tAC
3
S2A
~JMP
1+'
o
i:M
%~~
AC1
Di;M
%EAG~
()~M
%~§I~N
JMP
FPUXAl
ICOMBIN~
SJGN
f~IT"t~ITH
AC
.
~AC
%~SIGN
-
TAD
%FAC2
[JAC
%fAC2
JMP
FPUXAl
ISOFTWARE
RESU~T
~EFT
IN
%FACl
TO
%FAC3
~EJEct'
;
(\
,--,,'
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
C)
()
o
o
o
o
("\
V
o
o
o
o
o
o
o
o
o
o
o
o
o
o
PAGE
23
01iZ44
01245
01 216
012~7
0l.2~0
01251,
01,252
0~253
01254
01255
01256
0;12,'1
01260
012~:l,
01g62
012~3
012~4
012~5
0;1,266
vJ126'1
01270
01271
0127~
01273
012,4
01275
01276
012'/7
01300
01301
01302
0;].303
01304
01305
01306
013~7
R
3414:l.~
R
R
041262
R
R
0445§3
R
R
200527
R
R
504603
R
R
5446~)3
R
R 601257 R
R
777772
A
R 344:>?S R
R
~j44~63
H
R
6k~112i
R
R
10131.0
R
R
104~7l
R
R
0QJ0~i3
F~
R
000000
A
R
000516
R
R
2037~5
R
R
5437~~
R
R
740200
A
R
6012i4
R
R
1437~4
R
R 143707 R
R
14372l
R
R
600127
R
R
203721
R
R
34370~
R
R 043705 R
R
2V.'37~1
R
R
5'~4655
R
R
043"~1
H
R
203706
R
R 5046S0 R
R
343704
R
R 'J43·,04 R
R
1437~h6
R
R 600127 R
o
'FP15T2'
T~ST
MOP~bE
FOR
SYSTEM
EXERCISER
I o
ISINGL.E
PRECISION
Pl.-DATING
SOFTWARE
EXECUTJONEH
I
$PF~EX
TAO
SOFCQ!J
DAC
SOF'EX
o
DAC
SOFiEX
bAC
OPCOPE
AND
(F
k)
--
o
SAD
(~b)
.)MP
t+~
LAW
~6
IBACK
UP
TAD
SOPTl;X
IPOINTER
FOR
DAC
SOFTEX
IDP
SOF
T
~~
ARE
JMP
DPIEX
lAND
GO
TO
INTEGER
o
o
~H1S
SOf.NR
~JMS
F~AC
o
,DSA
%XFACl
SQFE:X
.,
.,
ISOFTWARE
CAl..Cl.JLATlON~
CAb
.OSA
~XHAq~
o
IIF
RESU~T
IS
2ERO
.~
9kEAR
EXPONENT
bAG
%FAC2
SAD
%FAC3
o
StA
J~·1P
,1'?
DZM
%FAC~
DrM
%VAC4
o
o
i!t~
%E?IGN
J~1P
FPUXAl
o
ICOMSINE
SIGN
-SIT
.,
HIT~
AC
L.AC
%FSIGN
TAD
%FAC2
DAC
%FAC2
~AC
%FAC;:!'
ANO
(777)
()
DAC
%F'
AU;!.
leAC
%fAC3
AND
(7771400) o
TAD
%F"ACi-
DAC
%FAC:4
D2t'1
%f
AC;3
o
J~1P
FPUXAl
ISOFTWARE
RESUl,T
L~FT
IN
%FACl
TO
%FAC3
E.JEC!" " o
o
o
o
o
o
-... -..•
---
_
..
-C'
o
0 o
PAGE;
24
FP1~T~
SRC
'FP15j2'
I~ST
MOD~~E
POR
SYSTEM
EXERCISEH
0
ISOFTWARE
NORM
~.~
t
2~R
FOR
l,OAD
FUNCTlON
CONP
IRMA
T I
()N
o
01310
R
001~10
R
SOFNR
,()SA
,
0 013'-1 R 2v)V)527 R
L,AC
OPCOQE
01312
R
504515
R
AND
(OP6T09)
o
01313
R
544~~1
R
SAt)
( Q
tV)
0 01314 R 7410vJ0 A Sf(P
01315
R
544637
R
SAD
(HOlV)
01316
R
601.326
R
J~'1
P
SOF~
1 o
0 01317 R 2vJ052? H
1"AC
OPCOOE
vJ1320.
R 5046!?6 R
AND
(qN:r~)
o
0
01321
H
544~~4
R
SAD
(CAh)
01322
R 6213lro R JMP*
SOFNR
01323
R
504~::>'7
R
AND
<UN)
~
o
01324
R
5446~'1
R
SAD
(UN)
CI
01325
R 62;1.3i0 R
JMP*
SOPNR
01326
R
200~27
R SOFl
~AC
OPCQOE:
01327 R
504610
R
AND
(OP)
~
o
01330
R 5446i{rj R
SAP
(UP)
0
01331
R
601~~5
R
J~1P
SOF2
01332
R
2005i3
R
l.,AC
%Xf.A9+
o
0
0
01333
R
5046~')
R
AND
(?~7~~0)
01334
R
040515
R
DAC
%XFACJ
")1335 R
200514
R $OF2
~AC
%XfAC2
01336
R
50466kj
R
AND
(377777)
013;$7
R
5405~5
R
SAD
%xtAc~
0~~40
R
74~J20~'
A
S~A
o
o
0 01341 R
741~H~0
A
SKP
01342 R
621;Si0
R Jt4P*
SOFNR
01343 R 2005;1.4 R
~AC
%XFAC2
01344
R
5'J46~6
R
AND
(400000)
o
0
01345
R
043721
R
PAC
%FSIGN
01346
f~
2005;i.4 R
~AC
%XF~
AC2
01347
R
504660
R
AND
(37'7777)
o
0
0
0
01350
R
040514
R
DAC
%XFAC2
013'~
R
200:>14
R
PNXSA
bAC
%X~AC?
01352
R 50466i R
ANO
<hAC)
0;l,3~3
R
740200
A
S~A
013,4
R
601,405
H
•.
jt<1P
SOFNRX
01355
R
200~i5
R
~AC
%X~Aq~
01356
R
744010
A
RCh
013,7
R
040515
R
DAC
%XFAC~
o
o
0
01360
R
200~i4
R
LAC
%XFAC2
01361
R
740010
A
RAL
-
-,
01362
R
040~l4
R
OAC
%XFAC2
o
0
01363
R
200527
R
bAC
opcotn:
01,364 R
504~~~
R
AND
(OP)
..
01365
R
544(>10
R
SAD
(OP) o
0
01366
R
6011~1
R
Jt'.1P
SOFJ
.E.)EC! o
0 o
0 o
0 o
I
C)
()
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
PAGE
25
FPl~T~
SRC
01367 R
2005:1.3
R
01370
R
504~30
R
01371
R
040~~0
R
01372
R
2005i~
R
01373
R
504~~~
R
013-;4
R
34466;t
R
01375
R
504655
R
01376
R
3405~0
R
01377 R
040'~J
R
01400
R
6013~lR
01,40:1.
R
777777
A
0~402
R
3405+3
R
01403
R
040~J,,3
R
01404 R
601~Si
R
01405
R
200~~1
R
014~6
R
3437~1
R
01407
R
040514
R
01410
R
200527
R
01411
R 5046:1.0 R
01412
R
544604
R
01413
R
1405i~
R
01414 R
621Jlci
R
01415
R 121416. R
014;3.6
R
0040~5
R
01417 R
003711
R
01420
R fH'40v!0 R
01421
R
0040~5
R
01422 R
0040~2
R
01423
R
004~~~
R
01424
R
0041~5
R
01425 R
0041~l
R
01426
R
0041~0
R
01427 R
004173
R
01430
R
0042i0
R
014~1
R
004223
R
'FP15T2'
1EST
MOO~kE
FOR
SYSTEM
EXERCISER
LeAC
%XF"ACl
AND
(7
7
"10
0 0 )
DAC
TEMp··
-
bAC
%XFACl
AND
('177)"
TAD
(~i)
AND
(777)
TAO
TEMP
OAC
%XFACl
JMP
FNxsl\'
SOF'3
~AW
~l
TAD
%XFAGl
[JAC
%XFAQl
J.~1P
FNXSA"
~OFNRX
~AC
%X~AC2
TAD
%FSIC~N
PAC
%XFA02
L,AC
OPCQOE:
AND
(Of) -
SAD
(9
Al
..
)
DZM
%XFAC3
Jr,1P*
SOFNR
ISOFTWARE
CAl~U~AtlON
SUBROUTINES
/
SOFCQD
JMS{)
.+1
I
IDOUBLE
PR~Cl~lON
F~OATING
AND
SP
AND
OP
INTEGER
I
I
IPSA
DFAO
,DSA
DSl.JB
IPSA
DMPY
IPSA
rJOVD
,DSA
OStjf~
PSA
CHJVR
IADDITION
ISUBTRACTION
IMUhTIPLICATION
/Dl
V I S I
ON
IREVERSE
SUBTRACTION
IR~VERSE
DIVISION
ISINGLE
PRECI~lQN
FLOATING
I
IDSA
FAU
.DSA fSUti
IDSA
FMPY
IPSA
fDVO
.OSA
FSBH
.DSA
ED.VH
,EJECT
IAODITION
/SUBTRACTION
IMU
6
TIPLIC
A
TION
IDIVISION
IREvERSE
SUBTRACTION
/R;V~RSE
QIVISION
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
()
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
PAGE
26
FP~:>T~
SRO
01432
R
0000~i0
A
01.43~
R
6014~~
R
01434
R
000000
A
01435
R
6'314~4
R
01436 R
000000
A
01437
R
60142~
R
0144((J
R
k:1000'10
A
014~~
R
601~79.
R
01,
412 R 777777 A
01443
R
3414J2,R
01444
R
vj414~2
R
01445
R
(I)445(.),iJ
R
01.446 R
2005~0
R
01447 R
340~36
R
01450
R
340543
R
01451
R
750200
A
0i45~
R
621~j2
R
01453
R
601~~2
R
01454 R 777777 A
01455
R
34143~
R
01456
R
0414~4
R
01457
R
044!:>6vJ
R
01460
R
200541
R
01461 R
3405~7
R
01462
R
750200
A
0~4~3
R
6214~1
R
01464
R
601:S~2
H
'FP15T2 t
rEST
MOD~bE
FOR
SYSTEM
EXERCISER
IINTERRUPT
~XCEPTION
~XIT
ADDRESS
XJEA
0
_.--,.
JMP
OVELO
IOVER~~OW
o
JMP
UNELO
IUNOERF~OW
o
JMP
DVBY~
IA~NORMAb
DIVISION
BY
2ERQ
o
JMP
N~XMEM
Il~LEGAL
MEMORY
REFER~NCE
I
IOVe:RF'60
W
I
OVf~O
l,A~4
",:1,
TAD
XJEA
ID~CREMENT
RETURN
DAe
xJ~A
IPC
BY
ONE
lJAC
JEAOf~S#
bAC
OVRFhR
IPROM
RQUNP1NG
TAD
OVHF'bl
TAO
OVRFCX
Si:AlCLA"
.)
~1
P
{~
x
~
E A
I
IUNEXpECTED
HARDWARE
qVERFLOW;
I
I
+.
PROM
ROUNDlNG
I
2,
FROM
EXPONENT
VIA
MU~TIPLY
I
I
/UND~RF~OW
I
UNF~O
bAW
~1
TAD
XJf:A+2
DAC
xjEA+2
DAC
Jr:AURS
LAC
UNQF~~J
TAD
UNDF61
S~AICLA
..
JMP*
XJ~A~g
I
IO~TTO
If
ROM
NORMA~ItATIN
IUNO~RF~OW
EXPECTED
IUNEXPECTED
HARDWARE
~NQERF60W
I
I
3,
FROM
NORMA~ltATION
I
4,
PROM
EXPONENT
VI~
MU~TIPLY
I
JMP
Xf60
W
,EJECT
o
o
o
o
01
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
C)
o
()
o
PAGE
27
FP1=?T~
SRC
'PP15T2'
TEST
MOO~bE
FOR
SYSTEM
EXERCISER
o IDIVISION
BY
~ERO
o
I
0t4~5
R 777777 A
OVBY0
I~AW
",1
01466
H
341436
R
TAD
XjEA~4
014~7
H
0414~6
R
OAC
XJEA+4
014'10 R
044'60
R
OAC
JEAORS
01
o
0147~
R
2005~2
R
L..AC
DVSY00
01472
R
340544
R
TAD
IOV8y0
01473
R
750200
.A
S~A;C~A
-
014'14
R
6214~~
R
J~1P{~
XJEA+,4
I
A8NORMA~.
OlVISION
EXPE:CTEO
o
o
I
/UNEXPECTED
HARDHARE
ASNORMAh
DIVISION
I
o o
01475
R
6015~2
R
J~'1P
I
XEhO
W
o
IIL..LEGAl.
ME:MORY
RF;PER~NCED
o
I
v'J141'6
R
74CiJ04v)
A
NEXME:M
Hl,.
T
01477
R
6014'/6
R
Jt·1P
te+
01500
R
740~1~
A
TN~XMt~
HLT
01503, R
6015~0
R
J~~p
!~l.
0;1,502 R
2yj0,40
R
XFbOW
hAC
OVRFb~
015~3
R
544604
R
SAD
(9
A
h)
01504
R
601507
H
J~1P
.+~
0;1,505 R
204~~3
R
~AC
( 1 ) I ; ,
OVF;RfL.OW
FROM
ROtlNDING
01506
R 604;:S44 H JI1P
ERROR3
/UNEXPECTEO
JEA
BREAK
01507
R
200536
R
bAG
OVRPbl
544604
,
..
,i
~11510
R
r~
SAD
(OAk,)
0;l.51~
R
6015i4
R
Jt·1P
.+~
01512
R
204644
R
bAC
( 2 ) I
~t
EXPON;NT
OVEHFbO
W
015;1.3
R
604~~4
R
J~1P
ERROR3
01514
R
2~105~1
R
bAC
UNDPbN
01515
R
544~~4
R
SAD
(cAl.,)
.
01516
R
6015~1
R
J~IP
*3
t
__
o o
o o
o o
o o
o o
o o
01517 R
204~~5
R
~AC
( 3 ) I
~,
UNOERFkOW
Ff~O~1
NOR~1Ibli:AT1ON
01520
R
604344
R
J~1P
ERRQH3
0152l
R
2005~7
R
LAC
UNOFLl
544604
. "
...
"
..
01522
R R
SAD
(CAL)
o o
01523
R
601526
R
J~1P
.+~
01~24
R
204?~§
R
I"AC
( 4 ) I
~
.
EXPON;NT
UNOERFbOW
01525
R
604644
H
"H1P
ERROR6
01526
R
2vJ05~2
R
~AC
DVSY00
01527
R
544604
R
SAD
cgAl.,j-
015~0
R
601~33
R
Jt~P
.+~
015~1
H
2kj4~~7
R
bAC
(
!:)
) I
~
F60ATI
NG
ABNORMA~
DIVlDE
.
~
01532
R
604314
R
~H1P
ERRQRJ
01533
R 2")0:>44
f~
l..AC
IDV8y0
015~4
R
544~04
R
SAD
(CA~)~
01535
R 604;:)44 R
J~1P
ERROR~
01536
r~
204~~2
H
hAC
(25)
I
25.
INTEGER
DIVISION
BY
tERQ
o o
o o
o o
o o
01537
R
604~S44
R
JMP
ERRQH3
,EJECT o o
o o
o o
-. -_
..
- - - - -
--
- -
--
---
---
-~
--
---
~
•.. - -
_.
--
~
--
i'--,
U
()
PAGE
28
FPl,~T~
0
01540
R 2040:>2 R
~J154l
R
741~hj0
A
0
0154~
R
204~53
R
01543
R
741@~0
A
01544
R
204~2?
H
0 01545 R
6043~§
R
0i5~6
R 20 4
2?4
R
01547
R
741kl00
A
0
01550
R
2~J46?~;
R
0155~
R
604~?6
R
v.li552 R
204~~1
R
0
01553
R
7410kH)
A
0:].554 R
2046~5
R
01555
R
6~143?6
R
0
01556
R f,0:1,556 R
01557
R
777777
A
0
01560
R
040~31
R
015~~
R
040~65
R
01562 R
2~j(2j527
R
0
015~3
H
504627
R
01564
R
544603
R
0:1.565 R
7410~0
A
0
01566
R 601606 R
015~7
R
140~i5
R
01570
R 1405;.53 R
0
0157l
R
140520
R
015'12 R
621~~~
H
0
01573
R
0fHH-HHj
A
0157 4 R 200.527 R
015'15
R 504627 R
0
01576
R
544~27
R
01577 R
741~;H)v)
A
016kH)
R 62:1,5'73 R
0
01601
R 2003!;>1 R
01602 R
5046~2
R
01603
R
34
4220 R
0 01604 R
~)40351
R
01605
R
621~"1~;
R
0
016V'6
R
544~V!~
R
0160'1
R
741000
A
016;l,0
R
601~2~
R
0
016;ll
R
140~14
R
CiJ1612
R
140532
R
01613
R
143~~5
R
0
01614
R
140517
R
0:l615
R
140~lj
R
01616
R
140561
R
0 vJ1617 R
1405:L~
R
01620
R
1437~4
R
0
0
SRC
'FP15T2'
TEST
MOPYbE
FOR
SYSTEM
EXERCISER
IEXPECTED
INTERRUPTS
EROM,.,8UT
NONE
OCCURED
EINT~l
~AC
(ill"-
/
11,
OVERFbOW
FROM
ROUNDING
SKP
"
E:
I
NT~2
bAC
(;l~)
SI<P
EINT30
kAC
(30)
JMP
ERRQH4
EINT13
LAC
(;~)
-
SKP
EINT~4
bAC
Cl,4)
Jt1P
ERRQH4
EINT15
~AC
(~~)
-
SKP
I
~2,
EXPONENT
OVERP~OW
I 30 I 1
NTE9ER
OVEHF'l.OvJ
IEXPECTED
JEA
BREAK
BUT
NONE
OCCURRED
I
13.
UNDERF~OW
FROM
NORNALI~ATION
I 14,
EXP
UNDFbOW
IEXPECTEO
JEA
BREAK
BUT
NONE
OCCURRED
I
;5,
F~OATING
A8NORMA~
DIVISION
~INT35
~AC
(~~)
I
~5,
JNTE~ER
DIVISION
BY
2ERO
JMP
ERROR4
IEXP~CTEO
JEA
BREAK
BUT
NONE
OCCURRED
I SIN G
L.,
E
PRE
CIS
ION'-
FL,O
A TIN G
RES
T RIC T
ION
spa
R
"R
AND
E X
If
IFREST
.DSA
-.'
SPFRES
LAW
1'l'1
DAC
%NA;l
OAC
%NA2
L,AC
OPCQDE:
AND
(UPIFb)
SAD
(Fe>
'
S
f<
P
~~"
Jt1P
SP
I
RES
r)~M
%XF:;
Ac3
IPREP
FOR
POSSIBLE
/DATA
FORMAT
ERROR
D~H
%ANSR3
02M
%XHAC3
JMPii I fREST
IDO~)I3LE:,
PR~Ctslor{'FLQATlNG
HESTRICT
IONS
FOR
"RANDEX"
Q P f
RES
v)
-.
,
~AC
OPCOOE
AND
(OPlF'h)
SAD
(Q~n'~~)
SKP
J~~PU
OPFRES
~AC
FPusr-
ANO
(~UR~l)
TAD
(~R)
"
DAC
FPUST
Jt4P~~
QPFRES
IAbWAYS
STORE
UR
FOR
UP
FL
ISING~E
PRECISION "lNTEGER RESTRICTtNS
FOR
"RAN{)EX"
$PIR~S
SAD
(gA~)
-
SKP
JMP
Dt~1
OrM
D~t1
D2M
02M
02M
O~M
[]
i!
~1
DP1RE-;S
%XFAC2
%ANSR~
%FAC2'
%XHAG2
%Xr~
ACl
%ANSRl
%XHACi
%E
ACl "
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
PAGE
29
F'Pl~T?
SRC
0162l
R
200515
R
01622
R
54462~
R
01623
R
440~43
R
01624 R
621~~~
R
01625
R
544~~0
R
0:1,626
R 74100v) A
01627
R
62l~~6
R
01630
R 1405i3 R
0i631
H
1405~1
R
0l,632
t~
140!:>:t.6
R
01633
R 1437vj4 R
01634
R
621~~~
R
01635
R
0000~0
A
016~6
R
200~42
R
01637 R
340~~4
R
01640
R
7402~0
A
0l6~l
R
621~~5
R
0164~
R
200527
R
01643
R
504~~3
R
01644 R 5446kl4 R
016~5
R
621~~~
R
01646
B
200~47
B
01647 R
504667
R
01650
R 544670 R
016~~
R
621~~~
R
01652
R 200 527 R
01653 R
5046§7
R
01654
R
544670
R
016~5
R
6216~$
R
01656
R
777777
A
01657 R
0445~1
R
01660
R 144553 R
0166l
R
200~2~
R
01662
R
504610
H
01663
R 544610 R
01664
R 6¥J161o
f~
01665
R 203704 R
01666
R
5046~~0
R
01667 R
7410~6
A
'FP15T2'
T~ST
MOQYbE
POR
SYSTEM
EXERCISER
IIF
MANTISSA =
400000~
+1
TO
OVRF~X
IBECAU$E'BOWN6RY-C~MI!
ExctEDED
AND
OV~RFhOW
WILL
ON
CPPUST
~AC
%XF'Ar;J
SAD
(~~~0~0)
1St
OVRFbx
JMP~~
IFRE~T
IDOU8~E:
PRe:C
I
sTor{-
INTEGER
RE:STR
I
CT
lOS
FOH
"RANDEX"
OPIRES
SAD
COP)
,
-.
SKP
-
~
JMP~
IFREST
Dr.M
%XFACi
[)~M
%ANSHl
DtM
%XHAC~
O~f~
%fAC1."
!!JMP~t
IFR~S'f
IIF
ABNORMAb
blvl8l0N
00
NOT
BRANCH
T F 8 R A 0
-~
,
..
-
hAG
DVBy00
TAO
19.VBY~
S~A
JMP*
TPBRA
I~XIT
"
NO
TEST
IIF
INTE~ER
"-~X'T
~
NO
8~ANCHING
HtRE
l.AC
OPCQPE:
AND
(rk.>
~
SAD
(CAL)
JMP~
TF'SRA
IIF
SPf~l)R
EXIT
.
hAC
OPCQOE;
AND
(O~IFCJURIUN)
SAO
(fk,UH)
..
JMP*
ftBRA
IEXIT
IIF
SPP~0R
ExiT
hAC
Or'COQ£
AND
(OPIF~lUR1VN)
SAD
(FbnJl~)
..
JMP*
TFBRA
Ie:XIT
IERRORS
OCCURING
NQW
ARE
8RAN~H
FUNCTION
FAlhUR~S
bAW
Ml
..
,
(JAC
CdMPbO
IBRANCH
IP
~E~O
f~A
TB~A
6t.M
8RANCH#
~AC
OPQODE
ANO
(UP)
..
SAD
(OP)
JMP
TBl!A~
~AG
%FAC~
AND
(777000)
SKP
...
-.
e:JECI
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o o
o o
PAGE
30
FP1~T~
SRC
'FP15T2'
!~ST
MOOYbE
POR
SYSTEM
EXERCISER
0
0l6'/0
R
203706
R
TB~A:4
k,AC
%FAC3
016'l1~
R
04053[1
R
DAC
TEMP' o
(1)1672 R
203f~5
R
bAC
%F'AC~
0 016'73 R
504660
R
ANO
(377177)
o
016'/4
R 540530 R
SAD
r£MP'
.
01675
R 741YJ00 A SKP
0
01676
R 601701 R
.J~1
P
,+,~
01677
R 741200 A
SNA
o
01700
R
444~S3
R
ISl!
BRANCH
0 0i7101 R
204671
R
t.,AC
(~~A)
01702 R
1011~2
R
Jt~S
SBRAN
IBRANCH
lP
NEGATIVE
FMA
0
01703
R 144:>53 R
T8~IA
Dlf1
BRANCH
o
o
01704 R
203(21
R
bAC
%ESIGN
01705
R
741lk)~'
A
SPA
0
01706
R
444~~3
R
lS~
BRANCH
01707
R
204672
R
bAG
(
BM
A)
-o
01710 R 101752 R
Jt,1
S
SSRAN
0
IBRANCH
IF
FMA
<
OR
.-
0 o
01711 R
144~~J
R
TBL,E
D2M
8RANOH
01712 R
203'105
R
~AC
%FAC2
0
01713
R 741100 A
SPA
01714
R
444~S~
R 1St
BRANCH
o
0171,5 R
504660
R
AND
(3777"17)
0
017l~
R
540~30
R
SAO
TEMP;
. o
01717
R
741000
A
SKP
01720
R
60172~
R
~H1P
.!t~
0
01721
R
74120fj
A
SNA
o
0~722
R
444~53
R
IS~
SRANCri
017~3
R
2046i3
R
l"AC
(~~;)
,
0 0;1.724 R
1017~2
R
JMS
SBRAN
18F~ANCH
IF
PO~iIT~yg
F~A
01725
R
144~~3
R
TBPA
Dt~1
BRANGH
o
0 01726 R
2'-13"121,
R
LAC
%~SlGN
o
01727
R
740100
A
S~1A
01730
R
444~~~
R
ISt
8RANC~,
0 0173l R 204674 R
bAC
(~PA)
"
0:t732 R
101/~2
R
JMS
SBRAN
IBRANCH
U
NCO
N q
t.
TIN
A
~
0 0;1.733 R
444,53
R
TBRU
1St
BRANCH
01734
R
2046?~
R
bAG
(BRU)
-
01735
R
lr~17~2
R
JMS
SSRAN
0
,EJECT
o
o
o
0 o
0 o
0 o
0 o
0 o
C)
o
o o
PAGE
31
FPt~T~
SRC
'PP15r2'
r~ST
MOD~bE
FOR
SYSTEM
EXERCIS~R
0
IBRANCH
IF
P~1A
NON~~ERO
0
01736
R
144~53
R
TBNA
D~M
BRANCH
vJ17J'I R
2037Lq~
f~
bAC
%FAC2-
0 01710 R 50466vJ R
ANP
(377'177
) 0
01741
R 540560 R
SAD
T~MP
, -
01742
R
7402tOQ)
A S2A
0 01743 R 444:>33 R
ISl
BRANCH
0
101744 R
204676
R
hAC
(~NA)
-
0;7~5
R
1017~2
R
~H~S
SBRAN
0
0
IBRANCH
lP
GlJARD
BIT
JS
SET
01746
f~
144!:;)'~~
R
TBAC
O~M
BRANCH
01747 R
204~t7
R
6AC
C$AC)
IGl}ARP
elT
SHOULO
A
l,.
~4
A Y S
Sc
Cl,EAHEO
FROt1
§TORE
INSTRUCTtON
0
01750
R
1017~2
R
Jt1S
SBRAN
ITHEREfORE
BNA
SH()Ub
D
NEVEH
BRANCH
0
01751 R
6216~~
R
J~1P*
TFBRA
I~XIT
BRANCH
T~STING
10;1,752
R
0000~0
A
SBRAN
0
0
01753
R
0417'1~
R
DAC
Y8RANQH
0
10;1,754
R 041764 R
OAC
NBRANCH
1O;!.755
R
204~53
R
hAC
B~ANC~~
IIF
;:1,
BRANCH
0
0 0;1.756 R
7412~rt:l
A
SNA
Ilf
0
NO
BRANCH
I
"
01757 R
1017~2
R
JM$
NOB
RAN
IBRANCH
0;
NO
8RANC~
017~0
R
101771
R
J~1S
BRAN
18RANCH
.-
1 ;
BRANCH
0
()
0i76l
R
6217~~
R
J~1P~t
§SRAN
IE:XIT
BRANCt-H:S
01762
R
0000'10
A
NOBRAN
0
0176.3 R
441?~2
R 1S2
Nq8RA~
I+~
TO
RETURN
0
0 03,764 R
~H~0000
A
NBRANGH
CA~
IOqTAl..
EQLJIVAt.,E;NT
Of
8RANCH
I
N$THlJCT
ION
01765
R
0017~'1
R
,+2
01766
R
62;t.7~2
R
JMP~
NOf:H~AN
IE:XIT;
OK
0
0
0;J.767
R
604401
R
Jt1P
~R.~OR§
IA
BRANCH
OCCURRED
WHEN
UNt:XPECTEO
01770
R
621~~2
R
JMP*
NOSHAN
0;i.77~
R
~J00kl~0
A
BRAN
0 0
0
1017~2
R
000~~~
A
YBRANCH
CAb
I09TA~
EQUIV
0;1773 R
001775
R
.~~
IE:XIT;
OK
0~774
R 604414 R
JMP
ER.ROR?
INO
eRANCH
OCCURRt:D
~~HE:N
EXPECTED
0
0 0;1.775 R
6217t~
R
JNP*
BRAN
IR~SE:T
ADORES?
tHJEFER
TO
OHIGINA~
SETTING
101776
R
00177~
R
INITAOR
.DSA
, 0
0 01777 R
776000
A
bAW
lI'g,<,,,,~
02000
R
0405~~
R
DAC
Kt~000
0g001
R
204Q~3
R
bAC
(AOPCQE3F)
0 0
02002
R
044547
R
DAC
AUTOt~G
02003
R 204'700 R
~AQ
(dpCP~F)
02004
R
7~j,~~0.
A
SKP
0
02005
R
344643
R
TAD
(
~
) 0
02006
R
(1Q4S47
R,
PAC·~
AUTORG
02007
R
444~17
H IS i!
AUTQHG
0
02010
R 541032 R
SAD
A~9P9Ql3
0
02011 R 621776 R
Jt1P~
INITAOR
0201~
R
602~~5
R
~H·1P
!
~~
.'
0
,EJECT
0
"'f,
0
V
0 0
0
C:
o
o
o
o
o
o
o
o
o
o
o
()
o
o
o
o
o
o
o
o
o
PAGE
32
FP;l.~T~
SRC
'FP15T2'
TEST
MOD~bE
FOR
SYSTEM
EXERCISER
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
I C)
o
PAGE
33
FP1~T~
SRo.
0
0
0
0
0
0
0
0
0
0
0
0
300~£.!'0
A
0
0
0
0
0
0
0
0
,TIThE
SVBTIT~~
FPOINT~NON
IGENERAL
F60ATJNG'PO~NT
ARITHMETIC
I .
_.,
-
."
I
FLOATlNG
~QINI
MATH
(NON~EAE)
I
I
I
I
I
I
I
I
I
I
I
I
/
I
I
I
I
I
ITERMS;
I
I
I
I
I
I
I
I
I
I
%FbOT,
%PLJNF,
%PN~G,
%PG,
%PNOR.
%F"H,
%PXR,
%FS,
%ANEG.
%SW
I
Crf
%FA,
%PM.
%PD,
%PACl
%FACt?
%FAC3
%HACl
%HAC2
%HAC3
A~RE;G
AD015::
~r(H3000
,EJECT
F~OAT
INTEGER
TO
FLOATING
ACCUMU~ATOR,
UNELQAT
SEPONO
WORD
O~
P~OATING
ACCUMU~ATqR
N~~ATE
THE
F~OATING
ACCUMUkATOR
SHORT
GET
ARGUMENT
(ADORESS)
NORMA~laE
THE
FLOATING
ACCUMULATOR
HO~D
THE
PbOATING
ACCUMULATOR
ROUNO-R~SUbT
AND
lNSgRT
SIGN
Sl~N
OONTROb
Nt;GATE
AeR!::G.
SW}TCH
THE
~LOATING
AND
HE~D
Ace'S,
GENERA~
FLOATING
AOD
GENERA~
FLOATING
MU~TIPLY
GENERAh
rkOATING
DIvIO~
EXPONENT~PbOATING
POINT
ACCUMU~ATOR
SI~N.HlGH~ORDER
MANTISSA~FbT
Ace
bOW~ORO~R
MANTXSSA~P~T
ACe
~XPONENTeHE~O
ACCUMU~ATOR
SlgN+HIGH~ORD~R
MANTISSA~HgLD
Ace
bOW~ORDER
MANTISSA
HARDWARE
A9CUMULATOR(AC)
0
0
0
0
0
TO
A~REG.
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0 I
o
o
PAGE
34
o
o
o
02013
R
0000~0
A
02014 R
7440~1
A
0201~
R
3449.~3
R
0g0l9
R
622~+'3
R
o 02017. R
000kHH1
A
02020
R 20372:i. R
0202.1 R
244~2~
R
o
02022
R
043~~~
R
02023
R
622~~7
R
o
o
020g4 R
000000-
A
o
02025
R
200~~7
R
02026
R
504603
R
02027
R
544~~~
R
02030
R
6~2~~~
R
0~03t
R 143704 R
0~032
R 200527 R
02033
R 504610 R
02034
R 5446;L0 R
o
o
0203~
R
602~1~
R
02036
R
2037~~
R
020~7
R
60204~
R
o
02040
R
2037~~
R
020~l
R
5046Q0
R
0204~
R 543706 R
o
02043
R
740~00
A
02044
R
60205$
R
02045
R 14371J5 R
o
0~046
R 143706 R
02047
R
622¢2~
R
02050
R 200527 R
o
02051
R
5~46ilO
R
02052
R
544~i.0
R
02053
R
602065
R
o
020~4
R
2037~~
R
0~055
R
5046~6
R
020!:)6 R 043705 R
o
02057
R 740100 A
o
02060
R
622~~1
R
0206:4 R
203706
R
0206~
R
7400~1
A
020~3
R
0437~2
R
02064 R
622~~1
R
o
o
o
I
INEGATE
THE
A~REG
I
I
%ANEG,
o
CMAIC~k
TAD
' C
~
JMP*
%ANE:G.
IN~GATE
jH~
FSI.GN
% S N
r:
G 0
'"
,
bAC
%FSIGN
XOR
(4YH10~H~)
OAC
%F
S
I9N
JMPu
%?NS~.
IFbOAT
INT~GER
TO
P~QATING
AC9UMU~ATOR
(%P~OT,)
/CALblNG
SEQU~NC~I
/ .
JMS
-
~~bOT,
/SUBR
CALL(INT~GER
IN
A.REG)
I
NEXT
INSTRUCTION
IRETURNCINTEGER
NORMALI2ED
I
.,
'..
..
IA~RE:G
IS
UNCHANGED
%FbOT. 0
6AC
OPCQPE;
AND
(Fb)
-
SAO
(FiL.)
JMP{t
~t:6Qr.·
D~M
%EAG;
~
6AC
OPgOD;
ANO
(lJP) ,
SAD
COP)
JMP
••
~
6AC
%~AC~
JMP
.'"
4
~AC
%EAC~
ANO
(377777)
SAD
%FAC3'
StA
- "
JMP
,
tr
1
O~M
%EAC~
DtM
%~"'
AC~
JMP~
~rl,bI.
bAC
oPgoo~
AND
(OP)
~
SAO
COP)
JMP
%~~bOTl
L,AC
%FAC3"
AND
(40'1000)
DAC
%fACZ-
SMA
~
J~'1P*
~t),OT.
~AC
%FAG9
TCA
.~
..
OAC
%FAC3
JMP~
%F'LOT
..
.
..
-'
....
~
.
/z::;RO
SIGN
0
0
0
0
0
0
0
0
IN
rLT
Ace)
0
0
0
0
0
0
0
0
0
0
0
0
0
0
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
PAGE
35
FP1~i?
Sf~C
02065
R
2037~5
R
02066
R 744:100 A
020§7
R
622~~4
R
0207~J
R
203706
R
0207~
R
7400~i
A
0g072
R 043706 R
02073
R
2~3j~~
R
020i4
R
7414t1~
A
02075
R 344643 R
02~76
R
5046¢0
R
02077
R 344626 R
0~~00
R
04370~
R
021~l
R
6220~1
R
02;1.02 R
0000~0
A
0g103
R
2e37~1
R
02104
R
741~L?0
A
02105
R
6~21(!1
R
02~06
R
2037~7
R
02107
R 744010 A
02110
R
0.4370'7
R
02:1.1~
R
014~~7
R
0211~
R
203706
R
02113
R
7400~@
A
02114
R
043706
R
02~15
R 203705 R
0213,6.
R
7400i~j
A
02117 R
04310~
R
02120
R 143'104 R
02;1,21
R
2005~7
R
0212~
R
504575
R
02123
R
5446j.,
R
02124 R 6;Z2l02 H
02~~5
R
544~@1
R
02126
R
622102
R
02127
R 200527 R
02130
R
50.46~0
R
0213~
R
544610
R
02132 R
602lj~
R
02133
R
203?~g
R
02134
R 741000 A
02135
R
2037~~
R
02136
R
74l1~~
A
02137
R
4405~3
R
02:1.40 R
504660
R
0214t
R
6221~2
R
02142
R
0000~0
A
02143
R
203705
R
02144 R
5437~~
R
SU8TlTh~
f.POINT~N9N
%FbOT1
6AC
%EAC~
S~1A
I
CL~
JMPu
~~60T.
%F~OT2
~AC
%fAC~
TCA
-.
OAC
%FAO.3.
bAC
%FAC~
CMA~S~k
TAO
(1)
AND
(377777)
TAD
(4rb00rb~)
PAC
%FAC~
JMP*
~E\.,OI,
IflX
THE
F~OATIN~
AC
%FIX.
0
.~.
kAC
%EAC~
SNA
JMP
%FIXB
/NO
REALIGNMgNT
NEOES?ARY
bAC
%[A91
ROb
DAC
%FAC4
OAC
GlJARD
kAC
%EAG~
RA~
OAC
%fACJ
bAC
%EAC2
RAk
DAC
%FAG~
Dl!M
%~AG~
%PtXB
bAC
oPCOO~
ANO
(QP~Tq9)
SAO
(RDIV)
JMP*
~EIX,
SAD
(DIV)
J~'1P*
%1-;';
IX
I
bAC
OPCOOE
AND
(OP) -
SAD
COP)
JMP
t
+~
bAG
%~AC~
SKP
L,AG
%t~AC~
SPA
IS~
OV~Pk~
/QVERFbOW
OCCUREO
AND
(:J77l77)
JMP~~
~ElX;
INEGAT~
THE
FLOATING
ACCUMULATOR
(%~NEG,)
ICALLING
SEQU~NCE~
I
.'
JMS
-,
%~NEG
ISUBR
CALL
(CHANGE
SI~N
Of
NORMA~~~ED
FbT
ACe,)
I
NEXT
INSTRUCTION
IRETURN
WITH
~IGN
OF
FkT
CC
CHAHG~P,
%FNEG,
0
.....
,
I~NTRY~EXIT
,.
~AC
~FAC~
ISIGN
WORO
OP
FLOATING
ACCUMU~ATOR
SAD
%FAC~'-
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
0
()
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
-
----
--
-
--
---
FP1~T~
SRC
02;l~5
R
740200
A
0~146
R 244626 R
02~47
R
0437~5
R
02150
H
622~1Z
R
0215~
R
000000
A
02152
R
2021~1
R
02153
R
504701
R
02154
R
k'421~1
R
021~5
R 7777(9. A
02156
R 342151. R
02157 R
0437.2~
R
02160 R
223l~0
R
021~l
R 463720 R
02:1.62
R
0437~0
R
02163
R
223720
R
02164 R 043720 R
02165
R
741100
A
02166 R 223720 R
021~7
R
0621~1
R
02170 R
442151
R
0217~
R
6221~1
R
02172
R
~J00VJ~0
A
02113
R
140~~1
R
S2A
XQR
DAC
Jt~P~~
Ilf
ABSO~UT~
2gRO
00
NOT
NEGATE
(4000~0
ICHANGE
SIGN
%~AC~-
IRESTORE
.
~FNEG
IEXIT
-"
,
I
I
ISHQRT
GET
ARGUM~NT
ROUTIN~
C%PG!)
/CALk,
1
NG
SEQU~NCE;
..
I
(PC~~)
0
IADDRESS
OF
ARG
IN
USERS
PROG,
I
(PC)
.
JM?
%FG,
/SU8R
CA6k
I
(PC+l'
0 /(STORg
ADDRESS
HERE)
I
(~c+?~
NEXT
INSTRUCTION
IRETURN
HERE
I
ISUBROUTINE
%E~,
§OES
BACK
TWO
LEVE~s
(THREE
IF
INDIRECT)
ITO
GET
THE
ADDRESS
OF
AN
ARGUMENT
AND
STORES
IT
AT
PC+l
IOF
TH~
CA~LI~~
P~OGR~M,
I
I
%FG,
ISECOND
%FGEX,
I
o
hAC
AND
DAC
hAW
TAD
DAe
b£·VEb
l,AG*
lS2*
DAC
\.,A
Ci~
DAC
SPA
bAC
n
DAC{t
lS~
JMP~
%J5
%.)5
%J?
%J5
%~5
%J5
%r:'G
..
,-"
,
%[G.,
~EG,
I~~---~-~-~-~-~~~~----~
I
IE:NTRyef:XIT
IMASK
OF
POSSlBLE
ISIGN
BIT
SET
FROM
16
IN
K 0
URI
N G J M S
/G~T
CAL~ERS
EXIT
IAC=(PC~1)
FROM
CALLING'PROGRAM
/SAVE
fIRST
bEVEL
IG~T
CARG
ADDR)
AODR
/BYMP
CAk~~RS
EXIT
/SAVE.
ARG
AODR
IGE:T
ARG
AOOR
lEND
OF
2ND
LEVE~
lIE 0 BIT
IS
ON
ADORESS
IS
INDIRECT
IACCf;SS
AGAIN
ISTORE
ARG
ADDR
IN
CA~~ING
POINT
ISU.MP
EXIT
IEXIT
INORMAbl~E
F~OATING
A9CUMU~ATOR
(%FNOR.)
ICALLING
SEQUENCE;
I .
JMS
-
%ENOR
IS~8R
CA~L
I
NEXT
INSTRUCTION
/SUBR
RETURN
I'
. -
..
I
ITHE
F~OATING
POINT
ACCUMUbATOR
Is
SHIFTED
LEFT
UNTlb
8IT 1
IS
ION,
BEFORE
ANY
SHIFTjNG
THE
NUMBER
IS
CHECKED
FOR
I~ERO,
IF
IT
IS
~~RO
YHE
EXPONENT
IS
C\"EARED
AND
THE
ISIGN
WORD
SE~
OF~.
I -
%FNOR.
0
DtM
LJNDFkN
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
0 0
0 0
PAGE
37
FP1~T~
SRC
Sl)f3T
l
ThE
E
PO
INT,..N9N
I 0
'12174
R
200527
R
~AC
OPCOOE.
0 I
02175
R
5046,6
R
ANO
(UN'FC)
02176
544604
.'
. ,
..
R R
SAD
~gA~)
0
02177
R 622112 R
JMP*
~ENOR,
0
02200
R 5046:>" R
AND
(UN)
0220l
R
544~~7
R
SAD
(UN)
0
0
02202
R
622112
R
J.
~1
P *
%F'NOR
- - '
..
I
02203
R
203705
R
hAC
%FACg
IIF
%FAC2
...
%FAC3
02204
R
504~~v.j
R
AND
(3777/7
ISTRIP
SIGN
IN
CASE
OF'
0
02205
R
~J43'l05
R
[JAC
%FAC2'
IMINl)S
~e:RO,
0
02206
R
5437~~
H
SAD
%EAC
3
IANO
AC::0
CLEAR
02207
R
740~100
A
Si::A
/THE
EXPON~NT
AND
SIGN
THE
EXIT
0
0 "322i0 R 602223 R
Jt'1P
%[NORA!'1:t.
Iyl t
TH
THE
fhT
Ace
IN
A8S0l~UTE
Ql
STATE,
02211
R
1032~2
R
JMS
OCHECK
022:1,2
R
602217
R
Jt,1
P
,+
5 . "
0
02213
R
2037~'7
R
~AC
%FAC4
0
02214
R
544565
R
SAO
%FAC4A
02215
R
7402~hJ
A St!A
0
02216
R 6v)2223 R
Jt1P
%~NOHA~l
0
02217
R
1437~1
R
Pr.M
%PACl
IChEAR
EXPONT
tlJ2220 R
1437~1
R
O~M
%FSIGN
IC~EAR
SIGN
0
02221
R 143?17 R
Dr~1
%J4
" 0
02222
R 6221'12 R
JMP~~
%F'
NOR
IEXIT
._
e
02223
R
203'105
R
bAC
%F'AC;;
0
02224
R
744010
A
%FNORA
HC~
IIf.
BIT 0
IS
ON
Ell'
0
02225
R
7411~~'
A
SPA
lIE
NOT
KEEP
HOTATING
02226
R
6~)22~7
R
J~1P
%FNOHB
0 I 0
IDE
CREME
NT
EX~ON~NT~
I
0
02227
R
7777'(7
A
hAW
~l
0
02230
R
343704
R
TAO
%~AC~
")2231,
R
043'104
R
DAC
io~AC~
0 '12232 R
200527
R
hAC
OPCQDF;
0
02233
R
50461kl
R
AND
([jp
)'
022S4
R 5446;1.0 R
SAD
((jp)
0
0223~
R
60224~
R
JMP
t+~
0
02236
R
203'1~1
R
hAC
%FAC~
02237
R
544702
R
SAO
(777..57"1)
0
02240
R
602245
R
",)MP
.+~
0
02241
R 544703 R
SAD
(:.577)
/RANPEX
SAP
02242
R
6'~22~5
R
J~1P
,+~'
0
02243
R
2v.137k'4
R 6
AC
%~AC~
0
02244
R 54466k1 R
SAD
~
~777'(7)
02245
R
440S~i
R
lSi!
UNOFb-N
I~XP()NENT
UNOERFhOW
0 I 0
IROTAT'E
I 0
0
02246
R
744000
A
Cl..h
02247 R
103~?2
R
J~1S
OCHECK
022S0
R
60226fJ
R
JHP
%FN
•.
0
022?~
R
204565
H
LAC
%f:AC~A
0
02252
R
744~1~'
A
RC~
0 0
0 0
o
()
PAGE
~8
FP1~T~
SRC
o
02253
R
044565
R
02254
R
203'1
ki7
R
022:?5 R
7400io
A
o
02256
R
0437v)7
R
02257
R
0445S7
R
02260
R 2037ta6 R
o
022~t
R
7400ii~
A
02262
R (1)43706 R
02263
R
2037~~
R
02264 R
74001k)
A
o
02265
R
043?~5
R
02266
R
6022~4
R
o
02267
H
200!:>,s6
R
022/0
R
7412~j0
A
0227~
R
622172
R
o
02272
R
2005~1
R
02273
H
74120"')
A
022!14 R
6221/2
R
o
02275
R
140~~~
R
02276
R
140~41
R
02277
H
6221?2
R
o
o
o
o
02300
R
0000~)~J
A
o
023~~
R 2037vJ4 R
0230~
R 043710 R
v)2303 H
203705
R
02304
R
0437~i
R
02305
R
203706
R
02306
R 04371,2 R
o
o
023~7
R
622~~~
R
o
o
o
o
o
o
SU8TIT~E
EPoINT~N9N
DAC
%FAG4A
~AC
%[AC1
RAk
DAC
%FAC4
IVSED
AS
FMQ
DAC
GUARD
%FN,
~AC
%EAC3
RAh
DAC
%F'AC3
L,AC
(~EAC2
RAL
DAC
%FAC2
~H1P
%FNOHA
%FNOR8
hAC
OVRFb~
SNA
I
I
JMP~
%FNOR,
bAC
UNOFbN
SNA
.....
JMP*
%FNOR,
D1!M
OVRFbl.
D2M
UNPF'~N
~:JMP*
~ENQR,
IHO~P
THE
F~OATIN~
AC~UMULATOR
ICAL~lNG
SEQUENC~'
1
JMS
-%PH
(%FH,)
I
NEXT
INSTRUCTION
I "
-.
..
..
I
I
%PH,
I
I
~~
k.,AC
D.AC
~AC
OAC
bAC
DAC
J~lP*
%EAC~
%HAC~
%PAC2
%HAC~
%fAC~~
%HAC3
%EH,
/CA~~
(VA~UE
~N
FLOATING
Ace)
IRETURN
(VALUE
IN
Fh
O
ATIN9
ACC
ANO
HE~D
AC
IE:XPONENT
IH1GH~ORDER
MANTISSA
ILOW~ORDER
MANTISSA
/EXIT
IROUND
AND
INSERT
SIGN
C%PlR.)
ICALL I
NG
SE;QUENCE;;
..
I"
JMS
-
~~IR,
ISU8R
QA~L
I
"400/1
IROUNDOFF
elT
I
77700~/777776
IEXTRAGT
MASK
I
NEXT
INST~VCTJON'
/SUBR
RETURN
I
I
ITHE
R~SU~T
IN
THE
F~OATIN~
ACCUMUbATION
IS
ROUNDED
ACCORDING
ITO
TH~
MODE
~~IN~kE/~OU8~~
PRECISION)
I
G
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
(J
()
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
PAGE
39
FP1~T~
SRC
t~2310
R
000QH10
A
02311, R 140:>4vJ R
02312
R 200527 R
02313 R
504670
R
02314
R 544604 R
02315
R
602~~1
R
0231.6 R
5'14620
R
02317
R
5446~0
R
02320
R
60233::1,
R
0232~
R
2045~7
R
02322
R
7451~2
A
02323
R
60233~
R
02324
R 744000 A
02325
R
200~~~
R
02326
R 504§;0 R
02327
R
544604
R
02330
R 602334 R
02331
R 4423i0 R
02332
R
4423i0
R
023~3
R
6223t0
R
02~~34
R
750010
A
02335
R
3623i0
R
02336
R 442J1.0 R
02337
R 343'106 R
02310
R
5223~0
R
0234~
R
043706
R
02342
R 7500i0 A
0Z343
R
3437~5
R
02344
R
0437~5
R
02345 R 740100 A
02346
R
6023~6
R
02347
R
744020
A
02350
R
043!~~
R
0235l
R
203706
R
023~2
R
7400~0
A
02353
R
522310
R
023~4
R
0437~6
R
02355
R
103664
R
02356
R 442310 R
023~7
R
6~2~i~
R
/+1
TO
%FIRE.X
%FIReA
I
o
DtN
OVRFLH
bAC
OPCOO£
AND
(LJR:FC)
SAD
(CAL)"
Jtl'lP
%FtREX
AND
(UR)-
..
SAD
CUR)
JMP
%F;
I
RE:
X
PMA
IF-~FAd4
l~
NEGATIVE
bAC
GUARP#
SPA
J
STb
"
JMP
%~JR,A
CL~
bAC
AND
SAO
~H1P
IS2
lSi:
JMP*
G~K
TAf)*
lS2
TAD
ANDl"
DAC
GLK
%f·IR.
%FIR.
%FAC3
%F~Rt
%fAC
3
TAD
%r"AC~
[JAC
%EAC4
Sr'1A
JMP
/GYARD
BIT
SET
FOR
DP
IG~T
ROUNDOfF
8IT~
IPO
I
NT
TO
~1ASK.
IADO
TO
~OW~ORQER
RES~bT
TO
PERFORM
IMASK
OF
INSIGNIFICANT
PORTION.
IKEEP
~OWeORDER
RESU~t,
/~~T
OVERFkOW
8IT~
IADD
TO
HIGH~OROER
RESU~T.
lOVER
F~OW
INTO
SIGN
BIT?
INO
IROUND~OFF
CAUSED
NUMB~R
TO
OVERFLOW
INTO
SIGN
BIt,
IROTAT~
%FAC2;%FAg3
RjGHT
ON~
BIT
AND
INCREMENT
EXPONENT,
I
RCR
OAC
%FAC2
bAC
%EAC~
RAR
AND*
%EtR,
liRUNCATE
PAC
%F'AC3
~H1S
I
NCEXf5
%FlRA
iS2'
-
%tIR,
IPOINT
TO
RETURN
ADDRESS
JMP*
%PIR,
IEXIT
,EJECT
~.
o
o
o
o
o
o
o
o
o
o
o
RQUNPOFP.
o
o
o
o
o
o
o
o
o
o
o
---
-
-----------------------
---
-
()
()
PAGE
4~
FP1~T~
SRC
o
o
o
o
o
02360
R
0'~00~)~
A
02361
R
203'705
R
02~62
R
504626
R
o £12363 R 043?;l.:, R
02364
R
2037k1~
R
02365
R
504~60
R
02366
R 04370!:) R
o
02367
R
2037il
R
02370
R 243717 H
o
02371
R
504~2~
R
023'12
H f143721 R
02373
R.
203711
R
o
02314
R
5046~~
H
02375
R fJ43711 R
02376
R
622~~0.
R
o
02377
R
~J00000
A
£12400
R
2037~!j
R
02401
R 5437166 R
02402
R
7402~0
A
o
024Y,3 R
741!~00
A
02404
R
602414
R
02405
f~
20~~'l;tl
R
o
02406
R
5437i2
R
02407
R
740200
A
02410
R
602412
R
o
02411~
R
6024~4
R
o
02412
R 442377 R
024).3 R 622;J'/'1 R
02414
R
1437~~
R
02415
R
143/0~
R
02416
R 143706 R
o
f}2417 R 143,,07 R
o
02420
R
1445~i
R
02421
R
144565
R
02422
R
622377
R
o
o
o
o
SU8TIThE
EPOJNT~N9N
ISIGN
CONTROL
(STRIP
SIGNS)
(%FS,)
ICAL~ING
SEQ0E~UE~
-
I -
JMS
-%[5.
ICAL~
I
NEXT
JNSTRYCTJON
IRE
TURN
I
ITHE
SIGN
BIT
Op
THE
FbOATING
Ace
IS
STOREO
IN
BIT o
,Of
ISTORAGE
WORD
~J~;
TH~
SIGN
T81T
OF
THE
HEkD
Ace
IS
IEXC~USIVE
OR!~D ~tTH
IT
AND
THAT
VALUE
IS
STORED
IN
BIT
0
OF
I%FSIGN,
RETURN
IS
MADE
WITH
BIT
0
or
80TH
THE
IH~L6
Atc
ANDTHE-PLOATING
Acg
SET
TO
2ERO.
-
I
I
%FS~
0
l~AC
(oFAC~
ISIGN
HORD
OF
FLOATtN~
ACCUMUbATOR
AND
(
400~H00
IK~e:P
ON~Y
THE
SlGN
[JAC
%J4 -
-.
ISToRE
IT
t~A
C
%FAC2
IGE:T
SlGN
AND
(3777'17
/WORD
AGAIN
AND
KEEP
DAC
%FAC2·
IONhY
THe:
ABSObUTE
VAL.WE
I.,AC
%HAC2
ISlGN
WORD
Or
HELO
Ace
lJ
~1
U L A
TOR
XOR
%J4
/~I.KE
SIGNS::0,
UNhlK~
SlGN::t
AND
( 400"H00
IK~EP
ONL.,Y
THE
SIGN
AND
OAC
%FSIGN
ISAVE
IT
~AC
~8AC2"
IGET
THE
SIGN
WOHD,
AND
(377777
lOr.
THE
HEA~O
Ace
ANIJ,
DAC
%~)AC2
. ISTRlP
OFF
THE
SIGN,
~Jt'1P*
fo~St
I~XIT
ICr1ECK
THE
Ft..OATING
AC'S
TO
EQUAL
2ERO
CAC0
0
\..AC
%FAC2
SAD
%FAC3
S2A
SKP
J~'1P
CAC0EX+2
bAC
%HAC2
.
SAO
%t~AC~
S~A
JMP
CAC~;X
JMP
.~~
GAC0EX
1S2
CAC0
~H~P*
CAC0
D~M
%FAC~
D~M
%WAC~
P~M
%FAG~
D2M
%FAC4
D~M
GUARD
DiEM
%F~
AC4A
J~'1P*
9AC~
I-~~~~~-~~~--~--~~~--
I
ISWITCH
THE
F'L,OATING
POINT
ACCUt1UL,ATOR
lAND
THE
HEL,D
' A
CO
U
~1
U
~
A
TOR
ICAL~ING
S~QU~NC~!
o
o
o
o
o
o
o
-0
o
o
o
o
o
o
o
o
o
o
o
o
o
o
()
()
PAGE
41,
rpl~T~
SRC
o
o
o
02423
H
000000
A
02424
R
203704
R
o
02425
R
0423.~0
R
02426
R 203l1l1 H
02427
R
043704
R
o
024~vJ
R
2e'2~~0
R
02431
R
04311.0
R
o
02432
R
203"~5
R
02433
R
04266'3
R
o 02434 R
2037~1
R
02435
R
043705
R
02436
R
202$60
R
02437
o R
043'lii
R
02440
R
2037~2
R
o
0244~
R 04236k' R
02442 R
2v)3712
R
02443
R fj43"106 R
o
02444
R
202~i)0
R
")2445 R 1643712 R
02446
R
622123
R
o
o
o
o
02447
R
~)000'P0
A
024S,~
R
143'1;1..5
R
o
02451.
R 1,43707 R
024~2
R 1445"11 H
02453
R 144557 H
o
024~4
R
144564
R
02455
R
2037@5
R
024?6
R
504620
R
o
02457
R
v)44''/0
R
02460
R
2037ii
R
o 02461. R
5046~6
R
02462
R
044566
R
024~3
R
lvJ23~(~
R
o
o
'/
1
I
JMS
~SWIGH
ISUBR
CALL
NEXT
~NST~UCTJON
/R~TURN
ITHE
ACCUMULATOR
AND
LINK
AR~
CLOBBER
EO
By
ITHIS
SUBROUTiNE,
TEM~ORARY
STORAG~
WORe
%J5
IS
A~SO
IChOBBERED,
.,
I
%SWICH
I
I
I
,~
L.AC
DAC
~AC
DAC
hAC
OAe
hAC
DAC
h~'C
DAC
l-.AC
PAC
LAC
DAC
bAC
DAC
~AC
DAC
JMP~~
%FAC~
%FS,
%HAC~
%FACl,
%F-:S
II
~~8AC;t
%F'AC~
%~S"
I'1-iAC2
%FAC2
%FS,
%8AC2.
(QFAC3
7~F
S ,
%HAC3
%f'
AC3
%FS
.
.~
!
%HAC~
%Sv/I
C~
I-----~---~---~-----~
I
/EXPONENTS,
IUSE
TEMPoRARthY
FREE
/STORAGE
FOR
IWORD
MANIPULATION
/HIGH~ORDER
MANTISSAE,
1~9W-ORDER
MANTJSSAE
IGENERAL
FL.OATING
ADO
ICAL~ING
SEQVENCE;
I
JMS
-
~fA,
/CAL~(AuGEND
INFLOAT
Ace,
ADOEN
IN
HELD
A9C)
/
32/42-
IMAXIMUM
SHIFT
(26
S~P"
34
D,P,)
I
NEXT
~NSTRUCTJON
/SUBR
RETURN
I
I
I
%FA!
0
02M
%HAC4
LJ2M
%FAC4
O~M
%MQ#"'
Oi!M
GUARD
DtM
sw
1
rCri#
~AC
%F'AC2
".
AND
(~~~~~0)
DAC
%J4%# ISIGN
OF
FMS
l,AC
%HAC2
AND
(40~000)
DAC
%f~%#'-
-
ISIGN
Of
Ft1A
....
THE
C 0
~1
P l, I
t·1
E:
N T
OF
ORIGINA~
XFAC
IF
FUNCTION
IS
NOT
ADU
Jt·1S
%f.?
ISTRIP
SIGNS
AND
GET
ABSOl,UTE
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
0 0
()
0
PAGE
42
FP1~T?
SRC
SlJBTITl..E
~~OlNT~N~N
I 0
IIF
FMB=0
-
EXIT
-
AN~
KEEP
ORIGINAL
FMA.t,+j,.
TO
SWITCH
0
IIF
F~'1A=0
~
EXIT
AND
f'M8
TO
FMA'S
02464
R
2037~'
R
I,.,AC
%fAC2
/FM8
(HIGH)
0
02465
R
543706
R
SAO
%FAC3
IF M
8
(LO~J
) 0
02466
R
74020
r1
A SlA
02467
R
602500
R
J~1P
,+1.1
0
02470
R
203710
R
l..,AC
%HAC~
0
0247t
R
043'/v)4
R
DAC
~'~AC1.
02472
R
203711
R
LAC
%HAC2
/FNA
0
02473
R
043705
R
OAC
%FAC2
ITO
FMA
(H1GH)
0
02474
R 203"112 R
6AC
%RAC~
IFMA
02475
R
043706
R
PAC
%FAC3
ITO
NEW
FMA
(l.,OW)
0 024"16 R
444!;)64
R
ISl
SWITQH
0
024'77 R
603017
R
JMP
%FAEX
IrM8
-"
..
IFt18
NOT
...
VJ
-
0
02500
R 203711 R
bAC
%HACi;
IFMA
0
025~l
R
543712
R
SAD
%HAC~
02502
R
7402k:.10
A StA
0
02503
R
7410~~!
A
SKP
0
0Z5f()4 R
603017
R
JMP
%EA~X
IFMA
= 0
02505
R
2037~1
R
%FA,T
~AC
(;;[AC+
IOETERMINE
EXPONENT
DlF'FER~NCE
0
02506
R
7400v):J..
A
CMA
I(ADDEND~AUGENO~l)
0
025~7
R
343/i0
R
TAO
%HACl.
02510
R
~143(2YJ
R
DAC
%~5
0
02511
R
7411~~)
A
SPA
lIE
MINUS
DO
NOT
SWITCH
%FACl
GREATER
THAN
%HAC1
( F
~1B
> F
~1A
) 0
v'2512
R
6vJ25~9
R
JMP
%f.AT,B
I,.
,00
NOT
SWITCH
v.)2513 R
lPJ242j
f~
JMS
%Svll
eti
0
02514
R
4445~4
R 152
SWlTCt~
. -
IHAROHARE
FMA
>
FMB
BEFORE
AhIGNMENT
0
02515
R
6025vj5
R
JMP
-
%EAoT
IA~SO
02516
R
2~~3704
R
%FAT,B
hAC
%fAC~
0
02517
R 2437ik2 R
XOR
%HAC;l.
0
212520
R
504~~§
R
AND
(~~00~0)
0252;1, R 74;1.200 A
SNA
0
02522
R
6vJ251i
R
,JMP
%FAA
IE.XPON~NT
SIGNS
SlMIl.AR
0
IEXPONE.NT
SIGNS
l)NkIK~
02523
R
2037~~
R
kAC
%FACl
0
02524
R 74;!.lvJ0 A
SPA
0
02525
R
6Q)2~32
R
JMP
,+5
02526
R
2v)371~1
R
6AC
%HAC~
0
02527
R 740VJ01 A
CMA
0
025J0
R
343704
R
TAD
%FAC~
02531
R
6D2~~~
R
JHP
*
+~
.
0
02532
R 74(10k)1 A
C~1A
0
025J3
R
3437i~J
R
TAD
%HACl,
02534
R
741'.klj,
A SPAtCMA'
0
02535
R
603~~0.
R
Jt'1P
%FAE,X
lOUT
OF
BOUNOS
0
02536
R 3447104 R
TAO
(~~
) ,
02537
R
741l~~
A
SPA
0
02540
R
6vj300r~
R
Jt1P
%f.A;.X
I
O~)T
OF
BOUNDS
0
0254l
R 44372t1 R
~PAA
1St
%~~
02542
R
741kH~0
A
SKP
0
02543
R
602~@~1
R
J~1P
%fAB,B
IEPA=EPB
0
02544
R
20372(;)
R
~AC
%J5
0 0
0 0
I ,
0 0
()
0
PAGE
43
FP;l.~T~
SRG
SlJBTlT~E
[P()INT",NON
0
0254,
R
362~~7
R
TADn
~~A,
0
02546
R 75:1,100 A SPA!Ch A
02547
R
603~'9Q)
R
JMP
%tAr.:,X
/EXPQNENTS
~Re:A
TEf~
THAN
MAX
AL,h
OW~:[)
32/42
0 I 0
ISHlioPT
THE:
AD9ENU
Rl§HT
CJE:LTA
TIMf;S.
I
0
02550
R
2037~1
R
%FAB
hAC
%HAC2
0
02551
R
7440~0
A
RCR
02552
R
043ili
R
DAC
~HAC2.
0
02553
R
203712
R
l~A
C
%FfAC3
0
025~4
R 74002Q) A
RAR
102555 R
043?~2
R
DAC
%r'iAC3
0
02556
R
2f13?13
R
bAC
%~AC~
0
025~7
R
7400~QJ
A
RAR
02560
R
0437~3
R
OAC
%HAC4
0
02561
R
443740
R
1St
-
~~5
IFINI~HED
SHIFTING?
0
025~2
R
602:>:>0
R
J~1P
%FAB
INO",CYC~E
AGAIN
lIP
ROVNDING
IS
Hg(~ut;~TED.
-
AND
BIT 0
OF'
%HAC4.
lS
SET
~
F~Ol.JND
0 I 0
02563
R
20371.~5
R
~AC
%HAC~
025~4
R
'7441~~~
A
S~lA:
CL~
0
02565
R
60260(:)
R
Jt'1P
%fA8.8
100
NOT
HOUND
0
02566
R
20052'1
R
bAC
OPCQot
102567
R
50462,j
R
AND
(UR)
".
0
02570
R
544~2~
R
SAO
(OR)
0
0257:t
R 6026100 R
Jr~P
%f'ABtB
IDG
NOT
ROUND
02572
R 2037i2 R
%RL.
~AC
%~lAC6
'
0
02573
R
344643
R
TAD
(i)
--
0
02574
R v.)43if2 R
DAC
%HAC3
02575
R
750010
A
GLK
0
02576
R
3437~i
R
TAD
%HAC~
0
02577
R
0437~i
H
DAC
%HAC2
ISWITCH
ON~Y
Acdu~1ULATORS
NOT
EXP
TO
GET
%HAC2
GREATER
0
02600
R
20373.3
R
%FABtB
~AC
%HAC4
.
~
0
0260:l. R
044,7
J
" R
DAC
%MQ
","
/SAVE
FOR
O~BUGGlNG
026~2
R
14371~
R
DeM
%HAC4
0
02603
R
1437l~7
R
D2M
%fAC4
0
02604
R
204!jb4
R
~AC
SWITCri
02605
R
144~~4
R
OiM
SW,lT9
lj
ISTART
A
NEI~
SWITCH
MONITOR
0
k'2606
R
74:t.t!~~f()
A
SNA
0
026~7
R 6kJ2624 R
JMP
%FAB81
02610
R
203711
R
~AC
%HAC2'
0
102611
R
54370~
R
SAD
%FAC~
0
74100tiJ -'
02612
H A
SKP
02613
R
602620
R
Jt1P
,+~
0
02614
R
2037;2
R
LAC
%HAC3
0
02615
R
7440~1
A
C~1A
I
C~~
..
'
02616
R
3437~~
R
TAD
%FAC3
0
02617
R
602644
R
J~1P
%FABS;:5
0
02620
R
2037~~
R
~AC
%RAC~
'.
IrM8
02621
R
740
k1
v)
1 A
C~lA
0
02622
R
343~0?
R
TAD
%EAC?
IFMA
0
02623
R
602~3'1
R
J~1P
%FAB82
-.
0 0
0 0
o 0
o 0
PAGE
44
FPl~T~
SRC
o
02624
R
203705
R
02625
R 543"11). R
02626
R
741kH~{~
A
02627
R
6026J4
R
o
026~0
R
203:7~§
R
02631
R
744~H~1
A
o
02632
R
343'li2
H
02633
R
6026~1
H
02634
R
2Kl37~~
R
02635
R
740003.
A
o
02636
R
343?il
R
£12637 R 7401KJ0 A
02640
R
6026~7
R
o
02641
R
204705
R
o
02642
R 042423 R
02643
R
6v)2~~2
R
02644
R
74~.400
A
02645
R
602~~7
R
02646
R
6026~1
R
o
02647
R
444564
R
02650
R
203Y/~~
R
o
02651
R
744020
A
o 026:>2 R 0437:3,1 R
02653
R 2vJ37l2 R
02654
R
74002~1
A
o
02655
t~
1043(1.2 R
02656
R
203713
R
026~7
R
7400~0
A
o
02660
F~
043713
R
.-
o
v)2661
R
200~27
H
o
02662
R
5045/5
R
02663
R
544,76
R
02664
R
602774
R
o
02665
R
203721
R
02666
R
740l~)0
A
~J2667
R
602705
R
o
02670
R
203713
R
02671
R :3,0201,3 R
02672
R 0437i3 R
o
02673
R
2037;~
R
02674
R
740401
A
02675
R
602700
R
o
02676
R
744v)QJ0
A
02677 R
344~13
R
0270~J
R
043'1~2
R
o
o
o
SU8TIT~E
EPQINT~NqN
%FAB81
~AC
%FAC2
SAO
%HAC2
SKP
JMP
,+~
~AC
%fAC3
IPMS
Ct1AtCCL
.
TAD
%~~C3
IfMA
J~1P
%F
ABB3
l.
A C % F A C 2
""
I F M B
CMA
..
~
TAD
%HAC~
IFMA
ISWITCH
ON~Y
~EAG~,
AND
3
WITH
CORRESPONDING
%HAC2,
AND
3
%FAB82
S~1A
JMP
%~A8,~
...
1
k,AC
(~f~A8,G)
DAC
%SWICH
IFMA(FMB
J~'1P
%?\~
I
t8+
7
%FAB83
S2L.
JMP
%[Af:3.g",l,
J
~1
P % f' A B B 2 + 2
INOW
SHI~T
Ao6ENP'RIGHT
ON~
MORE
TIME
1St
sWITCH
~
IFM8<FMA
%FA8,C
~AC
%8AC~
RCR
DAC
%HAC2
~AC
%HAC~
HAR
OAC
%HAC3
bAC
%HAC;4
RAR
OAC
%HAC4
ITHE
EXPONENT~
AA~
NO~
EQUAL.
IF
THE
SJGNS
ARE
UN~IKE
INEGAT~
TH~
ADDEND
B~FORE
ADDING!
AFTER
ADDING
IF
THE
ISUM
IS
NEGATIVE
THE
~DDENO
MUST
8~
~ARGER,TAE
SIGN
OF
ITHE
SUM
WOUL.D
THEN
BE
THAT
OF
THE
ADDEND
LAC
OPCQDE
-
AND
(OP6T09)
SAO
(ADD)
Jt1P
%fANGl
IFSIGN
= 400000
I~IKE
SIGNS
IFSIGN
=
0000~0
IUNLIKE
Sl~NS
L,AC-
--
%f~SIGN
S~1A"
..
INE:GATE
ADDEND
JMP
%fAC
ISUBTRACT
UNLIKE
~.,
REAL~Y
ADD
%PFAC
~AC
%HAC4-
ISUBTRACT
~IKE
J~1S
%ANEG!
(JAC
%HAC4
bAC
.'
..
%HAC3
Ct~A:
SNh
J~1P
,+
3
Cl~
~
-
TAD
(1)
PAC
%HAC~
INEGATEO
~OW~ORDER
ADDEN
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
(J
o
PAGE
45
FP1~T~
o
0270l
R
203711
H
0270~
R 74140:1 A
02703
R
344643
R
o
02704
R
043711
R
o
o
02705
R
203705
R
o
02706
R
744020
A
02707
R 04370:} R
02710 R 2{;)3'106 R
02711 R
740020
A
o
02712
R 043706 R
02713
R 2037!i)j R
vJ2714 R 740k'2v) A
vJ2715 R
744~~0
A
o
o
02716
R 343713 R
o
02717
R
0437~7
R
02720
R
750010
A
02721
R
343706
R
02722
R
3437i2
H
02723
R
043706
R
o
02724
R
7500i0
A
02725
R
343705
R
o
02726
R
3437ii
R
02727 R
043?~5
R
o
02730
R 2037k15 H
0273~
R
740100
A,
02732
R 6027by] R
o
02733
R
2037~7
R
02734
R
102013
R
02'735 R
043'i~7
R
o v)2736 R 203'1!()6 R
02737
R 74040I A
o
0274(1
R
602
713 R
02741
R
744000
A
02742
R
344643
R
02743
R
0437~6
R
02744
R
2v)3705
H
o
02745
R
741401
A
o
02746
R
344~43
R
v.'2
7
47
R 0143705 R
o
o
o
SRG
SUSTlT~E
EPO~NT~N9N
~AC
%HAC2
/H1GH~ORDER
ADDEND
CMAIS~~
IIF
OVER
p~OW
FROM
TAD
(1
INEGATING
~OW~OROER
ADDEND
OAC
~HAC~
lEND
OF
NEGATION
IWHEN
GOMPUTIN~
TA~
EXPONENT
THE
ONE'S
COMPLEMENT
WAS
USED
I IOSTEAD
OF
THE
TWO'
S"COt~fJbE~lENT.
TH
I S
WAS
TO
FORGr:
A
RIGHT
SH
1
F'T
lOP
THE
AUGEN~Y·
SO
'THA
I
OV~RF~OW
WQUL.rD
NOT
I
NTERPERf:
WITH
SUM
ISIGN
DETERMINATION
I
I
%FAC
LAC
%FAC2
/HIGH~ORDER
AUGEND
RCR
11~BIT
RIGHT
OAC
%FAC2
~AC
%rAC3
RAR
I~OW~ORDER
AUGEND
DAC
%FAC3
L.AC
%FAC4
RAR
CL~
/RlqHTMOST
81T
OF
%FAC4
DROPS
OFF,
<WHO
CARES
BABY)
I
18~GIN
THE
ADQITlqN,
I
I
IIF'
SUM
I
TAD
%HAC4
DAC
%FAC4
GLK
TAD
%F'AC.s
TAD
.,.
%
~i
A C 3
DAC
%fAC9
GLK
TAD
%F"AC~
TAO
%HAC?
DAC
~EAC2
IL,OWe'lQRQER
SUM
IIF
OVERFLOW
FROM
ADDITION
IS
NEGATIV~,
90MP~EMENT
THE
ANSWER
AND
THE
SIGN
OF
THE
SUM
LAC
%F~AC2
'
SMA
-
JMP
%F'AD
l:AC
%fAC4-
Jt1S
%ANEG,
DAQ
%[AC4'
\.,AC
%EAC~
Ct"1A!
SNb
J~1P
,+~
GL~
TAD
Cl)
DAG
"
%F
AC3
bAC
%FAC2
CMAlStb
TAD
(1
DAC
%FAC2
fA
FORCED
SHIFT
OF
%FA8
ANO
%FAC
WAS
PREVlOUS~Y
INITIATED
ISHlFTBACK
I~Blf
1
OF
%fAC2
IS = 0
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
PAGE
46
FP1~T~
SBC
o
o
02750
R
2037~5
R
02751
R
5v)4l06
R
02752 R
74;1,2~t~
A
02/!:)3
R
602
7
22
R
02754
R 5447t17 R
o
02755
R
6027§2
H
02756
R
203707
R
o
02757
R
044~t=i'l
R
02760
R
103664
R
027
2:\
R
6030~7
R
o
02762
R
2037~7
R
02763
R
744010
A
o
102764
R
043707
R
02765
R
203?~~
R
02766
R 740010 A
02767 R
0437~6
R
02770 R
203705
R
o
02771 R
740ro~k'
A
o
02772
R
043705
R
02773 R
603017
R
o
102774
R
203721
R
1027"15
R
7411v.10.
A
027'16
R
602670
R
02777
R
6027~5
R
o
o
03000
R
2037~~
R
0300~
R 24371.0 R
03002
R
504626
R
o
03003
R 7412100 A
v)3004 B
6~)30i7
R
03005
R 2037vJ4 R
03006
R 74vJ100 A
o
")3007
r~
6030i2
R
o
0~010
R
:U?J242~
R
~J301~
R
444'64
R
o
o
0~012
R
2037~5
R
031013 R
543106
R
03014
R
7402~0
A
03015
R
741~~~
A
o 03'116 R 60301'1 R
0:5017
R 200527 R
0~020
R
5"'457!:>
R
o
vJ302~
R
544~76
R
03vJ22 R
603k1~2
H
o
o
IIF
81T1=1
INCREMENT
EXPON~NT
BECAUSE
OF
THAT
FORC~D
SHIFT
lAND
SET
GUARD
BIT
FOR
ROUNDING
%FAD
~AC
-
XfAC2"
AND
(AOUl')
SNA
--
...
J~1P
foEAD,~
SAD
(JMS)
JMP
%FAO,O
bAC
%FAC4--
PAC
GOARO
JNS
INcEXP
JMP
--
%~AEX
ID~TERMINE
ANSWER
SIGN
ISHIFT
BACK
HERE
-
%FAD~D
LAC
%FAC4
RC~
DAC
%FAC4
~AC
-
%EAC3
RAt.,
OAe
bAC
RA~
DAC
JI1P
IIF
FSIGN
=
IIF
FSlGN
=
~FANGl
!nAC
SPA
%fAC3
%[AC2
%FA.C2
%FAEX-
00Y'00f(.l
400£100
%ESiGN
ISHIFT
BACK
l~lKE
SIGNS
-/lJNL,IKE
SI~NS
JMP
%~[A9
IAOO
UNLIK~
~
REALhY
SUBTRACT
JMP
%FAC
IADo
LIKE
IEXPQN~NT
DIF~ERENCE
TO
GR~AT
TO
COMP~ETE
OPERATION
IEXPONENT
REA~OLATI0N-
%FAE.X
LAC
%rAC1-'
%FE
XQR
%HACl
AND
(1~0$~0)
SNA
JMP
%f
Ar~X
bAC
%~At~
S~'1A
.,H1P
%F
AEXX
J~1S
%~W
1
C~
IS~
SWJTGH
IFAC
REG
l STERS'MORE +
/EXP
SIGNS
EQUAl..
/SWITCH
TO
GET
%FAC
hARGER
(MORE
POSJT~VE)
IIF
FAC2
ANO
~AC3-=
0~
HAC
REGISTERS
MORE
+
ISO
THEREFOH(~swtTCH
~EGISTERS
ANO
KEEP
SXGN
%FAEXX
LAC
%FAC2~
SAD
%fAC~
S2!A
-
---
SKP
JMP
%FAEX
LAC
AND
SAD
J~1P
%FE
OPCQDE
(OP6T09)
(ADD)
,
A~?lC?N
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
()
o
()
o
PAGE
47
FP:1.~T~
SRC
o
03023
R
203/21
R
hAC
%f.Sl~N
o
03024
R
741200
A
SNA
ISKP
TO
SUB
Ir.IKE
SlGN~
0J025
R
603~.j:?
R
Jt~P
GOTOGO
ISUB
UNL,IKE
SIGNS
I%FS~GN
""'!
4000~0
TO
S~8TRAQT
LiKE
SIGNS
03026
R 204;>70. R
~AC
%j4%
-
~'302?
R
v)43721
R
PAC
%FSIGN
/8;CQMES
n
A"
SIGN
(13030
R
204~~~
R
~AC
SW"tTCH
0303:t
R
504~~3
R
AND
<1.")
10
o
o o
~J30;S2
R
7412k?~
A
SNA
.-
ICOMP
AstGN
o o
03e133 R
102017
R
Jt'1S
%§NEG,
03034
R
6030~6
R
JMP
%FAEXT
204570
--
03035
R R
GoroGO
l,AC
%J4%
03036
R
750100
A
SMAlCLA
o o
03(137 R
204626
R
LAC
(4~0000)
03040
R 043121 R
DAG
%FSIGt~
IB;COMES
"A"
SIGN
03~)41
R
6~J30!j6
R
.,J~1P
%fAEXT
03042
R
203721
R
.ADSIGN
~AC
%~SIGN
03043
R
74j.200
A
SNA
o o
o o
0J044
R
6030S4
R
J~1P
GO~OGO
IAOD
~lKE
SIGNS
lAUD
UNLIKE
SIGNS
%FSJGN
..
400000
03045
R
204566
R
l.,AC
%F%
ISIGNOF
Ft~A
03046
R 043721 R
DAC
%FS1GN
IEH:COMES
"A"
SJGN
o o
0~047
R
204~~4
R
~AC
SWITCH
03050
H
504643
R
AND
(1
),
o o
o
0;S0~~
R
7412~0
A
SNA
vJ3052 R
lVJ2~ll
H
JMS
%SNEG
..
..
.
....
,
~13053
R
6030'6
R
JMP
%FAEXT
03054
R 2045'10 R
GQGOGO
l~AC
%~1%
..
03~55
R (143'121 R
DAC
%[SIGN
03056
R
102172
R
%FAEXT
~H1S
%FNOf~
t
o o
o
030!:)7 R
442447
R
IS~
%FA
.
/BUMP
FOR
EXIT
.~
!
03060
R
622~~7
R
J~1P*
~EA.
IEXIT
I
o o
IWHEN
SWITCH
=
~,
HARgWARE
FMS
>
F~1A
, , ,
TH£HEFORE
COMP
ASIGN
.EJECT
o o
o o
o o
o o
o o
o o
o o
o
CJ
()
()
-PAGE
48
FP1~T~
SRC
o
o
0
0
0
0~061
R
(()0000QJ
A
0 vJ3062 R
74
4
~~(~
A
03063
R 143'107 R
03064
R
144557
R
0
03065
R
203704
R
03066
R
343'l~(~
R
0~067
R
(~43'i~4
R
0
03070
R 20052.7 R
0307~
R 5046:l.vJ R
03~'72
R 544610 R
,.-..
u
03073
R
6031i2
R
03074
R
2037~1
R
03075
R
5046:>5
R
0
0J0l6
R
746010
A
0~077
R
742010
A
03100
R
742010
A
0
031w)~
R 7421010 A
03102
R
7400~0
A
03103
R
040~j"j
R
0 03104 R 2v)0513 R
0~105
R
240,16
R
03106
R 5045ii R
0 03107 R
7402~~1
A
03110
R 6031;,52 R
0~111
R
603120
R
0 0313.2 R 203'/104 R
03113
R
kJ4053?;
R
03114
R 2005+3. R
0
03115
R 2405;1.6 R
03116
R 74110{1 A
03117
R 603132 R
0
0~120
R 2037:10 R
03121
R
741100
A
03122
R 60312'7 R
0
03123
R
200~j~)
R
03124
R 74;110(1 A
03125
R
440566
R
0
03126
R
6031;S2
R
03127
R
2005~0
R
0
0
I
IGENERA~ F~OATJNG
MU~TIPLY
(%PM,>
NON~EAE
ICAL~ING
SEQUENCE;
-
I
JMS
-
%tM,
I
~EXT
JNSTBuCTION
ICAI...L
IRE
TURN
I
I
ITHE
ARGUMENTS
ARE
IN
THE
P~OATING
(%FAC1~3)
AND
IHELD
ACCUMU~~TOR~
(%~AC~"~).
THE
FLOATING
ACCUMU~ATOR
IS
ITHE
MULTIPLICAND
AND
THE
HE~D
ACcUMU~ATOR
THE
MULTIP~IER.
IIF
EITHER
ARt
~ERO~
RETURN
IS
MADE
WITH
0
IN
THE
F~OATING
IACC,
THE
EXP~NENt
IS-COMPUTto
FIRST.
I
%FM.
%F'M2
%F~12A
o
C~k
D~r-.1
%F
AC4
[)i!t~
GUARD
bAC
-
%f
AC~
TAP
%HACl
OAC
%FACl
l:AC
OPCOOE
.
AND
(DP)
..
SAD
UJP>
J~1P
%f:M2
LAC
%EAC~
AND
(777)
ct..kJRrC·
RTb
-
RT~
RT6
RAh
PAC
TEMP
bAC
%XFACJ,
XQR
%XHA¢i
AND
(1~~)"
Si!A
JMP
JMP
~AC
OAC
hAC
XOR
SPA
%FMl
%FM2A
%FAc;!'
TEMP
..
%XFACl
%XHAc;i,
Jt4P
%Ft11
l.,AC
%8AC;
SPA
JMP
%fMJ
bAG
T~MP
SPA
lSt:
OVRFbl
JMP
+ 4
..
hAC
TEMP
IENTRY
EXIT
IEXPONENT
OF
MULTIP~ICAND
IAob
~XPONENT
Of
MU~TIPLIER
ISAVE
~XPONENr
OF
PRODUCT,
IUNl.IKE
SIGNS
IUNk,lKE
SIGNS
1~IKE
SIGNS
WERE
NEGATIVE
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
°1
C)
()
o
o
()
o
o
o
o
o
o
o
o
o
o
o
10
o
o
o
o
o
PAGE
49
FP1~T~
SRC
03130
R
7401~'~
A
0313~
R
4405~7
R
03132
R
102~60
R
0~l~3
R
102~~7
R
03134
R
6230~1
R
03135
R
203706
R
03136
R 143706 R
03137
R
043?ib
R
03140
R
2037~5
R
03141, R
1137~~
R
03142
R
043715
R
03143
R
203715
R
03144
R 543716 R
03;t45
R
740200
A
0;$146 R
74100f:'
A
0~~47
R 60322;) R
031~0
R
1437i~
R
03151
R
1437~7
R
0j152
R
144~~i
R
03153
R
144~~~
R
03154
H 2037:45 R
03155
R
744020
A
031f;>6 R 043?+5 R
03157
R
203716
R
0~160
R
740k1~~1
A
03161 R 043716 Ii
0j162
R
2v)3714
R
03163
R
74002~j
A
03164
R
043)14
R
03165 R
204~67
R
0J166
R 740020 A
0~1~1
R
044~~7.
R
03170
R
203712
R
03171 R
744010
A
03172
R
04371~
R
03173 R
203"111
R
0;S174
R 740£110 A
0~l'~5
R
0437ii
R
03176
R
74:t2ro~j
A
03177
R 6v)3222 R
03200
R
744100
A
0~20~
R
6031~~
R
suarITbE
EPoINT~NqN
SMA
lS2
UNDFbl
1(+EPA)+(+EPAi-STAYED
POSITIVE
%FM1
JMS'
%F$,
IGET
SIGN
AND
ABSO~UTI~E,
J~1S
CAC0
-
.JMP{~
~f:M.
I
ICHECK
MULTIPJgAND
FOH
~EROAND
SAVE
IN
WORK
AREA,
I
6.AC
%F
AC:S
Dt.M
%FAC~
DAC
%j3
bAC %FAC2
D~M
%FAC2
DAC
%:)2
~,AC
%J2
SAO
%J3
S~A
SKP
~Jt-1
P
%F
Me
02t1
%.J~
D~M
%FAC4
o t M % J 1 A i(-
-,
D2M
%EAC~A#
I
I~OW~ORDER
MULTIPLlCANP
IC~EAR
FOR
SHIFTING
IN
PRODUCT
ISAVE
IT,
IHIGH~OROER
MU~TtPbICANO
IC~EAR
PRODuct
AREA
FOR
SHIFTIN~.
INOT
0'!t
SAVE
IT
IINITIALlr.~
CARRY
~XTENSIQNS
I
ITHE
MULTIP~I9ATION
IS
PERFoRMED
BY
A
SERIES
OF
ADOS
ITHE
MULTIP~ICANO
IS
~DDED
TO
ITSEbf
AND
SHIFTED
FOR
EVERY
11~81T
OF
THE-MU~TIPbtERt
THE
ADDITION
STOPS
WHEN
THE
12-WQRP
~1l).~Tl~hl~8
15"0"
I
%F
1'1
A
I
%J~
%.)3
%.j3
Yo~l
hAC
RCR
OAC
~AC
RAR
DAG
I,.,AC
RAR
DAe
l,AC
RAR
DAC
%..)1
%~~A
.
~'
%~;A
LAC
%HAC~
RC~
DAC
%tJAC~
kAC
%HAC2
RAt,
DAC
%1~IAC2
SNA
JMP
%fMB
SMA:CLL
JMP
%FMA
ISHIF
THREE
IWORD
MULTIPLICAND
lONE
IBIT
IRIGHT
/3RD
WORD
EXTENSION
OF
MU~TIP~ICANO
14TH
WORD
~XTENSION
ISHIPT
TWO
WORD
MU~TIPLIER
lONE
elT
~EFT
IIF
HIGH"OROER
WORO
IS
~ERO,
ITHE
MU~TIPLIER
MIGHT
BE
~~RO
/
I
IIF
MU~TIP~IER
01
IMAYBE
INo",IS
MU~TIPLIER
81T
0
SET?
INO,.~CyC~E
AGAIN
-
--------"--------_.-
0
0
0
0
0
0
0
0
0
()
0
0
0
0
0
0
0
0
0
0
0
0
------------------------
---
----.
---
-
--
-
'.
(-)
()
PAGE
50
FP1~T?
0
0
03202
R
204~~:;
R
03203
R
344567
R
0
03204
R
n445~5
R
0~205
R 75001'1 A
03206
R
343?~7
R
0
032~7
R 343714 R
03210
R
043'107
R
0321l
R
7500i0
A
0
03212
R 3437v)6 R
0321,3 R
3437i6
R
032j,4
R
043706
R
0
03215
R
750010
A
03216
R
343?1~
R
03217
R 343"105 R
0
03220
R
'~14
3
'/05
R
03221
R
603iS~
R
0
0~222
R
203712
R
0
213223
R
740200
A
03224
R
6~)31~1
R
0
03225
R 2031'0'1 R
03226
R
04455'/
R
0 103227 R
102112
R
03230
R
623~?1
R
0
0
0
0
0
0
0
0
0
SRC
I
IADD
THE
THREE
WORP
(INCLUOING
EXTENSION)
MU~TIP~ICAND
TO
THE
IBUILDING
PROQYCT
~N
tHE
FbOATING
ACC,
I
IAT
%
ITr,:ST
I
%Ft18
I
IEXIT
%FMC
t~AC
%[AC~A
TAD
%J1A
OAC
%FAC4A
G~K
TAD
TAO
DAC
GL,K
TAD
TAO
PAC
GLK
%FAC4
%~~
>
%f.AC4
%FAC3
%J3
%[AC3
TAD
%J~
TAO
%r-AC2
DAC
%fAC2
IYES,~,ADD
MU~TIPL1CANP
TO
PRODUcT
IEXTENSION
OF
MU~TIPLICAND
(3RP
WORD)
13RD
WORO
Or
BUI~DING
PRODUCT
IADD
OVERPbOW
FROM
~INK
TO
ZND
wo~o
12ND
WORD
or
BUlbDING
PRODUCT
IADD
OVERF~OW
FROM
~INK
TO
FST
WORD
IOF
PRODUCT
JMP
%~MA
ICY9~E
AGAIN
FMB
THE
HlGH"ORUER
MULTIP~IER
WORD
1$
~EROa
~OW~ORD~R
wdRO,-IF
IT
IS
2ERO
ALSO,
EXIT.
LAC
S~A
.)MP
%HAC3
RQlJTINE,
hAC
%[AC;~
OAG
GUARD
Jt,1S
-
%fNOR
I
.Jt·1P~~
%FM,
,EJECT .
--
lIS
MUbTIP~IER
0 ?
lyES
INO,
,CYC~E:
AGA
I N
IREDUNDANT
IN
CASE
UNNORMA~l~ED
INORt-1A~
12E
IRE:TURN
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
()
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
PAGE
51
FP1~T~
$RC
03231
R
000000
A
0~232
R
2232~1
R
032J3
R
043714
R
03234
R
443231
R
03235
R
102~~~
R
03236
R
2037~5
R
03237
R
543706
R
03240
f~
7402~vJ
A
0324~
R
74100~
A
03242
R
603~6j
R
0j243
R
200~27
R
0~244
R 5046vJJ R
0J245
R
544604
R
03246
R
6Q)3'H~5
R
03247
R
200527
R
03250 R
504?r5
R
03251 R
5446j?
R
0~252
R
6032~7
R
vJ3253 R
200517
H
03254
R
74401v.~
A
03255
R
740100
A
03256
R
603215
R
0~257
R
203711
R
03260
R 543712 R
03261
R
740~~0
A
03262 R
741,0~J0
A
03263 R
603~~5
R
03264
R
203706
R
03265 R
1437~6.
R
03266
R
102013
R
03267 R
043?1~
R
03270
R
2037~5
R
03271
R
74;t4~1
A
03272
R
344o~j
H
03273
R
1437Y)~
R
03274
R
043/i~
R
IGENERA~
FkOATlNG
OIVIDE
(%FO,)
NON~EAE
ICALL
1
NG
SEQUENCE;'
..
I"
,.
I
"H1S
ICAl,..l,.
I
r.34/l"!!44
INO
Or
BITS
TO
GEN~RATE
I
400/1--
I
NEXT
~NSTRUCTAON
/~EAST
SIGNIFICANT
QUOTIENT
BIT
IRF.:TURN
HERE
I
IUPON
ENTRY
TO
THE
SUBROUTINE
THE
ARGUMENTS
wERE
STORED
IN
THE
IF~OATlNG
POINT
HtGISiER
(%FAC1~3)f
AND
THE
H~kD
ACCUMUkATQR
(%HAC1~3).
IRETURN
IS
MADE
r6
THE
CAkbING
PROGRAM
WITH
THE
QUOTJENT
IN
THE
IF~OATiNG
POJNT
R~GlSIER,
THE
DIVISOR
IS
IN
THE
fimOATION
ACI
I
%FP,
o
bAC~
%[P.
DAe
%~1
lSi:
%~o!
J~1S
%ES,
IE.:NTRY~EXIT
IGET
NO
OF
81TS
(MUST
BE
NEGATIVE)
ISAVE
NO
Of
SiTS
AS
COUNTER,
/ABNORMAb
DIVl~ION
IF
FMB
-0
bAC
%EAC2'
ISIGN
CONTROl.,
IFMB
HIGH
IFM8
LOW
SAD
%fAC~
S2A -
...
SKP
.)r~P
%fPC
hAC
OPCQOE
AND
(fL>
'
SAD
(9A~)
JMP
191V
1.
g~
IA8NORMA~
DIVISION
IF
kAC
OPCOPE
AND
COP§TP9)
SAD
(RDIV)
~JMP
t+
5
l,AC
%XHAC2
RCh
....
,.
SMA
JMP
%FDf4
INO
AaNORMA~ 6f~'SION
L,AC
%HAc;(
SAD
%HAC3
St
A-
SKP
JMP
IN£GAT~
THE
LAC
ID.EXll
OIVISOR
IN
..
%fAC~
02M
JMS
OAC
b,AC
CMA!.S~k
TAD
OtM
DAC
%FAC3
%ANEG
e
%J3
%Et\c~
(1
%tAC~
%J2
IA6NORMAL.
OIVJSION
IlNTEG~R
DIVISION
FM8
IS
UNNORMALI~EO
.
IEXCEPT
FOR
REVERSE
DIVISION
IrMa
HIGH
19ALCUkATE
EXPONENT
8~FORE
r~AGGING
A8NORMA~
DIVISION
IF
Ft1A
= 0
ITHE
QUOTENT
WILL
= 0
THE
F~OATING
ACCUMU~ATOR.
ILOW~ORDER
DIVISION
ICkEAR
FOR
QUOTIENT
INEGATE
ANO
ISAVE
kOW~ORDER
DIVISION
IHIGH~OROER
DJVISION
ISKIP
IF
LINK
ON
FROM
NEGATING
~OW~ORDER
IDIVISOR
ICL.EAR
FOR
QUOTIENT
o
o
o
01
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
U o
I 0 o
PAGE
52
FP1~T~
SHe
SUUTIT~E
EPOINT~N~N
0
ITHE
EXPONENT
OF
THE
OIVI[)~NP
MINUS
THE
EXPONENT
OF
THE
IDIVISOR
EQUA~S
THE
E~PONENT
QUOTIE:NT,
'03275
R
2037~4
R
%FD0
hAC
%~Ac;t
IDlVISOR
EXPONENT
0
0~2"16
R
102016
R
JMS
%ANEG,
o
o
'032'77 R
34371kJ
R
TAO
%HACl
IOIVID~N(J
eXPONENT
03300
R
0437~4
R
DAC
%~:'AC1
IEXPONENT
BF:FORE
NORMAl."
I
r-A
T I
ON
0
03301
R
200527
fi
~AC
OPCQDE
03302
R 5046:l.v, R
ANU
(OP)
"
03Jk'3
R 5446:1,0 R
SAD
(OP)
0 033v)4 R
603323
H
Jt1P
%FD2
IDOlJ8~E
PREqISloN
0~305
R
203?lq~
R
L.AC
%FAc:1.
033~6
R
504655
R
AND
(777)
0
03307
R
7440~k1
A
CL~IRAb
'
o
o
o
033~0
R
742k'l~J
A
RTI,
03311
R
7420~'6
A
RTk
0
03312
R 742kJ10 A
RTk
o
03'313
R
74201~
A
RT6
0J314
H
040560
f~
DAC
TE~lP
ITEMP
FOR
QIJOTS:NT
EXPONENT
0
03315
R 200513 R
bAC
%XFACl
I;PA
0331,6 R
240516
R
XQR
%XHA¢i
IEPB
o
03317
R
504=>'77
R
AND
(~~0.)"
0
03320
R
74120k'
A
SNA
03321
R
60334:5
R
JMP
%F'Pl
IEXPONENTS
WERE;
~lKt:
SIGNS
~);S322
R
603~3l
R
J~'1P
%FP4
0
03323
R
2037~1
R
%F02
l,.AC
%fAC~
I,I,UNl"IKE SIGNS
0;S324
R
040~3t{)
R
DAC
TEMP
ITE~P
FOR
QUOT~NT
EXPONENT
o
o
vJ3325 H
200~i3
R
bAC
%XrACl
0
03326
R 2405:1.6 R
XOH
%~RAt;
0~327
R
740i?jr1
A
Sr4A
o
03330
R
603~43
R
JMP
%FOl
0
IEXPON;NTS
WERE
Of
UNhlKE
SlGNS
0333~
R
2037l(~
R
%F04
~AC
%8AC~~
IE:PA
o
03332
R 741100 A
SPA
0
03333
R
6036~v)
R
J~1P
%FD3
lEPA
WAS
NE~AT1VE
03334
R
200~~'~
R
~AC
T~MP
03335
R
74110v)
A
SPA
0
03336
f~
440536 H lSi!
OVRF'b;
IFROM
SlJBTRACT
I
ON
OF
EXPONENTS
03337
R
603343
R
Jt'JP
.+~
o
o
03340
R
200~~0
H
roFP3
hAC
TEMP
0
0334l
R
7401VJ0
A
Sr'1A
0334~
R
440~~'7
R
IS~
UNOFh;
IFROM
SUf3TRACT
~
ON
OF'
~XPON;NTS
o
IABNORMAk
D 1 V
.1,?
ION
NO~
IF'
FM8
IS
UNNORMALl.2ED
0
03343
R
200!j27
H
%FOl
LAC
QPCQOE
0;$344 R
504575
R
AND
(OP6T09)
o
0;S345
R
544637
R
SAD
(RO'lVf
0
0J346
R
6033S3
R
Jt~P
tio~
IEXCEPT
FOR
REVERSE
DJVISION o
0J347
R
200:;:1.7
R
L,AC
%XHAC~
IF~18
HIGH
03350
R 74401.Q' A
RCt.,
0
033~~
R
74v)l~0
A
St'1A
"J3352
R
6035~~~
R
Jt·1
P
%FOC
IASNORMAL.
OIVI$ION
INORt1Ab
12!E
MANT~SSA
BECAUS~
HARDWAH~
NORt1Ak,
1
r.ES
1
'f
SONNY
0
ITHE
PROC;HAM
~J~k
NEV~R
EXPECT
A
FbOATING
ABNORMAl,
DIVISION
ON
RO
0~5353
R
2vJ3?+1
R
LAC
%Ij
A
C2
IfMA
HIGH
o
o
0 o
0 o
()
()
PAGE
53
FP1~T~
SHO
o
03354
R
5042~1
R
03355
R
740200
A
03356
R
603527
R
0335/
R 2037+;2 R
03360
R
7440:l0
A
o
03361
R
0437),2
R
o
0336?
R 2v)371.1 R
v)3363 R
740~;'f~
A
03364
R
04371~
R
o
03365
R
777777
A
03366
R 343'I'U4 R
~J~367
R
E143704
R
o 213370 R 200:"27 R
0337l
R
5C346:l.Q,'
R
03372
R
5446,l0
R
03373
R
603401
R
o
03374
R
203704
R
03375
R 544702 R
03376
R
603403
R
o
03377
R
54470~
R
03400
R
603~~3
R
0~S401
R
2!~3704
R
o
0340~
R
544660
R
(~3403
R
4405~i
R
0;.s4Q)4
R
603J~~
R
o
o
o
03405
R
2037~1
R
03406
R 54370, R
03407
R
741000
A
0341~J
R
603~10
R
03411
R 2
v.J
3
'/12
R
o
03412
R
7451kHj
A
03413
R
6031
22 H
0:.5414
R
740~"31
A
o
03415
R
343706
R
03416
R
74140~'
A
o
03417
R 741200 A
03420
R
6034!)4
H
f13421: R
6ro3~~S
R
03422
R
203'106
R
o (lJ3423 R
74510(1
A
03424
R
6034~2
R
o
03425
R
740031
A
03426
R
343712
R
03427
R
74~)4U0
A
o
03430
f~
60344!")
R
0343~
R
603454
R
0:5432 B
740~61
A
o
03433
R
343712
R
0~4:54
R
741~~k'
A
o
o
AND
(~AC)
Si!A
J~1P
%FDA~~
l~AG
%RAC3'
ROb
DAC
%HAC3
kAC
%HAC2
RA
6
DAC
%HAC~
kAW
~i
TAD
%FAC;]'
DAC
%FACl
kAC
OPCQUE
AND
(OP)
.-
SAD
(QP)
JMP
,+6
LAC
%F'AC:l.
SAO
(777:57"1)
Jt~P
.+~
..
SAD
(3·i
~I
)
JMP
+~
.
L.AC
%FACl.
SAD
(377777)
1
52
UNr~~~~N
Jt1P
%FDl
IINT~G;R
DlVISI0N
IFMA
LO~J
/Q!JOTENT
IEXPONENT
IIF
OlVlOEND
('OlVJSOHf
THE
QUOTENT
t~I6L.
;:
0
I(F'MA<FMB)
.
,,-
lAND
IF
FMB
;
0.
+1
T9
INTEGER
DIVISION
BY
2ERO
I D I V
~
D~
kAC
%~~AC~
.
IFMA
SAD
%EAC~
IfM8
SKP
IFMA
~
FMB
HIGH
CHECK
~OW
Jt~P
!
QV2
L.AC
%HAC3
SPA:
cC~·
JMP
t
+~
TCA
TAD
%~AG3
S~I.,
SNA
JMP
JllJrR
JMP
tQ~XII
LAC
%FAC3
SPA:C[~
.
J~1P
+~
TCA
TAO
%tjAC8
SNl,
JMP
lOEXIT
J
tit
P J Q
i,F
R .
TCA
T
AO
%tfAC~
$t4
IrMA
/PMS
IFt'1A >
PMS
IFMA
<
FM8
/Ft'1860\lJ
IFMA
<
FMB
IFMA
>
FMS
IF't1A
LOyJ
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
c~
r""
-...-)
0
0 0
PAGE
54
FP1!:)T~
SRq
81)8T 1
T~E
EPolNT~N9N
()
034~5
R 7
412
~,n~j
A
SNA
0
03436
R 603115 R
J~1P
IDEXXT
IFMA
<
FM8
034~7
R
603~~4
R
Jt~P
l.~.I.F'R
IFMA
>
F'MB
0
03440
R 740001 A
lOV2
Ct'1A
0 I
03441
R
3437~5
R
TAD
%~AC?
IFMS
HIGH
03442
R
7401~~1
A
SMA
0
ej443
R
603~15
R
Jr~p
19~x
IT
IFMA
<
FM8
0
03444
r~
60~3~~1
R
J~1P
l.QIFR
IFMA
>
fMB
03445
R
143704
R lOf;XIT Dt
t1
%FAC~
IQUOTENT
\Ill
L.l.
:;:
0
0
03446
R
143'1~5
R Drt1
%FAC~
0
0~447
R
1437~6
R o
tt~
%FAC~
034~0
R
140!:;)~6
R
PlU1
OVHF~l
0
03451
R
140e:>~'1
H
D7!M
U~QFb~
0
03452
R 140:>1l R
02t1
UNDFb,N
03453
R
6036~vJ
R
JMP
%FUEXIT
0
IDETERMINE
TH~"DIFFERENCE
T~4X
THE
~MA/FM8
AND
DO
THAT
t"ANY
SUBTRA9TIONS
0
03454
R
1437:l.~
R
IDJFR
D~~l
%Jl
IOIVISION
COUNTER
03455
R
2C~3l11
R
IDve
l:,AC
%HAc~
0
03456
R
504~61
R
AND
(~AC)
0
03457
R
7402~~
A
S~A
03460
R
6034r6
R Jt4P
IQVQ3
0 03461. R
2~137i2
R
LAC
%HAC;S
0
03462
R
744010
A
Reh
IFMA
LOW
03463
R 043'7:1.2 R
DAC
%HAC3
0
03464
R 2037;1,1 R
bAC
%~AC2,
0
0~465
R 74001. 0 A
RAh
IFMA
HIGH
0~S466
R v.,43711 R
OAG
%HA02
0
0~467
R
203'1~2
R
I.,AC
%fAC0
0
03470 R
744k'10
A
HCk
IrM8
l..,OW
034'11 R
tiJ43~k?6
R
DAC
%fAC~
0
03472
R
2v,379J5
R
kAC
%FAC~
0
.~
.
034'73 R
740010
A
RAb
IPM8
HIGH
03
4
74
R
tJ4370~
H
DAC
%EAC~
0
03475
R
603~~5
R
Jt~P
love
0
03476
R
443714
R
IPVC
3
lSi!
%j1
/+1
TO
DIVISION
COUNT~R
0~477
R
2v)3~~5
R
LAC
%F'
AC2
0
03500
R
504661
R
AND
(~AC)
0
~J3501
R
740200
A St;A
0650~
R
603512
R
Jt~P
I~~VC~
0
03503
R
2037~~
R
bAC
%f.AC;~
0
03504
R
744010
A
RC6
03505
R
0437kJ~
R
PAC
%fAC3
0
03506
R 203705 R
L.AC
%[AC2
0
~j35t07
R
7400i!~
A
RA~
0~510
R
(~4~r~f:15
R
OAC
%f'AC2
0
0~51l
R
603~?~
R
lJMP
lQVC~
IFMS
£10
NOT
...
~
0
IFMB00
=
~
0;S512 R 2v3371,4 R
IDVC1
~AC
%Jl
0
03513
R
74010..51
A
TCA
0
03514
R 0437:1.4 R
OAC
%Jl
IN;GETED
o I F
FEfiENCE
TWX
FMA/FMB
ITHE
DJFF'EREN9~
T\~X
THt~
FMA/FMB
HAS
SEED
Pr:TERM
I
NEt)
0 I P R
It-1E:
MANTlS~AS
fOR
§L.JBTRACT
l
ONS
0
035;1,5 R
744~~~'
A
CL~
0 0
0
C)
(J
()
PAGE
55
FP1:>T~
SRC
o
03516
R
20~~7~~
R
03517
~~
740031
A
03520
R
043'1i6
R
o
03521
R
203?0:>
R
03522
R
7414~Jl
A
0~523
R
:344§~J
R
03524
R 0437:45 R
o
035~5
R
1437l1.l6
R
03526
R
14370~
R
o
o
03527
R
777777
A
03530
R
044~~6
R
0353~
R
203l~6
R
035~2
R
744010
A
o
03533
R 043706 R
~13534
R
2t)37~5
R
03535
R
740010
A
o
03536
R
741:1.~0
A
03537
F~
603616
R
o
03540
R
(a43/05
R
03541 R
203716
R
03542
R
34311~
R
03543
R vJ43110 H
o
03544
R 75001QJ A
0~S545
R
343/11
R
03546
R
34~~"1i5
R
03547
R 740100 A
03550
R
603~@:2
R
03551
R
203712
H
o
~J3552
R 7440;].0 A
03553
H
043?~2
R
(1)3554
H
203711
R
o
03555
R
74001,j
A
03556
R 0437:1.1 R
o 0;S557 H
144~~6
R
03560
R
4431i4
R
0;S561 R
6D35jl
R
o
03562
R
6036~2
R
0~563
R
20052'7
R
o
03564
R
504~~3
R
03565
R 5446164 R
0~566
R
440544
R
o
03567
R
5446~3
R
03570
R
440~42
R
03571
H
200527
R
o
0~57~
R
504610
R
03573
R
544604
R
0~574
R
6036VJ(~
R
o
0~575
R
140~~6
R
0:55'76 R
140~67
R
-
o
o
L.,.AC
%FAC6
TCA
OAC
%.J~
l,.AC
%fAC2
CMAIS~k.
'
TAO
(i)
(JAC
%J2
Di!M
%F'AC3
D2M
%FAC~
ITHE
DIVISION-~S
90N~
BY
A
SERIES
Of
SUBTRACTIONS.
THE
DIVISOR
WI~L
BE
ISUBTRACTED
FROM
THE
OlVID~ND,
IF
THE
RESU~T
IS
MINUS
THE
DIVISOR
IS
ILARGER
THAN
THE
OlvlGED
AND
A
BIT
IS
NOT
ADDED
TO
THE
SHIFTED
EX~ONENT
LAW
~i
.
-.
-
%FPA
%FD8
DAC
FSTSVB#
I~,A.C
..
%fAC9
ROL.
-
DAC
%FAC3
~AG
%EAC?
RAb
SPA
,,)MP
OAC
bAC
TAO
OAC
Gl..K
TAP
TAD
S~~
A
~J~1
P
bAC
RC6
DAC
~AC
RAb
I~F'OE:
%EAC~
%J3
%HAC~
~tiAC~,
%HAC2
~j~
%F'PD
%8AC~
%HAC3
%tjAC2.
DAC
%HAC~
D2M
F'STSUB
1St.
%J:t
JMP
%PDA
Jt~P
%F
DF
IA8NORMAL
OlVlS~ON
EX~ECTEP
%FOC
LAC
O~COOE
AND
<E6)
-
SAD
(CA~)
lSi!
IDV8YkJ
SAD
(Fb>
-
IS~
DVBYv.J0
hAC
OPCQUE
AND
(OP) -
SAD
(CAL.)
JI"1P
.+~
Dtt1
OVHFhl,
DtM
UNDFbi
• • .'1
~,
ISHIFT
BUI~DING
QUOTIENT
1
BIT
LEET
IIF
NEGATIVE,
THE
~ARGEST
POSSIB~~
IQ40TI~NT
HAS
SEEN
OBTAINEO.
ISUBTRACT
kOW
DIVISOR
PROM
I~OW
DIVID~NO
I S A
VET
EM
P 0 R A R
Xl..
Y.
, ,
~1
A Y 8
t:
NEW
bOW
~
0
HOE
HOI
V I
()
E
NO
IIf
OVERFLOW
ADO
1
TO
HIGH
QRDER
DIVIDEND
ISuaJECT
HIGH~ORDER
DIVISOR
IIF
NEGATIvE
DO
NOT
GENERATE
A
QUOTIENT
81T
ICONTINu~'WITH
OLD
DIVIDENO
INSTEAD
OF
REMAINOER
I
I
ISHIFT
DIVIDENCl
I
I
IHAVE
AL~
81T~
BEEN
SHIFTED
INO't.CYC~E
AGAIN
11
NGEGE:R
jl,H1p·
/INTEG~R
OJVISION
BY
tERO
IFbOATING
A8NORMA~
OlVlSION
/ABNORMA~
DIVISION
TAKES
PREC1PEN9E
lOVER
DP
JEA
tUNCTJONS
o
01
o
o
o
o
o
o
o
·0
o
o
o
o
o
o
o
o
o
o
()
10
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
PAGE
56
03577
R
1405~~
R
03600
R
4432J1
R
0360l
R
6232Jl
R
03602
R 0437+1 R
03603
R 7404k10 A
03604
R
603~t0
R
03605
R 7777'7'7 A
v)3606 R
5445'0
R
0~607
R
103664
R
0~S610
R 144!'59 H
0J6ll
R
2232JJ.
R
03612
H
243706
R
03613
R
043706
R
0J614
R
203/3.~j
R
03615
R
603~::>2
R
03616
R
7440~Q)
A
(136;1.1 R 203'1k:J6
r~
0~620
H 7
4002(~
A
03621.
R f:143706 R
0~622
R
20v)~~'1
R
03623
R
5VJ460~
R
03624
H 544604 R
03625
R 143'70.4 R
03626
R
203'111
F~
03627
R
v)445S'1
H
036J0
R
200,36
R
03681
R 74120v.) A
03632
R
603600
R
03633
R
20053/
R
03634
R
340'41
R
036;S5 R 74120t:' A
03636
R
6036k)0
R
03637
R
200;;27
R
03640
R
504610
H
03641
R
5"'l46lt~
R
0~6~~
R
6~13646
R
03643
H
203'104
R
vJ3644 R 54457"'1 R
03645
R 741vH.?0 A
0;.s646 R
141052>6
R
03647
R
1405j7
R
0:5650 H
140'~1
R
03651
R
603600
R
02M
UNPFbN
% P P E X 1 T 1 s
~
-.,
. %
~
0 , I B U
~1
P fOR
f.
X I T
JMP*
%FD
t
IEXJT
IAT%FDO
THE
DIVISOR'
JS
LESS
THAN
THE
OIVIDEND
AND
A
QUOTIENT
81T
11$
GENERATED~
THE
QUaTJENT
BIT
IS
PICKED
UP
FROM
THE
CA~LING
SEQUENCE;
lIT
IS
THE
~EAST
~IGNiFICANT
BIT
AND
IS
ORED
INTO
THE
BUI~OING
QUOTIENT.
I A N A D
JUS
T
t·1
E N r
p{"
NEe
g S S A R Y TOP I C K " U P
THE
NEW
D I V tOE N 0
(R
E M A I N
DE
R ) I
I
%POD
I
OAC
SNb
JMP
,+~
kAW
'\':~
%HAC~
SAD
FSTSUB
~H1S
INqEXP
OtM
FSTSUB
~ACn
%[0,
XQR
%fAC~
[JAC
ioFAC3
bAC
%HACl
Jt1P
%PDB
IG~T
L~AST
SIGNIFICANT
BIT,
OR
IT
IINTP
THE
~OW~ORDER
QUOTIENT
WORp
/5AVE
NEW
QUOTIENT
IGET
LOW"ORDE~
REMAINDER
IGO-SACK
ANO
SHIFT
QUOTIENT
tAT
%POE
THE
~ARG~ST
~OSS18~E
QUOTIENT
HAS
BEEN
OBTAINED.
THE
IQUOTl~NT
WAS
SHIfTED
LEFT
ONE
BIT
TOO
MANY.
~HIFT
IT
BACK
181T
lAND
INCREMENT-TH~
EXeONENT
OF
THE
QUOTIENT
I
%FDE
%F(JF
r~CR
~AC
RAR
OAC
bAC
AND
SAD
Dt!t~
LAC
DAC
LAC
SNA
Ji1P
bAC
TAO
SNA
J~1P
l"AC
AND
SAD
JMP
l"
A C
SAO
S
~<p
Or.M
Oi:M
~ieM
JMP
%F'
AC3
OPCQDE
C[C)
"'
(CAl.,)
%F"AC~.
%HAC2
GUARD
OVRFb;
%F'DEX~i
lJNPFbl
UNDFkN
%FDEXIT
OPCODE
(OP)
""
(UP)
,+1
%FAC;1,
(~~~)
OVRFl.,l
UNPFhl
U~jDF~N
%EDEX
1,
T
IHIGH~ORDER
QUOTIENT
IGET
~OW~OROER
QUOTIENT
AND
IRE~~ACE
Bll
TAKEN
FROM
IT!
IMANTISSA
PORTION
COMPLETE,
IMUST
EXIT
WITH- 0
FOR
I
DIVISION
IEXIT
ROUTINE
WITHOUT
NORMALI~lNGt
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
C)
0
I 0
()
PAG~
5'7
FP1~T~
SRO
Sl)fjT 1
Tl.,E
EPO
lf~T~NON
0
03652
R
00(iJk')~vJ
A
OCHECK
0 0
0~653
R
2~)0527
H b
AC
OPCQDE
036~4
R
504~75
R
AND
(OP6TU9)
0
0~S6~5
R
544600
R
SAO
(M~C~
0
036~6
R 7450{90 A
S~<P:C~h
v)36:;7 R
544601
R
SAO
(OJ.V)
0
03660
H
7450~}0
A
Sf<PICCk
0
0366~
R
5446~7
R
SAO
(RPIV)
03662
R
4436~2
R
IS~
OCHECK
0
03663
R
623652
f~
JMP*
OCHECI~
0
IINCREMENT
EXPONENT
RQUTINE:R
0~S664
R
003664
R
lNgEXP
,DSA
0
v)3665
R
443?~4
R 1St
%EAC~
0
03666
R
740~J00
A
NOP
vJ3667 R
2~10527
R
bAC
OPQOOE
0
~):56j0
R 5046;1,0 R
AND
(OP)
0
0~611
H
5446i~J
R
S"O
(DP)
03672
R 60379J0 R
~H'1P
.+~
0
03673
R
2037~4
R
I~AC
%fAC~
0
03674
R
544710
R
SAD
(177~kj0)
03675
R
440,~tl
R
182
OVRF~;
0
03676
R
544577
R
SAD
(4k:l0)
0
03677
R
440~"6
R lS;c
OVRF'I~;'
vJ3700 R
203704
R
I;,AC
%fACl
0
0~701,
fi
544626
R
SAO
(40(1000)
0
0370~
R
4405s6
R lSi!
OVRF'Ci
037~3
R
623~~~
R
ItH'lP~
I,NeE
XP
0
03704
R
0000~J0
A
%PAC~
0 0
037v.J5
R
(~00~O0
A
%FAC~
0
03706
R
0vJ0tcHHJ
A
%PAC3
C1
0
03'707
R
0~'0000
A
%FAG4
0 0
~'~710
R
0~~00~~
A
%HAC~
0
0~71~
R
~~H"00~0
A
%HAC2
0
0
03712
R
'~H10000
A
%HAC3
0 0
037l.3
R
v.J0vHo00
A
%HAC4
0
037;1.4 R
y)(t)
0 0
~H~'
A
%J1:
0
0 03'1:].5 R
00000~~
A
%.J~
0 0
0371Q R
vj00000
A
%J3
0
0371'7
R
k100kt)~?0
A
%J4
0
0
03720
R
000000
A
%J5
0 0
0;372l
R
000000
A
%FSlGN·
0
1§IGN
OF
FbOATING
Ace
0 I
I 0
I
0
()
0 0
0 0
0 0
0 0
o 0
o 0
PAGE
58
FP1~T~
SRC
o
10
o
o
o
o
o
o
o
o
o
o
03722
R
D!Zl00kH)
A
03723
R
10
21
~
,.
R
03724
R
vJ00YJ~ftJ
A
03725
R
223724
R
03726
R
043704
R
o
03727
R
4437~4
R
0~730
R
223724
R
v)3731
fi
0437Y.)~
R
0~732
R 443724 R
03733
R 223724 R
o
03734
R
0437~6
R
o
QJ37~5
R
2037~2
R
03736
R 5047QJl R
03737
R
5447il
R
03740
R
6037~5
R
03741
R 544712 R
o
0~'142
F~
6037~5
R
0~743
R
102024
H
o
03744
H
623722
R
o
()
I
I
I
SUBTITLE
OOLJS\...E
..
.
....
,
..,..
" '
.1FUND
%NOQUE3
IDOU8~~
PRECI~lON
FLOATING
POINT
PA
9KAGE
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
Dl,.AC
DOAC
DFAD
()SUB
ODVP
Ot+1PY
DDVR
PS8R
L.OAD
StQRE
AOO
SlJSTRACT
DIVIDE
MU~TIPLY
REVERSE
DIVIDE
REVERSt:
SU,BTRACT
IR~QUIRED
PRO~RAMS,
F~OlNTa
GENERAb
F~OATING
POINT
ARITHMETIC
I
I
I
IDOU8L~
PRECISION
F~OATING
ICA\...~JNG
SEQU~NO~;
POINT
~OAO
(DLAe)
I
I
I
I
I
I
OLAe
%DPl
JMS
U~AC
ISUSR
CA~~
<XCT
IF
INDIRECT),
XCT
ADDR
IADDRESS
Of
DOU8hE
PRECISION
NEXT
JNST~UCTJON"
IRtrURN
ARQ
I~
PhT
ACC
o
J~1S
(1
%F'G
.......
'.' .
bAC*
%UPl
DAC
%FACl
IS2
%PPl
6AC~
%DPl
OAC
%fAC2
lS~
%DPl
l,.AC*
%OPl
DAC
%f;I\C~
LAC
DL.AC
-
AND
(77177)
SAO
(%OP,)A)
JMP
D~Ac?
SAD
(%QP6A)
~JI'+1P
O~Ac;g
J~1S
%r~OT,
JHPi~
9bAC
IGET
ADDRESS
OF
ARGUMENT
IARGUMENT
ADDRESS
IFIRST
WORD'
IEXPONE:NT
IPOINT
TO
SECOND
WORD
ILOW~OROER
MANTISSA
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
()
()
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
PAGE;
59
FP1~T~
SRC
03745
R
200'27
R
03746
R
5045/5
R
03747
R
544602
R
037~0
R
623~~2
R
03751
R
544637
R
0j7~2
R 623722 R
03753
R
102024
R
03754
R
623{~2
R
SUBTIT~E
ODUBL.E
DL.AC~
bAC
OPC::ODE
AND
(bp~T09)
SAD
(RSUB)
Jt~P~t
{j~AC
SAO
(ROlV)
Jt1Pu
O~AC;·
J
f~
S %
F\,
0 T
J
t·1
P
~t'~
0
k.
A C
.EJECT
C)
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
PAGf.:
60
FP1~T~
SHe
o
o
o
03755
H 0vJ00y)0 A
03756
R
1021~1
R
o
03757
R 0000k)Q) A
0~760
R
2"J3-/~4
R
03761
R
0637~7
R
03762
R
443'1~7
R
0~S763
R
2037~5
R
037~4
H
063??7
R
03765
R 44375'7 R
03766
R
2037r~2
R
o
o
03767
R Qi63"/:>7 R
o
03770
R
623'l,5
R
o
o
03771
R 000(1)00 A
o
03772
R
1~)21~1
R
0:.57'73
R
0000kJrIJ
A
03774 R
lf
J2i12 R
03775
H
1040~5
R
03776
H 4kJ3TI:5 R
o
03777
R
6231'71
R
o
o
o
~j4000
R v-J0000D A
o
040kil
H
1021~~
..
R
04002
R
kJ00kH60
A
04003
R
:tvj2~0vJ
R
04004
R
1037~2
R
vJ4005 R
404002
R
o
04006
R
lkj30~1
R
o
04007
R
leJ261k)
R
04v'l'Q R
(H10Y>00
A
0401~
f~
777777
A
o
0401,2
R
624'~~Ej
R
o
o
IDOUB~~
PRECISION
fLOAT~NG
ICA~bING
SEQU~NC~'
STORE
CDOAG).
I
I
I
I
I
OOAC
%PP2
JMS
ODAC
ISUBR
CALL(VALUE
IN
FLOATING
ACC)
XCT
ADOR
IAODR
OF
ARG
(XCT
IF
INDIRECT)
NEXT
INST~UCT~QN
ISU6R
RETURN
(VA~UE
IN
ARG
AND
F~aATING
ACe)
o
JMS
o
kAC
%[AC~
DAC~
%DP2
152
%{)P2
6AG
%FAC?
OAC*
~9P2
I.S~
%[)P2
hAC
%~AC~
DAC*
%QP2
JMP*
DDAG
IGE:T
AODRE:SS
IEXPONENT
12ND
WORD
13HQ
WORD
IDOUBL~
PRECl§JON
FLOATING
ICA~~lNG
SEQU;NGEi
POINT
SUBTRACT
(OSy'B)
I
I
I
I
I
PSUB
%DP3
I
JMS
U§UB
IMINUEND
IN
fLOATING
ACe
XCT
ADDR
IADDR
OF
SUBTRAHEND
(XCT
If
INDIRECT)
Nf;XT
JNSTRl,JCTJQN
ISUBR
RETURN
~'PIFFE:RENCE
IN
FI.,OATING
AC)
v.J
J~1S
o
%rG
,'- ' ,
JMS
%[NEG.
Jt"1S
lJF'
A 0
%DP~+40QHo00
J~iP~
-
"D~l,JB
IGET
ADDRESS
OF
SUSTRAHENO
ISTORED
ADDRESS
OF
SUBTRAHENO
INEGATE
MINUEND
(SU8TRAHENO~MINVEO)
IDOUBLE
PRE.CISION
ADD
IINOIRECT
ADDR~SS
(XCT)
Of
ARG
IEXlT
IOOUB~E
PECISION
PbOATING
foINT
MubTIPbY
(QMPV)
ICA~blNG
SEQU~NC~i
-
1-'
I
JMS
PMPY
ISUBR
CA~L
(MU~TIPLICANO
IN
F~ATING
ACe)
I
XCT
AOOR
IAPDR
OF
MU~TIPLIER
(XCT
IF
INDIRECT)
/
NEXT
lNST~UCTJON
ISUBR
RETURN
~PROOUCT
IN
FLOATING
Ace)
I
PMPY
%DP4
o
~n1S
o
JMS
YofH
._
t
J~'lS
PI..,AC
%[)P4+4kHiH000
JHS" .,..
%EM,
JMS
loflR,
0-
Jt'1PU
.EJECI
7~777?
Oi'-IP
Y
IGET
ADDRESS
OF
MUbTIPLIER
AND
ISTORE
HERE
IHO~O
F~OATIN~
Ace.
Ir~U6
TIPLlER
"/GENERAL
MU~TIPLY
IROUND
ANO
SIGN
IROUND
OFF
BIT
IMASK
IEXlT
o
o
o
o I
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
10
o
PAGE
61
fPl~T?
SRC
o
o
o
o
04013
R (ij00vJ00 A
04014
H
If'2151.
R
04015
f~
000000
A
o
04016
H
1037~5
R
04017 R
003714
R
04020
R
103122
R
o 04K'21 R
404015
R
04022
R
104025
R
04023
R
(;H'3714
R
o
04024
R
624~~~
R
o
o
10
04025
R
000000
A
o
04026
R
lY)21~1
R
04027
R
000'100
A
04030
R
102~~0.
R
04031
R
103722
R
o
kJ40~2
R
4040~"
R
04033
R
10:32~~
H
04034
R vJ00000 A
o
04035
H
(~H~00~;t
A
04036
R
102310
R
o
04037
R
(J00~H;)0
A
04~j40
R
7777'/7
A
01~j~1
R
o
624~25
R
o
o
o
c)
o
I
IDOV8bE
PRECISION
F~OATING
ICAL61NG
SEQU~NCE.!
I .
/
JMS
PQVR
I
XCT
AODR
I
NEXT
lNSTR~GTION
I
ODVR
%DP5
o
Jt1S
v)
%FG
.-
,
JMS
lJDAC
.OSA
~~!1,
Jr~S
D~AC
POINT
REVERSE
OlV1DE
(OOVR)
ISUBR
GALL
(D'VISOR
IN
FLT
Ace)
IADDRESS
OF
DIVIDEND
IR~TURN
(QUOTiENT)
IN
F~OATING
ACgUMU~ATOR)
IG~T
AODR~SS
qr
DIVIDEND
ISTORE
DOU[3~E
It,OAD
OOLJ8kE:
%DP5+400000
~,H'lS'
-
bOVD
IOlvIDr:ND
IP~VIDE
.DSA .
%J~
J~1P*
D9VR
I
I~~~~--~-----~~-~~-~~
I
IOOUB~~
PRECISION
P~OATtNG
ICA~6ING
SEQU~NCE'
I
IEXIT
POINT
OlVIOg
(DDVO)
I
JMS
DQVO
/SU8R
CAL~
(DIVIDEND
iN
F~OATING
ACe)
xcr
ADOR
IXCT
IF
INDIRECT
(ADDR
OF
POUBLE
PRr:CISION
DIVISOR)
I
I
I
DDVO
%OP6
%DP6A
N~XT
~NSTRUCTJQN
IRETURN
(QUOTIENT
IN
FLOATING
ACC~
o
JMS
o
J~·1S
%EH.
Jt·1S
r)L
..
AC
%DP6+4kJ0~~0
J~1S--
~
- . %[0,
CA~
t.H1P~
,EJECT
~
%FTR
,~t
~
777771
PDVO
.
/GET
ADDRESS
OF
ARGUMENT
IAODRESS
oP
DIVISOR
IHO~D
OIVIOENP
IGENERAL
F~OATtNG
OIVIOE
136
f3IT
AUOTIE:NT
/L~AST
S!GNI~lCANT
QUOTIENT
IROUND
AND
INSERT
SIGN
IROUNO
OFF
8Il'
IMASK
/EXlT
BIT
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
01
o
o
o
o
o
o
I 0 o
o o
PAG~
6~
FP1~T~
SRC
SuBrtTkE
~OLJf:3\.,~
o
IDQUBLE
PRECISION
Fl.,OATING
POINT
Rf::VERSE
SIJBTRACT
(DSBR)
o
ICAL~lNG
SEQU~NCE;
I
I
JMS
DS8R
ISUBTRAHEND
IN
fL.OATING
Ace,
o o
/
XCT
AkJIJR
IAODRESS
or
MINUEND
I
Nr:XT
INSTHUCT.l.ON
10'~
FF£RENCE
IN
FI,..OATING
Ace,
/
o o
04042
R o
0vJkH;HiJ
A asaR 0
04~43
R
1021'l,
R
JMS
~f~G
,
04044
R
0000w}0
A
%DP7
v)
o o
04045
R
1037~5
R
Jt1S
DOA(;
04046
H
k103
71.,(~
R
.DSA
%Jl
0404'l
R
lkj3/~2
R
Jt~S
DhAG
o o
040:;0
R
404~)44
R %DP7+4k10000
04051
R
1021~2
R
Jt~S
-'--%[NEG,
INE~AT~
suaTRAHENO
04052
R
1~J4055
R
JHS
I)F
AD
lAPP
DOU8~~
04053
R
"03714
R
%J:l,
IMINUEND~SU8TRAHENO
o o
04054
H
6240~2
R
!.JMP*
P~BR
I
o o
I_~_"_~
___ ___
~_w_~_~
I
IDQU8L~
PHECISION
FLOATING
POINT
AOD
(DfAO)
ICAI.,~lNG
SEQUENCEI
,.-
" "
o o
I
I
JMS
DPAD
IAl.JGE:ND
IN
Fl..OATING
Ace
10
o
I
,DSA
ADDR+400000
IXCT
If'
INOIRsCT
I
NEXT
,I,
N S T R U C T
JON
-
/SUBR
RETURN
(SUM
IN
rhOATING
ACe)
/
o o
04055
R
'o000~0
A
OFAD
0
'140:;6
R
1021~1
R
JMS
%~G,
IG~T
AODRESS
OF
AODEND
04057
R 000k:)00 A
%DP9
0
/STORE
ADDRESS
o o
04060
R
102300
H
J~~S
%F'H
IHb~t)
Pl..OATING
Ace
-,
04061 H
103722
H
Jr·,S
DhAC
04062
R
404~57
H
%f)P9+~~~~~0
04063
R 102447 R
%PP9A
~J
t'1
S
%EA,
IGENERAL
rbOATtNG
ADO
o o
04064
R
000043
A
43
IMAX
SHIFT
04065
R
102310
R
.J~1S
%FlR.
IROUND
AND
SlGN
04066
R
00
Vi
k:H~
~1
A
y;"~
I~EAST
SIGNIrlGANT
BIT
04Q}67
R
777777
A 777777
IMASK
o o
o
04070
R
624~:?~
R
.)MP';~
U~AD
. o
.EJECT
o o
o o
o o
o o
o o
o
c)
()
()
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
PAGE;
63
FP1~T?
SRQ
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
c'
()
o
o
o
o
o
o
o
o
o
o
o
10
o
o
o
o
o
o
o
PAGE
64
FP;1.~T~
SRC
04071
R 00.0000 A
04072
R
1021~1
R
04073
R
0000vj0
A
04074
R
224~)7~3
R
040i5
R 5046.50 R
04076
R 0437vJ6 R
~J4077
R
224~l;,s
R
£141,00 R
50465?
R
04101
R
244~77
R
04102
R 3447:t0 R
04103 R
043704
R
0~104
R
4440~3
R
04105
R
2240(3
R
041kl6 R
504660
R
041~7
R
0437~5
R
04110
R
224073
R
04111 R
504b~6
R
0~112
R
043?17
R
.TITb~
SUBTITh
E
SING~E
.IFUNq
%NSIN~
IS1NG~~
PRECI§~ON
F~OATING
POINT
PACKAGE
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
PI,AC
FDAC
-FAD
FSl)B
FMPY
FDVD
PSBR
FQVR
SlNG~E
PRECISlON
~OAD
DEPOSIT
ADD
Sl)8TRACT
MUbTIPI~Y
OIVlOE
REVEfiS~
SUBTHACT
REVERSE
DIV1D;
IREQUIRED
PRO~RAM~;
F~QINT(GENERA~
P~OATING
ARITHMETIC)
I
ITER~1S;
I
I
I
I
I
1.
A~REG
PPP~15
HARDWARE
ACCUMULATOR
~.
F6
T-
Ace
Fk.OATING
ACCUMUbATQR
(%PAC~,%FAG2,%FAC3)
3~
HECq
A~G
H~kD
ACCUMULATOR
(%HAG~.
%HAC2,%HAC3)
IF~OATING
POIN!
b9AO
!F~AC)
ICA~blNG
SEQU~NG~;
I
~MS
F~AC
ISU8R
CA~~
/ .OSA AODR+400000
IADDR
OF
S,P,
FLOATING
POINf
NUMBER
/SUBR
RETURN
I
NEXT
INST~UCTJON
.-
I
I
fL.AC
%sPl
'"
J~1S
o
6AC
n
AND
PAC
kAC~
ANO
XOR
TAD
OAC
IS~
l..AC~
AND
DAC
bACn
AND
DAC
%FG
--
,
%SPJ,
(i770f00
%FAc
3
-'
%SPl,
U2100177
(000400
('777400
%FACi-
IoSPl
%SPl
(J777/7
%F
AC2
.'
%~Pl
(400000
%j4
..
-
IG~T
ADDRESS
11ADORESS
OF
SINGLE
PRECIsiON
WORD)
IHIGH~OROER
WORe
AND
~P~lT
IGf';T
'60W~OR()ER
MANT
1
S~A-
ISP~IT
AGA~N
IGE;r
EXPONc':NT
IEXTEND
SIGN
BIT
TO
FI~~
OUT
EXPONENT
WORq,
IBWMP
TO
S~CONO
WORD
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
0 0
0 0
PAGE
65
FP1::>T~
SRO
SlJBTlT6E
~~N9~.~
0
0~~:t.J
R
203705
R
bAC
%FAC2
0
041:1.4 R
343717
R
TAO
%:)4
04115
F~
'14~i'1v)5
R
OAC
%f"
ACZ
0 04116 R
6~40?:J.
R Jt4Pu
FCAC
IEXIT 0
I
I~--~-~------~~--~~-~
0
0 I
IPbOATING
POtNT
STORE
0
ICA~bING
SEQU;NC~;
0
I
t,H~S
F!)AC
IS~)~R
CA~L..
I
XCT
ALlDH
IAPOR+400000(,lP
INPIRE;CT)
I
NEXT
tNST~lJ.CTJON
IRE:TURN
0
0 I
I
'21411,7
R
0vHH1~vl
A
PDAC
(1.1
0
04120
R 102l=>1 R
JMS
%EG.
IOE:T
ADDRESS
0
0412;1" R vJ0000Q) A
%SP2
0
I(ADORESS
OF
SlNGbE
PFU':CtstON
WORD)
04122 R
203104
R
bAC
%F,~ACl
IGt:T
EXPONI;NT
0
04123
R
5046~5
R
AND
(0Q,l0777
ISTR1P
OFF
~EFT
HAbP
0
04124 R '364121 R
DA
C~~
%SP2··
ISTORE
EXPONENT
~J
412 5 R
203706
R
l~AG
%~~AC3
IGET
~O~~~OROER
MANTISSA
0 04126 R
504~30
R
AND
(
;1770~0
ISTRIP
Or
RIGHT
HAbP
0
04127 R
364121
R
TAD~
~IqSP2··-
.
IME:RGE
WITH
EXPONENT
04130
R
~1641~1
H
DAC~
%SP2
ISTORE
COMPI,ETg;o
WORD
0
0413:1..
R
444121
R ISc
%SP2
IPoINT
TO
N;XT
RE:CE:IVING
AREA,
0
04132
R
20370~
R
I~AC
%~~ACg
IHJGH~ORDER
~1ANT
I
SSA
04133
R
~2J641~1
R
DAC*
%SR2
ISTORE
IT
0
0
04134
R
6241~7
R
.J~1P(~
FPAC
IE.XIT
I
0
I~~~~-~~~---~-~--~~~~
I 0
IPbOATING
P01NT
AUD
(FAD>
ICA~btNG
SEQUENCE;
0
0 I
~H1S
-
FAD
IS4Br~
CA~L
I
XCT
A(JDR
I(X9T
IF
tNDIRgCT)
I
Nf.:XT
I.
N S T
~
U C T
JON
IRETlJRN
HERE
0
0 I
ITHts
SUBROUTINE
DOE$
THE
SET~UP
WORK
FOR
SUBROUTINE
%PA,
ITHE
AUGEND
IS
STOREO
IN
THE:
HE~D
ACCU~lUl"ATOR
AND
0
0
ITHE
APDEND
IS
l"OAOED
INTO
THE
FbOATING
ACCU~1UbA
TOR,
IROUNQ~D
AND
THE
~IGN
IS
INSERTED,
I
0 I 0
04135
R
000000
A
FAP.
0
04136
R
1021~1
R
J~1
S
%EG,
IGET
ADDRESS
0
04137
R
(iJ000~0
A
%SP3
0
I(ADORESS
OF
SINGL.E:
PRE.CISlON
A()DEND)
0
041410 R
1023~yj
R
J~1S
%[H,
IMOVE
FLOATiNG
Ace
iO
HElO
Ace.
04141
R
1'14071
R
J~lS
F'~f\C
I\.,OAD
FL.OATING
AC
0 041.42 R
4041~7
R %SP3+400V.l00 0
04143
R
102~~7
R
~JMS
--
"%eA,
IGE:N~RAL
PbOATlNG
ADO
04144 R
E100VJ43
A
43
"
0
04145
R
102~i0
R
J~1S
%[IR,
IrbOAT1NG
XNSERT
ANO
RouN'r
0
04146
R o
~J
(iJ
4
QH~J
A
~~vJ
IROUND
0 0
0 0
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
FP:1,~T~
SRC
04147 R
777~~0
A
04150 R
6241J5
R
0415~
f~
0000010 A
04152 R
1021'1
R
04153
R
Cl000~J~j
A
04154
R
1k121~~
R
04155
I~
1041~5
R
041fj6
R 40415;'; R
041:;)7 R
6241~1
R
0~1~yJ
R
00(009)
A
04161
R
1021~l
R
04162
R
000~)00
A
04163 R
102j{()0
R
04164 R :1,04071
f~
04165 R
404i~2
R
04166
R
103~?1
f~
04167
R
102~1'~
R
04170
R
00040k1
A
0417:1. R
777~kj0
A
04172
R 62416(;] R
SLJSTtT~E
SlNG~E:
1?700~
IMASK
JMPo
FAD
/RETURN
IrbOAT1NG
POINT
SYBTRACT
ICAL~ING
SEQUENCE;
I
.~.
JMS
-
F~U8
/SUBR
CA~~
/
XCT
AOOR
/XOT
If
INDIRECT
I N
EXT
IN
S T R l) C T 1 0 N -
IS
U 8 R
RET
URN
/
IfhOAT1NG
POINT
SUBTRACT
DOES
THE
SETUP
WORK
R~QUIR~D
TO
IPERfORM
THE
E~OAtING
POINT
ADD
INSTRUCTION.
THE
MINUEND
lIS
NEGATED
AND
UPON
RETURNING
FROM
%FA
t
THE.
SUM
IS
INEGAT~D.
THI~IS
OON~
TO
TAKE
FU~b
ADVANTAGE
OF
%FA.
ANO
ITO
MINIMlt~
90R~,
I
FSUB
0
%SP4
I
I
Jr'1S
%[G,
o
~H1S
%fNEG
I
J~1S
F:AO
%SP4lf.400000
J~1P~·
-
--
~:'§UB
IG~T
ADDRESS
OF
SUSTRAHEND
ISToRE
ADDRESS
IN;GATE
F~OAT!NG
Ace
I,PSA % SP1+400000
(INDIRECT)
IEXIT
IFbOATING
POINT
MYbTl.~bY
(FMPY)
ICA~~lNG
SgQUENC~1
I
JMS
-
F~PY
I~NTRY~EXIT
I
~CT
ADOR
/AOPRESS
Of
MUbTIPblER(XCT
IF
INDlRECT)
I
NEXT
INSTRUCTION
IR~TURN
HER~
I
..
.
.,
IFMPY
QOES
THE
SETUP
WORK
NECESSARY
TO
EXECUTE
THE
GENgRA~
IF~OATING
POI~T
MQbTlebY
INSTRUCTIONINAM~~y,~TORING
TH~
.
IMU~TIPkICAND
IN
THE
~E~O
ACCUMULATOR
AND
ILOADING
THE
EbOAflNG
POINT
ACCUMU~ATOR
WITH
IMUL:,TtPl..IER
/
FMPY
%sP5
o
J~'1S
o
JNS
%EH
e
~H1S
f~AC
%SP5lf.400000
J~1S
--
%~r~.
Ji'·1S
%[IH.
J~1P*
.EJECr
400
7770k1k7
Fi1PY
-
IGE.T
ADDRESS
/ADDRESS
Of
SING~E
PR~CISIQN
MULTIP~ICAND,
ISTORE
IN
H~kO
ACC,
I~QAD
MU6T~PLIgR
IlNDIRECT
AOORESS
IG~NERAL
FbOATING
POINT
MUbTIPLY
IROUNO
AND
INS~RT
SIGN
or
PROQUCT
IMASK
FOR
ROUNO
OFF
/EXIT
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
PAGE
67
()
o
o
o
0
04173 R
00000.0
A
0
04i74
r~
1021~1
R
041'15
R
000~v)8
A
04176
R
102~H:Hi)
R
0
04177
R
10401~
R
042~0
R
40417~
R
0420~
R
If'32.5l.
R
0
04202
R
00v.H~kJ0
A
04203
R
~10000l
A
04204 R
10231'P
R
0
04205
R
vJ004kH?
A
042~6
R 7'170'10 A
c;J4207
R
624i'i3
R
0
0
0
0
0
0
0
0
0
0
0
S
lJ
S T l T L E ?
~N
G
~
E
I
IFboATtNG
POINT
DIVlD;
CFDVD)
ICALblNG
SEQU~NC~'
I
JMS
FOVD
I
XCT
APDR
I
NEXT
INSTRUCTION
I " ""
..
ISV8R
CAL.L
IAPOR.
OF
OlVl~OR
IS~BR
'RETURN "
IPOVO
DOES
TH~ S~T
uP
FOR
%FO,
THE
GENERAL
PURPOSE
FLOATING
IPQINT
INSTRU9TIO~.
II
DOgS
THIS
BY
/STORING
THE
OIVID;NP
IN
THE
H~~O
Ace
AND
BY
~TORING
IDIVISOR
IN
TH~
F~OATING
Ace.
I
..
-
.,.
..
..
I
PDVD
%.SP6
o
JMS
o
J~1S
%EH,
Jt,1S
FLAC
%SP6
...
4
0~H10~
JMS'
--'%[0,
CAk
IG~T
ADDRESS
Of
DIVISOR
IAODRESS
OF
DIVISOR
IHO~O
tT
IbQAO
DIVIsOR
IGEN~RA~
P~OATING
OIVIDE
~
IQUOT1~NT
81T
JMS
~F1R.
IlNS~RT
SIGN,ROUNDOFF
4~0
7770rora
J.tt1P~~
f-"9VD-
E~)EC!
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
PAGE
68
FP1~T?
SRC
o
o
o
o 0423.0 H
000000
A
0421~
R
102l~1
R
042:1.2
f~
k1000~0
A
04~lq
R
104117
R
04214
R
kH13
'11'1
R
04215
H
1040?1
R
04216
R
4f~4212
R
o
042~7
R
1021~2
R
04220
R
10416~j
R
o
04221
H
0037i4
R
04222
R
624210
R
o
o
o
o
04223
R
000000
A
04224
R
102l~1
H
o
QJ4225
R
it.i00000
A
04226
R
1041~~7
R
04227
R
0v)37~4
R
o
04230
R 1£14071 R
'~42;S~
R
4042?5
R
04232 fi
10417~
R
04233
R
0~J37i4
R
04234
R
624223
R
o
o
o
o
o
o
Sl,H3T
1
TkE
~
I
NGI.,~
I
IR~VERSE
SUBTRACT
CfS8R)
ICA~bING
S£QUENC~I
I
",
J~1S
..
fSBR
ISUBR
I
XCT
AUOR
IAPDR
CAhL.
OF
MINUENDeXCT
If
INOIR~CT)
I
NEXT
~NST~UCT~ON
ISUBR
RETURN
PIPFERENC£
IN
F~OATING
Ace.
I
I
F'SBR
0
%SP7
I
I
I
~n1S
%f.:G,
~)
J~1S
FqAC
.PSA
%Jl
Jtf\S
FCAC
%SP7+4@0000
Jt'1S
-
....
- -
%r~NEG,
~HilS
FAP
,DSA
%J:\
J~'P{~
r§8R
IREV~RSE
OIVIPE
(PDVR)
I~ET
ADDRESS
OF
MINUENO
IN~GATE
SUBTRAHEND
IAOD
IMtNUENO~SU8TRAHENO
ICA~~ING
SEQU~~CEi
.
I
...
JMS
-POVR
ICA~~,OlVISOR
IN
FLOATING
Ace,
I
xcr
A60R
IAODR
OF
DIVIDENO(ACT
IF
INDIR~CT)
I
NEXT
JNST~UCTlON'
ISUBR
RETUR~(QUOTt~NT
IN
FhOATING
I
I
FDVR
%SP8
o
J~1S
(I)
JMS
FUAC
lOSA
%~~
JMS
F'hAC
%SP~>t1~~r~~~
~.J~lS
F.PVO
'DSA
%jl
I .....
_,
J
~1
P
~
r'
tJ
v R
E:JE:CT
.....
I~~T
AODRESS
Of
DIVIO;ND
ISAVE
OIVISOR
IUSE
HE~D
ACCUMU~ATOR
TEMpORARI~Y
I(OIVIDEND)
I(ADOR
OF
DIVISOR)
Ace,
)
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
()
()
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
PAGE
69
FP1~T~
SRG
04235
R
000000
A
04236
R
750004
A
04237 R 5000i0 R
04240
R
7412~~
A
0424~
R 62423:; R
04242
R
200073
R
04243 R 844546 R
04244
R
2041i~
R
04245
R
~1400'l3
H
04246
R
6042~6
R
04247
R
204546
R
04250
R
0400(3
R
04251
R
6042~~
H
04252
R
000000
A
04253
R
2042~2
R
04254
R
040073
R
04255 R
6042~~
R
04256 R 777773 A
o 4 2 5
'7
R 0 4 0 0 2
kJ
R
04260
R
6200~2
R
04261 R
7777!~
A
04262
R
040020
R
04263
R
14002~
R
04264
R
1400?2
R
042~5
R
62vHj~t:?
R
04266 R 777777 A
04267
R
040020
R
04210 R
2046~6
R
04271
R (640f022 R
04272
R 777777 A
04273
R
0400~l
R
042'14
R
620~'62
H
04275
R 0000k10 A
04276
R
200073
R
04277 R
"344~62
R
043'10
R 20471:1 R
04301
R
040076
R
04302
R
6200~?
R
04303
R
204562
R
04304
R
04007~
R
04305
R
624275
R
Sl,)BTIT6E:
~~NGh.E
ITE;ST
FQH
DATA
I
'SW~0'
WHICH
INHIBITS
THE
fFPPl5'
TEST,
HObDSW
v.J
kAS
ANO
SNA
Jt-1PU
L.AC
[JAC
bAC
OAC
J~1P
HUk,DSW
OSTSw0
SAVQST
(~O~P~~
OSTS~~'"
l;XtT~15
SAVPS;'
PSTsw0
H9kDSR*l
IOATA
'SW10'
lIS
SWITCH
SET?
INQ,
EXIT
lyES,
HA~T
PROGRAM
IRES
TORE
RETURN
ADDRESS
IRE:TEST
SWITCH
HObD.l
bAC
OAO
J~1R
ISU8ROUTlNE
TO
I
UPDATE
"DSTSWv'"
ON
l:;XIT1NG
PCNEXT
0
bAC
PCNEXT
DAC
o§Ts~~0
J M P
E.
X I T
~1
S
ISUBROUTINE
TO
EX~T
'~5'1
I
~XITM5
~At·J
DAC
SYSERR
Jr1P~~
SERV
I
CE:
ISETUP
TO'
TYPE
'UONE
i;
I
;XITM4
bAW
"4
DAC
SYSERR
D~M
SYSERR+1
Ol~1
~RCOPE
J~'1P*
stRV
ICE
IERROR
~,
FPt~
CONrIGQRATION
t:;RRORl
'LAW
.
~,:L
OAC
SYSER~
6AC
(1
OAC
E,RGOO;
l.~AW
~1
DAC
~RGOP~"l
J~1P~~
~E;RV
l
Cl;:
IRE~SET
tDSTSW~'
to
CONTINUE
gXTERR
0 "
I",AC
PSTSyJIa
DAC
SAVAlJR#
bAC
~t*3
~
OAC
DSTSWVJ
J~'1P{~
SEfiVlcE;
~AC
SAVAOR
DAC
PSTsw0
JMPi~
~X.TER8
.E,,)ECT.
NOT
pRESENT
IERROR
CODE;
AFTER
TYPING
ERROR,
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
FP1~T?
SRC
o
04306
r~
000~tH'
A
04307
R 144;)1 4 R
04310
R
705~12
A
o
0~311
R
044544
R
0431,2
R 7055:1.1 A
04313
f~
700002
A
04314
R
'7173~H~
A
043;1,5 R
W000~0
A
04316
f~
71vJ~l1
A
04317
R
0~)001!)0
.A
o
o
04320
R
710177
A
0432:1.
R
0k~0547
R
04322
R
7101~(1
A
04323
H
00")547
R
o
04324
R
703~.Hj1
A
04325
R
70vJ0~2
A
04~26
R
2f;)4!J~1
R
o
v)4327 R
504626
R
o
04330
R
705!:>04
A
04331
H
6243~~)~
R
o
04332
R
0k'00V?':J
A
043J3
R
7777~~
A
04334
R
040020
R
04335
R
777777
A
o
04336
R
04002j~
R
04337
f~
20421'J
R
04340
R
040022
R
o
0434+
R
104~~5
R
04342
R
10442'7
R
04343
R
6243~2
R
o
o
04344
H
040023
H
04345
R 777776 A
o
04346
R
04002!~
R
0434'7 R
7777r~')
A
043~0
R
vJ4002l
R
0435~
R
2v)42~~
R
043~2
R
040022
R
o
043:>3 R
104275
R
04354
R
104427
R
04355
R
600~1~
R
..
,
~
o
o
o
o
o
SUBTITI"E
StNG~E:
SF:TPMP
0
f)
~
~1
RPL.
OAO
lSA+1VJ
~OF
-
DMN
o
FPT
o
OSR+-77
REGA08
OSR
REGADR
DBK
.
lON
~AC
AND
lSA
Jr'1p{~
tERROR
2
IOATA
~RROR
I
~RROR2
0
bAl1
OAe
hAW
nAC
bAC
DAC
JMS
Jt'1S
J~1P~~
I
IEHROR
3.
APION
A~tON
APXON
(~000~0
M2
SYSERH
~l
-
SYSEHH+l
( 2 -
EROODE
tx,EHH
ERRQH
.-
E.RROR~
IUNEXP~CTEO
'J~A'
8R~AK
I
;RHOR3
PAC
b
AW
OAC
~A
~~
PAC
~AC
PAC
JMS
Jt·1S
J!'1P
.EJECT
~2
SVSERH
!!r.~
SYSERHof11
( J
_.
E:HCOOt::
l;XTERR
~RROH~
fPABOHT
lIS
'API'
ON?
ISET
tAPI'
SWITCH
ITURN
'AP1'
oFF
ITURN
INTERRUPT
OPF.
ITURN
ON
FPP
OIAG.
MOOg
IDUMMY
INSTRUCTION
/READ
REGISTE:RS.
ISTORE
DATA
IN
TABbE
ITURN
PIAG
MODE
OFF,
/ENA8~E;:
'P
I ,
IENA81,.e;
'AP
t'
I
F'
I T
WAS
ON,
ITYPg
ERROR
2
HEAD~R
IDUMP
DATA
REGISTgRS
ISAVE
NUMBER
OF
ERROR
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
C)
o
PAGE
71
FP1~T?
SRC
o
o
04~56
R
'?)40y)t:!~
R
043~7
R
777776
A
04360
H
04002(1
R
o
0436j,
f~
777716
A
04362
R
04002i
H
04363
R
2~J4646
R
()
043b4
R
~}4(1022
H
04365
R
104215
R
04366
H 1v)442'7 R
()
04367
R
6001~~
R
o
o 214370 R
777776
A
0437;1. R v.140020 R
04372
R
777777
A
04373
R
y-'1400?1
R
04374
R
2046~'1
R
o
~~43'75
H
(540022
R
043'16 R
104275
R
04377
R
104427
R
o
04400
R
600414
R
o
o
04401
B
777779
A
04402
R
04002'~
R
04403
R
777776
A
04404
R
040021
R
o
04405
H
2046~0
R
04406
R
0400Z2
R
04407
R
2~):t
7~4
R
04410
R C)40023 R
o
04411
R
104275
R
o
04412
R
104427
R
04413
R
600444
R
o
o
o
o
o
o
SlJBT
I
T~E
S 1
NGhE:
IERROR
4
IEXPECTEP
'JEA~
I
ERROR4
PAC
I~RROR
5
bAW
f)AC
6A
~~
DAC
hAC
OAC
J~1S
J~~s
J~1P
I
IL,OAO
AND
STOR;
I
ERRORS
LAvJ
tERROR
6
DAC
~AW
OAC
l.,AC
DAC
"H'1S
.J~1S
Jt,1P
I
IAN
llN~XPECTEP
I
gRRQR6
LAW
bAC
t
...
AW
DAC
bAC
OAC
bAG
DAC
J~'1S
J~1S
J~1P
tEJ~CT
8R~AK
BUT
NONE
OCCWRR~O
"2
SYSERR
~~
-
SYS~RH+l
( 4 .
t:ROODE:
f;XTERR
C:RROR-
FPABORT
er2
SY$ERR
!!'l -
SYSERRtj,
( 5 -
E;RCODE;
r;X'fERR
ERHQR-
F~P-ABO~T
,BRANCH'
OCCURRED
~2
SYSEHR
e14
-
SYSEI~R+l
( 6 -
EHCOOE
NBRANCH
I;RCOl)E
"'1
EXTERR
I;RRQR-
F~~ABO~T
ISAVE
NUMBER
Of
~RROR.
I#~,
~RROR
aoog
6
/#2,
FAllmlNG
'.BRANCH'
lOT
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
PAGE
72
FP1~T~
SRG
o
04414
R
777716
A
044;1,5
R v)4002(0 R
o
04416
R
777776
A
o
04417
R
040~21.
R
04420
R
2046~1
R
214421 R
")40022
R
04422
R 20J
.•
7'l2
Ii
04423
R QJ40023 H
o
04424
R
10427~
R
o
04425
R 6'14427 R
04426
R
600414
R
o
o
o
04427
R
vj(~0000
A
04430
R
104306
R
04431
R
77777~
A
o
044;.52 H fJ4002kj R
o
04433
R 7777'70 A
04434
R
04002j.
R
04435 R 204561, R
o
04436
R
3447~5
R
044~7
R
040022
R
04440
R 200:>27 R
w'4441 R
~140023
R
04442
R
2vJ0~lt
R
o
~'4443
R
040024
R
o
04444
H
2vj0~20
R
04445 R
040025
R
0444(, R
200!;;l6
R
o
04447
R
0400~6
H
o
o
o
o
o
o
Sl}BT
1
T~E
SINGl,E
IERROR
7
INO
'BRANCH'
OgCURRED
WHEN
EXPECTED.
I
;RROR7
LAW
"2
OAC
SYSER~
6AW
~2
OAO
SYSER~~+j,
~AC
( I
DAC
E.R.COP;
Itt
1,
ERROR
COOe:
7
hAC
YBRANGH
DAC
EROOP~i!1
I#~'
fAlbING
'BRANCH'
lOT
J~'1S
t:XTEHR
Jt1P
ERHQR-
J~1P
FPABORT
--
1***********o**ao*********~*.o*.******I******'***********0********
I
IERROR
FORMAT
FOR
AL.6
PATA
ERRORS
I
IFP1~T2~RATlo~EuNgTloNMFMa
H~LOW~EPA~FMA
He~OW~EPA
IFMA
H~
fMA
~~
EPAn
(~TOREO
DATA'"
(C~ACULATED
DATA)
I
1***************o**O**********************.*********~*.*****0000*0**
I
~RROR
0
J.~1
S
S~Tot~~
IQUt1P
OIAG
RE:gIST~RS
LAt~
~2
DAC
SYSERR
I~
A
~~
~10
-
DAC
SYSERH+-l
IPRINT
10
DATA
WORDS
bAC
RATIO~
TAD
(
40:1.
[lAC
~RCOD~
I#~,
RATtO
l"1
AC
OPCODE
DAC
~RCOOE+l
I#~,
FUNCTlON
hAC
%XHAC2
OAC
~RcoDt+2
1#3,
FM8!1H
,8E:F'ORE
bAC
%XHAC3
OAC
t:RcooE+3
I#~,
F~18~b
J8;F"ORe:
hAC
%XHACl
OAC
;~OOD~+4
/#5,
E:PA
;8E:FORE
.E.,JEer
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
C)
0
PAGE
73
FP1~T?
SRC
0
04450
R
200?14
R
0445~
R
04002'1
R
04452
R
200515
R
0
04453
R
~j40060
H
04454
R
200'16
R
04455
R 04006:1 R
0
044,6
R
1042~::;
R
04457
R
777776
A
04460
R
04~J0~0
R
0 04461 R
7777/2
A
04462
R
vJ40~21
R
04463
H
2005~..$
R
0
04464
H
040~122
R
04465 R
2005~~
R
04466
R
040023
f~
0
vJ4467
R
200~52
R
04470
R
040024
R
04471 R
200532
R
0
04472
H
(~40~J25
R
(lJ4473 R
2005~3
R
04474
H
040~42
R
0
04475
R
2005
yl R
04476
R
040t127
R
04477
R
104275
R
0
04500
R
777776
A
0450~
R
tiJ4002frJ
H
04502
R
777'17,
A
0
04503
R 040021 R
04504
R
20370:)
R
04505 R
040022
R
0
04506
R 203'1106 R
04507
R 040023 H
045:].0 R
203704
R
0
0451~
R 040024 R
045i~
R
1042'75
R
04513
H
1042~5
R
0
04514
R
624~~?
R
_
..
0
0
0
0
I 0
0
0
SUBTIT~E
?tN~L,r~
~AC
%XfAC2
OAC
ERCOl1E:+5
b
AC
%XfAC3
DAC
~HCOOE+6
bAC
%XFACl
DAC
£RaODE>~7
J~1S
£~TER8
bAW
~2
OAC
SYSER~
bAW
f!"t6
DAC
5YSEHR+l
L.AC
R~GADH"'4
DAC
ERCOPE:
I",AC
HEQADH+5
PAC
~~COD~+l
bAC
REGADR*3
DAC
ERCQDt:+2
t.AC
%ANSR2
(lAC
ERCOUt~3
b
AC
%ANSH§
OAC
E:~COP~+4
bAC
%ANSRl
DAC
E.~COO~+5
JMS
EXTERR
. -
~ ~
..
bAW
~2
DAC
Sy$ER~
hAW
~.s
DAC
SY~ER~"':1.
bAC
%FAC2
DAC
ERCOOE
","
"
."-
b
AC
%fAC3
PAC
~8COP;+1
bAC
%F'AC~
DAC
~ROOP~+2
J~1S
E:XTERH
\H1S
HqbDS~
J~1P~~
E:RROH
.EJECT
1#~,fMA~H
.BEfORE
/#7,
FMA"b
,8E~ORe
I#~,
gPA
iBEFORE
IOUMP
DATA
/#;,
F
~1A
H J (ORR)
I#~,
F'MA
it,
I
(ORR)
1#3,
EPA
i(OHR)
/#~,
F'MA
H
,STOREp
/#5,
FMA
l.
,STORED
I#e.
EPA
;STORE:D
/DUMP
PATA.
I#~,
FMA
H
JCAbCU~ATEp
/#Z,
FMA
b
JCAbCU~ATED
/#3,
EPA
;CAbgU~ATED
/CH~CK
FOR
TH~
HO~D
SWITCH.
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
c)
0
0 0
PAGE
74
FP1~T~
SRC
SU8TlT~E:
SINGL.E
-.
'-
,.
..
"",
..
,
0
IRANOOM
NUMBER
~~NF.;RAIOR
0
/
04515
R
000~~~
A
RANGE:N
0
0
04516
R
3400~0
A
TAD
0 0
04517
R
344~40.
R
TAD
RANA
04520
R
344~4i
R
TAO
RANB
0
01
52
;1
R
3445~2
R
TAD
RANC
Q
04522
R
044~~~
R
DAC
RANA
04523
H 7?00:L0 A
GL.K
0
C)
04524
R 3437
1.i
R
TAD
%HAC~
04525
R
344~40
R
TAO
RANA
04526
R
344541
R
TAD
RAN8
0
04527
R
344~42
R
TAD
RANG
0
04530
R 04454l R
OAC
RANS
0453~
R
750010
A
GL..K
0
04532
H
3437~2
R
TAD
%r,AC~
0
v.J4533
R 344,4Q;1 R
TAO
RANA
04534
R
344541
R
TAD
RAN8
0
04535
R
344~42
R
TAD
RANC
0
04536
R
044~4~
R
DAC
RANC
04537
R
624~~5
R
J~1P~
RANG;N
0 /
C)
04540
R
72132~
A
RANA
72~32~
04541
R
6~77~~
A
RANB
62774,
0 04542 R
013212.
A
RANC
~'132:l.~
C)
9.14543
R
k1000~~
A
PGM~OP
0
04544
R
0fHH~00
A
APION
0
0
04545
R 000000 A
PASCNT
(1
0
04546 R
000000
A
$AVDST
0
04547
R
vJ000~~
A
AUTORG
0
0
04550
R 000L100 A
TEMP~
0 0
0455t
R 0000@0 A
TEMP?
0
-
..
0
.EJECT
0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
-
--
_.
-----~-~-.
---,.
--
-----
--
-----
---
-----
--
----
--
----
--
-----
C)
o
0 o
PAGt::
75
FP1~T~
SRC
$lJ8TITbE
stNG~E.
,.".
--·,'1
0
000000
A
.ENO
04572
R
000074
R
*~
04573
R
720c!;HJ0
A
*h
0
04574
R
00143~
R
i~b
045'i5
R
0074~~
A
Ab
04~76
R
0060~0
A
*h
0
0457'7
R 0004'.10 A
n!.,
04600
R 0014f10 A
~h
04601
R
0020$0
A
~~b
0
04602
R
001~~0
A
~h
04603
R
000040
A
~H~
04604
R
00~H~~0
A
ijL,
0
04605
R
000~~l
R
~b
04606 R
000~i3
R
~~b
04607
R
0005l.6
R ;·b
0
04610
R 00010y; A
;~b
o
o
o
o
o
o
04611
R
000~3~
R
~6
04612 R 0005;1.4 R
~b
04613
R 000517 R
i~
6
04614
R
000~L33
R
i~
b
04615
R
00.0515
R
i~
6
0
04616
R
~1005th~
R
~6
04617
R 770367 A
~b
04620
R vJ000l;0 A
nL,
0 0462:1- R
003~~0
A
~6
04622
R
7701'17
A
~b
04623
R
003600
A
~b
0
04624
R
7777~?
A
~b
0462~
R
0000~0
A
~~
04626
R
4000~0
A
~~
0 04627 R
000140
A
*6
04630
R
"177000
A
~b
0463l
R 777777 A
~~
0
04632
R
0010.~2
R
~k
046;53 R
00074'7
R
~b
04634
R 037777 A
~~
0
04635
R 777032 R
~~b
04636
R
777iiB
R
~6
04637 R
0021~0
A
~~
\"
0
04640
R
000k?~7
A
~6
04641. R
000027
A
~~
04642 R
001f77
A
~~
b
0
04643
R
0000.~1.
A
*6
04644
R
000~~~
A
#6
04645
R 00.0003 A
~k
0
04646
R
000~~1
A
n~
04647 R
000005
A
*~
04650
R
000~~~
A
~b
0 0465:1. R
01Zl00kJ
tl A
*k
04652
R 0100011 A
~~
04653
R
(?000.~~
A
*k
0 046:;4 R
000013
A
~b
04655 R
00071?
A
*~
o
o
o
o
o
o
o
o
o
o
o
o
0 o
0 o
l)
0
0 0
PAGE:
76
FP1~T?
SRO
5USTITl.,E
~
JNG~E,
0
04656
R
r1QH1~~0
A
~·b
0
04657
R
000020
A
~~b
04660
R
~777?7
A
~b
0
04661
R
200':'~0
A
~~
0
04662
R
0000~5
A
1~
k
04663
R
000014
A
~b
0
016~4
R
0':)0~~;>
A
~·k
0
04665
R
000035
A
~'l~
04666
R
7777~f
A
~.~
0
04667
R
0001
~~!'
A
#L,
0
04670
R
000050
A
*6
0467:1,
R
716~~1
A
{·b
0
04672
R
7;l.6~~2
A
~l,.
0
04673
R
716~~3
A
~b
04674
R 716604 A
~k
0
04675
R
716~~~
A
~b
0
04676
R
716~l0
A
1~b
04677
R
716620
A
~b
0
04700
H
v)00~22
R
~6
0
04701
R 077717 A
~b
04702
R
777377
A
~H~
0
04703
R
000377
A
~~6
0
04704 R
000043
A
~~
b
04705 R
002~~0
R
~b
0
04706
R
30~H1,=,'3
A
~~
0
04707
R
100~~v)
A
ub
04710 R
7771~0
A
{t-~
0 04711 R
004063
R
~h
0
04712
R
004033
R
nb
04713
R
004247
R
itb
0
04714
R
004303
H
~b
0
'214715
R
~J~10~~1
A
~b
SI~E7~474~
NO
E:RHOR
h~,
NES
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
- - -
---~
--
_.-
-
---
--
-
---
---
-
-.--.
-----
-
_.-
-
--
---
._--
-
---
--
---
..
_--
--
--
~-
----
--
-.
__
..
-
_._-
---
--
-
---
---
---
-_.-
---- .
--
-.--~---
_.
----_._.-
-----.-
~-~
-- - -- -
--
-
---
~
---
---
--
---
--
--
-.-
~--
- - .
__
.-
- - - -- - - - - - - --
-_
....
_-
-_.-
---
---"
._--
--
---
---
_.
----
--
---
()
0
0 0
PAGE
77
FP1~T~
SRC
$UBTlTl-rE
~
p~~~~
0
ACl.hOC
00521
R
AC?bQO
00522
R AC3l,OC
00523
R
ADO
00600~
A 0
AOD:h5
300000
A
AQRESS
04552
R
AOStGN
03042
R
AE:OPCO
0~032
R
AQPCDB
Q10
747 R
APION
04544
R
Al,JTORG
0454"
R
AXKX
000062
A
0
SAC
71662El A
BbE
'l196~3
A
SM,A
'(16602
A
aNA
719610
A 0
SPA
716604
A
8R
006400
A
BRAN
t1177l. B
BRANCH
0455¢
R
SRW
7;1.6606 A
StA
7166@1
A
CAC0
0237~
R
CAC0EX
0~4:1,2
R
0
CPPU
0~247
R
CfPUST
00270
R
90NPbD
04554' R
crEST0
00304
R 0
CT~STl
00330
R
CTEST2
00340
R
CTE:ST3
00334
R
ODAC
03755
R
ODVO
04025
R
OOVR
0~0~3
H
brAb
0405~
R
OIV
00?000
A
0
OIVS~~
00524
R
DbAG
03722
f~
q~Ag~
~373;;
R
DL.AC2
0374'
R 0
OMP
717200
A
PMN
"11?3~0
A
D~~PY
04000
R
OQF:EX
0~22~
R
DOIE;X
01125 H
OP
000100
A
DPf·~AD
0~07:i.
H
DPF'lnrDV
01077
R 0
0
DPPbEX
01214
R
DPF'l"Mb
0~075
F,
qPF~RO
~ll~~
R
DPfb
R
$
011
0l R
PPF~SB
01073
f~
DPFRr:S
0~573
R
DPl~X
~lt2l
R
DPIEX~
01157 R
DPIEX2
01200
R
PPIRES
0l,6?5 R
DRR
?1000~
A
OSBR
0404?
R 0
0
USR
710100
A
O$TSW0
00073
R
OSUI;3
0377l
f~
oV
7l~00~
A
D\lSY0
01465
R
DV8Y00
00542
R
~INT:t,l
~l5~~
fi
E;lNT1?
01542
R
ElNT13
01546
R
E1N114
01550
R
t:;~NI15
~155~
R EINi30
0l54~
R 0
0
EINT3~
01554
R
EOPCQB
0L1745
R
ERCOPE
0002Z
R
ERROR
0A4?7 R
ERRORl
04266
R
ERRQRf
04332 R
ERROR3
04344
R
ERRQR4
04~S56.
R
ERROR~
0437D
R
ERROR"
04401
R
~RRdR7
~4411
R
ESQbOC
00511
R 0
0
EX
I
T~14
04261
R
EXITM?
042~6
R
~Xp~OC
~05.1~
R
gXTERR
0427;>
R
fAG~OC
0~51~j
R
FAD
04135
R [PA
9
~41j,?
R
FPVD
0417~
R
FDVR
04223
R
FE;X
rr
00505
R FFAlb
0455?
R
F'k.
000040
A 0
0
fbAC
04071
R
FMPY
0~le0
R
~Nt'1
.
'(
~32?~
A
FNXSA
013~~
R
PPA80R
00444
R
FPAGTV
005?,6
R
FPA~L.,O
0044;\, R
FPANSR
0035~
R
FPERRO
00436
R
FPEXER
00074
R
F"PfMA
0022~
R
FPFMB
00350
R
0
FPbOOP
00205
R
FPPAQD
0~033
R
FPPOIV
0l.0?2 R
F"PPNUb
0104~
R 0
FPPRDV
01064
R
FPPRSB
0;+'057
R
F;PPSU8
01040
R
FPRAN
0065~
R
FPT
710314
A
FPl)6
D
002~4
R
WPUsr
0035l R
PPUXAl
00~27
R
0
FPUXA2
00:1.42 R
FPUXA~
00193
R
fpUX~A
~0~5~
R
PSBR
04210
R 0
FSTSUB 04556 R
FSUa
0~1~:l.
R
GOGrjGO
~3051
R
GOTOGO
0303~
R
~UARD
04557
R
HObrJsW
042~5
R
80bQ,1
04247
R
IOEXIT
0344~
R
0 IOlfR
03454
R
IOlVIO
03405
R
IOVBY0
00544 R
IDve
0345~
R 0
IDVC3
y)3476 R
IDVC4
035:b2
r~
IOV~
03440
R IfRES"f
015e>~
R
1M
00020,) A
INGEXP
036~4
R
I.N
II
0003?
R
INITAO
01772 R
0
JEAORS
04560
R
KT~000
00546
R
Kl~~0
00545
R bO
00~00~
A 0
hJE
7:1,5400 A
~OOPl
00465 R
~1LJb
001400 A
NBRANC
0176~
R
NE;XME~1
0,1476
R
NOBRAN
01722 R
OQHECI<
-v.
136?2 R
OPCDSf
0066~
R
0
OPCODE
00527
H OP6T09
007400
A
QVf'Co
0144~
R
OVRFl,R
00~40
R 0
OVRFbX
0~~543
R
OVRFI..~
00536
R
PASCNT
04545
R
PCNEXT
0A~5~
R
PGMLOP
04543
R
RANA
04540
R
RANB
0454i R
RANC
045,4~
R
0
~ANPAT
00567
R
f~ANOT~
00630
R
RANDT2
~0644
R
RANGEN
045i?
R 0
RATIO
04561
R
ROIV
kH~g4~0
A
RE(;ADR
00547 R
RSU8
00100~
A
R5W
00525
H
SAVAOR
04562
R SAvqST
0454~
R
SBHAN
01;?5~
R
0
SERVIC
00062
R
SETDMP
04306
H
sJE:
?i56~~
A
SOFCOD
0i41~
R 0
SOFEX
01.262 R
SOFNR
0~3~0
R
S(,)F'NRX
0l4~~
R
SO~TEX
0456~
R
SOPl
01326
H
SOF2
0:1,335
f~
SOF~
0!J.40~
R SF'fJ,AD
0110~
R
0
SPF'~DV
01113 R
SPFbEX
01244
R
SPFCt:1L
0111j,
R
SPF'I,RD
01117
R 0
SPF'6
HS
01115 H Sprl.,SB
0:1,107
H
SPfHES
0155'1;
R
SPIRES
016
09 R
ST
0V)~60(~J
A
SU,f3
000400
A
~
~~
I !
GH
04564
R
SYSERR
0002~
R
0
TBAC
01746
R
TB~;
0:t.7l1
~~
T8t'1A
~)1703
R
jBNA
0~732
R 0
TBPA
01725
H
T8Rlj
0:1.733
R
TB2A
~1.6§~
R
T8~Al
0~670
R
0 0
0
C\
0 0
0 0
PAGE
78
fPl?T~
SHe
SUBTIThE
s
IN(;~E.
i 0
TEMP
00530
H
TE;MP~
04550. H
TE:MP~
0455;1. R Tt:ST1 00411 R 0
rEST2
00432
R
TE;ST3
00426 R
TFl3HA
~l63~
R
TNE:XM~1
01!)0~j
R
TPRT
00353
R
TPRTl
003~7
fi
TPRT2
004~~
R
UN
000020
A
I 0
qNDF~N
00541
R
UNOFl:.1
0rg5~7
R
QNfC,Q
01454
R
UR
0000110 A 0
USERSW
0000kJ R
UU
000030
A
XFbO~J
0i50~
R
XJf:A
0143(; R
VSRANC
vJ1772
R
%ANEG,
02013 H
%ANSRl
005~1
R
%ANSR2
00?32
R
0
%ANSR3
00533
R
%OR1
03724
fi
%PP2
0375'(
R
%lJP3
03773 R
,0
%OP4
0400.2 H
%QP5
010t5
R
%DPe>
041212'1
R
%OP6A
04033
R
%DP7
04044
R
%QP9
04057
R
%QP9A
04063
R
%FAA
02?4~
R
0
%PAB
0255'1 R
%FABB;!,
02624 R
%fiABB2
02p3~
R
%rABS3
0264~
R 0
%PAB.B
02600
R
%F'AB,C
0~6~0
R
%F'AC
~~70~
R
%,"-.AC1
03;04
R
%FAC2
03705
R
%fAC3
03706
R
%FAC4
Kl3707 R
%F'AC4A
0496~
R
0
%fAD
02750
R
%F'AP,P
0~7~2
H
%FAEX
0.30~?
R
%fAEXT
03056 R 0
%PAEXX
03012
R
%FAE.X
03000
r~
%FANGl
0~77~
R
%FAT,B
0?~:t.~
R
%FA,
02447 R
%FA.r
02505
R
%FOA
0353l
f~
%fOB
03e;5~
R
0
%F'QC
03563
R
%FDD
03602
R
%F'OE:
03pl~
R
%f~DE:Xl
03600 R 0
%FPP
fJ3622
f~
%fO
03~~l
R
%Fu0
03?7~
R
%r.Dl
03343
R
...
,
~FD2
03323
R
%F03
033~0
R
~F'D1
0333~
R
%rE
0301~
R
0
~FGEXe
02:1,
7frJ
R
%fG,
02:1,:>1
R
~fHt
02300 R
%F'IRA
0235~
R 0
%FIREX
02331
R
i~FIR.
023~0
R
~Ft~_A
02331
R
%rIXB
02l2~
R
%FIX.
02102
R
%FbOT,
0~~H~4
R
%FbOTl
0206!? R
%f~~OT~
0207~
R
0
%FMA
03154
R
%FMB
03222
R
%FN(;
~~22~
R
%F'Ma
0306~
R 0
~FMl
f:13132
R
%fM2
031~2
R
%Fr12A
03l~0
R
%Fr--13
0~127
R
~FNEGe
02142 H
%FNQRA
0~224
R
~F'NORB
(12267
f~
%fNOR,
0?172
R
0
%FN.
02260
R
%FSIGN
037g~
R
%FS
02360
R
%F%
04?6§ R 0
'.
.
%HAOl
C~~S710
R
%HAC2
0~7:1.1
H
%HAC3
03712 R
%HAC4
037l.~
R
YoJ:Ir
03714
R
%J:1.A
04567 R
%Jt!
037i? R
%J3
0311§ R
0
%J4
03717
R
%J4%
04~70
R
%J5
~372~
R
%t1Q
0457~
R 0
%NAl
010534 H
%NA:2,
00535 R
%PFAC
02p7~
R
%RL,
0257~
R
%SNEG,
02~17
R
%SP~
04073
R
%SP2
~41~l
R
%SP3
04137 R
0 %SP4
04153
R
%SPB
0~1e2
R
%SPb
0417~
R
%SP7
042:1.~
R 0
%SP8
04225 R
%$WICH
02423
R
%XFACl
~05~8
R
%XFAC~
005t1 R
~XPAC~S
00515
f~
%XHAC~
0V?5~6
R
~XHAC.2
0051(
R
%XHAC3
0~H520
R
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0
c)
. _ -
_n_'_
.
__
...
__
....
____
...
_____
..
_____
.
___________
....
_____
--
--
--
--
----
-- --
--
--
~
- - -
--
--
... -_.- --
..
_.
-'-
--_
.. - - -
..
-
_._
..
- - --
-- --
-
----
--
-
----
.--
.-
--
_
..
_..
.
..
-
---
--
~
-_.-
..
-
---
..
..
_------------------------
I (J 0
I 0 0
PAGE
79
FP1~T~
SRC
SUSTIThE
~lNG6E
0
~SERSW
0000~)
R
UH
vH:1~0~0
A
~Y~~HR
00020
R
UN
000020 A 0
ERCODE
00022
R
UU
000030
A
I.N
i T
0003~
R
F'6
000040
A
AXKX
000062
A
SE:RVIC
0~j0Q2
R DSTSH0 vJ0073 R
FPEXER
00074 R
0
DP
00010P.J A
F'PUXA~
00167
R
~PUXA2
VJ014? R
PPUX2A
0015~
R 0
PPlJXA3
Q10163
R
1M
0002@0
A
FPLOOP
0020$ R
F'Pl)I~P
0022~
R
PPPMA
00225
R CFPl) 010247 R
CPPUST
0027~
R
OT[::510
00304
R 0
0
CTESTl
0033vJ R
CTE$TJ
00334 R
C'fEST2
KJ034~
R
PPFMB
0035~
R
FPUST
100351 R
FPANSI~
003~2
R
TPRT
003~3
R
TPRT1
00367
R
SIJB
(400400 A
TPRT2
00400
f~
tE:ST1
0041~
R Tt:ST3
0042~
R 0
0
Te:ST2
0~432
R
FPE;RHQ
0~4~6
R
~PAI.,L,O
~1044:1,
R
F'PABOR
00444 R
bOOPl
00465
R
FEXIT
00505
R
~AG~OC
00Si0
H
ESG.L.:OC
00~1~
r~
EXPhOC
0~512
R
%XFAC~
005~3
R
%XFAC2
005~1
R
%XFAC3
00515 R 0
0
%XHACl
00516
R
%XHAC~
0~?*7
R
%Xi~AC3
~0~20
f1
AC~~OO
0052l
R
AC~hOC
00522
R
AQ3kOC
00523
R
OlVSW
00524
R
RSW
00525
R
fPACTV
1210526
R
opeoP£'
00547 H
!E;M~
0053~
R
%ANSR~
0053~
R 0
0
%ANSR2
ra0532 R
%ANSR;:s
005~3
R
%NAl
00534
R
%NA2
00535
R
dVRFL1
00536
R
UNQFh~
00537 R
dYRtk
R 00540 R
UNOF~N
0054;1, R
DVBY0@
~J0542
R
OVRF'~X
00543
R
IDVBY0
00544
R K:J.000 100545 R 0
0
KT2000
00546
R
REGADr~
00547 R
RANPAT
00567 R
RANDT1
00630
R
RANOT2
00644
R
FPRAN
006;>6
H
OPCL)BF
00662
R
E:OPCDB
0074? R
AOPCDB
00747
R
RSUB
00~00eJ
A
AEUPGD
01032 R
F'PPADD
01033
R 0
()
PPPSUB
01040
R
FPPMU~
0:11045
R
EPPQIV
~:l.052
R fPPRS8
0~057
R
FPPRDV
01064
R
OPrbAQ
0~071
R
OPF~SB
0107~
R
OPF'L,f1b
0;l,07? R
DPPbDV
~11077
R
DPFbRS
0~1¥Jl
R
()PF~RD
~11~~
R SPFl,.AD
0110?
R 0
0
SPF'~SB
'~i1107
R
SPfhMb
0l1~1
R
$PF~OV
0l!1
3 R
SPP'LRS
011l~
R
SPFbRP
01117 R
PPIE:X
011g1 R
O()lsX
~112~
R
DPIE:Xl
0115'7 R
DPIE:X2
01200
R
OPFbEX
0+.2;1,4
R
DOFEX
~1?~9
R
SP~kEX
0124~
R 0
0
SOF~X
'~1262
R
SOFNR
0l:3~0
R
SO~';l
v)13~~
R
SOF2
0133~
R
FNXSA
01351
R
t1U~
00l4~0
A SOf,;j
0140l
R
SOF'NRX
0140;> R
~OFC.OD
k
1
1415
R
X,JEA
0~4~2
R
OVF'~O
03.442
R
UNfbO
0145~
R
0
OV8Y0
01465
R
NEXMEM
01476 R
TNEX~lM
01500.
R
XFbOW
0;1.502 R 0
~INT11
01540
R
EINTl~
015A2 R
~lNt30
015~~
R
E:INT13
01546 R
EJNT14
01550
R
EINT~~
01,552
f(
gINT3
5
~155~
R 1
F~REST
0l;;5~
R 0
0
SPPRES
k11557 R
DPFRES
0~573
R SPIRES
~16~2
R
DPXRES
01625 R
TFBRA
~D~635
R
T82A
0;J.6~0
R
T81:A1..
0~670
R
TBMA
01103 R
TBbE;
01711 H
TSPA
0l,7~5
R
Tt;3Hl{'
0173~
R
TBNA
0~73~
R
0
TBAC
01746
R
SBRAN
01752 R
NQ8HAN
0l76Z
R
NBHANC
0:t76~
R 0
BRAN
01771 R
Y8RANO
0~772
R
INITAD
~177~
R
DIV
00g¥'0~
A
%ANE:G!
0201~$
R
%SNgG.
060~7
Ii
~Fb6T,
0202~
R
%FbQT~
0206~
R 0
0
%rb
O
T2
02070 R
%FtX.
0?10.2 H
%FIX8
02~2l
R
%~NEG.
02142 R
%PG,
02151
R
%FGEX.
0~t'70
ri
%FNQR,
02172 R
%FNORA
02224 R
~FN,
0226'~
R
%FNQRB
0~267
R
~fq~f
"
02300
R %F'lR,
0231~
R
0
%PlREX
02331
R
%FIR,A
02334 R
~F'I~A
0235~
R
%FS
e
0236~
R 0
CAC0
102377
R
RO!V
002400
A
CAG0EX
~241~
R
%SWICH
02423 R
%FA.
02447
R
%FA,T
02505 R
%FAi',B
@25~2
R
%FAA
0g54~
H
0
%F'AB
kJ255n R
%Hb
02.5~2
R
~FA~,B
0260£1
R
%fAB81.
02624 R (.)
%FABB2
02637 R
%FA88~
026~4
R
%FA~.C
0265@
R
%PFAC
02670
R
%PAC
02705
R
%FAO
0~7:S0
R
~FA~ID
02762 R
%rANGj,
vH~771
R
0
60
100300'1 A
%FAe.:,X
03000
r~
%FE
030i~
H
%rAEXX
0301~
R 0
%FAEX
C1~017
R
GOTOGQ
0.s035 R
A(JS1GN
'13042 R
GOGOGO
03.05~
H
%FAE.XT
03056
H
%FM.
030~l
R
%f"
~12
0311~
R
%FM2A
0~120
R
0
%FM~
03127 R
%PM~
031.~2
H
%Fi'1A
~13154
R
%F:M8
0322~
R 0
%PMC
03225
R
%t~D
0~23~
R
~FI)~
03275
R
%F~02
03323 R
0 0
0 0
c)
0
I 0 0
PAGE
80
FP1~T~
SRC
SlJBTlr~E
SlNGL,E,
0
roFP1
~J3331
f~
%FQ3
0~310
R
%FP;l.
03343
R IOIVIO
03405
R 0
IOV2
03440
r~
lOEXIT
034~5
r~
lDIPH
YJ34~~
R
loVe
0345~
R
IOVC3
03476
R
IDVC~
035~2
R
%fUA
0353l
R
%fOB
0355~
R
0
%FOC
(13563 R
8T
003600
A
%F"DEX
1
0360~
R
%FOD
03602
R 0
%PDE
f13616 R
%FPP
036~2
H
OCHECK
036p2
R
lN9EXP
036(14 R
%FACl
03704
R
%FAG2
0~?05
R
~FA9.3
0370~
R
%FAC4
03707
R 0
0
%HACl
03710
F(
%HAC2
0~711
R
%HAG3
~13
71~
R
%HAC4
03713 R
YoJl
03714 R
%J~
0;571,5 R
~~~.-
@37~g
R
%J~
0371( R
%.,)5
03720
R
%FSIGN
0~7~1
R
DLAC
0372g
R
%DP1
0:3/2~
R
0
Ol.,AC1
03735 R
DbAQ~
03745
R
OOAC
03755
R
%IJP~
03757
R 0
OSUB
03771
H
%DP3
03773
R
OMPY
04~H1~
R
%OP4
04002
R
DDVR
01
0
13
R
%DP5
0~0~5
R
Dovd
~402~
R
%DP6
04027
f~
0
%DP6A
04033
R
PSBR
04042
R
%QP"
04044
R
DFA()
04055
R 0
%DP9
04v)57 H
%OP9A
04063
R [t"Ag
0407i
R
%SPl
04073
R
FOAC
04117
R
%SP2
011g1 R
FAD
~413~
R
%SP3
04137
R
0
F'SLJB
04151
R
%SP4
041~3
r~
FMPY
~4:t.(j0.
R
%SP5
0416~
R 0
FDVD
04173
R
%SP6
04175 H
FSBH
~42~~
R
%SP7
042~.2
R
FOVR
0422~3
R
%spa
04225
R
i~o~qsw
0423?
R HObD,:l, 04247 R
0
PCNE:XT
Q)4252
R
EXITM5
042p6 R
~
Xl
T
r~
4
04261
R
ERRORl.
042
62
t~
0
EXTERR
04275
R
SETOMP
04306
R
ERRQR2
0433t! R
ERROR3
0434~
R
ERROR4
1t)4356 R
e::RROR5
043'10
R
~RROR6
0440l
R
Ef~ROR7
04414
R
0
ERROR
04427
R
RANGEN
015~5
R
RANA
04540
f~
RAN8
0454~
R 0
RANC
")4542
R
PG~1bOP
04543
H
APlqN
04544
R
pASCNT
04545
R
~AVDST
04546 R
ALJTORG
04547
F~
TE~'l~~
~'455~
R
TEMP2
04551 R
()
AORESS
04552
R
BRANCH
04553
R
9O~1~kD
04554
R
F~AJL,
04555 R 0
F'STSUB
04556
R
GLJARIJ
04S~7
R
JEAOHS
04560
R
RATIO
04561
R
SAVADR
04562
f~
SOF"TEX
045~3
R
s~~lfcH
~4?~1
H
%rAC4A
04?65
R
0
%F%
04566
R
%J~A
0458
7 H
%J4%
@457~
R
%MQ
04571 R 0
AOD
00600fj
A
BR
006400
A
OF6T09
k?07400 A
AOOj,.5
30000~
A
QRR
7:1.0000 A
DSR
71~1~0
A
F'pf-
?i03i.4 A
DV
71~000
A
0
rNM
713250
A
L,JF;
{~~4~0
.A
SJE,
~~56~~
A
8~A
7~660:t
A 0
BMA
7:t6602 A
Bb
E
719
6
@3
A
BPA
~~6q~1
A 8Rt)
71660~
A
BNA
7~661(3
A
BAC
71§6?0 A
g~H~
~:1.720~
A
Of'1N
7~730~
A
0 0
0 0
0
C)
0 0
0 0
0 0
0 0
0 0
0 0

Navigation menu