2.6_031_PDQ_FORTRAN 2.6 031 PDQ FORTRAN
2.6_031_PDQ_FORTRAN 2.6_031_PDQ_FORTRAN
User Manual: 2.6_031_PDQ_FORTRAN
Open the PDF directly: View PDF 
.
Page Count: 244
| Download | |
| Open PDF In Browser | View PDF |
:1 1t!:
')-
~
1620 GENERAL PROGRAM LIBRARY
~
.
PDQ FORTRAN
(An Interpretive p r o g r a m ' "
for the Fortran Language)
2. O. 031
.~~~~. *
*********
¥ I f* **********
* . ***********
*************
*************
*************
*************
*************
." "'J:9
~~CS~
* ~)**** ~)****~)*
..
~rrrO'ti/V\l~ t,1~10t4
.RQ
J1ttitJ, ""/~~:).·(·I.~{)~H;:::):'n H?rnJ'1M():':)
Vlhfj~'1U ~U(J~'iUq
~J(l:"" ") T ::~jI "I, i ;~A:)
t,;:r'\:;r,~,.
t,1l
«
o
.O~'\()MMAt"
o
o
DISCLAIMER
c
o
Although each program has been tested by its contributor, no
warranty, express or implied, is made by the contributor or
1620 USERS Group, as to the accuracy and functioning of the
program and related program material, nor shall the fact of
distribution constitute any such warranty, and no responsibility
is assumed by the contributor or 1620 USERS Group, in connection therewith.
-
-
----_...
o
o
o
I
I
1,1
1\
~
1620 USERS GROUP PROGRAM REVIEVJ AND EJTi\.LUATION
C
Progran1 No. _ _ _ _ _ _ _ ._ _ __
Prograrn Name:
1.
Date
------------------
-----
Does the abstract adequately describe what the program. is and
what it does?
Comment
Yes
No
Does the program do what the abstract says.?
Comment
Yes
No
Is the Description clear, understandable, and adequate?
Comrnent
Yes
No
Yes
No·
--------------------------------------------------
2.
---------------------------------------------
3.
------------------------------------------------------
4.
Are the Operating Instructions understandable and in sufficient
detail?
Conlment
Are the Sense Switch options adequately descri.bed (if applicable)?
Are the mnemonic labels jdentified or sufficiently
understandable?
Comrnent.~----
Yes
Yes
No
Does the source program compile satisfactorily (if applicable)?
Comment .
Yes
No
Does the object program rW1 satisfactorily?
Comment
Yes
No
Yes
No
Yes
No
--------------------------------------.
o
5.
--No---
-------------------------------------------------------
6.
------
7.
Number of test cases run
Are any restrictions as to data, size, range, etc. covered
adequately in description?
Comment
--------------.---------------
8.
Does the Program meet the minimal standards of the 1620 Users
Group?
Comment
--------------------------------.------------------
9.
Please list any suggestions to improve the usefu]ness of the
program. These will be passed on to the author for his consideration.
Comment
------------------------------
Please return to:
o
Mr. Robert J. Robinson (PREP)
Marquette University
Computing Center
1515 ill. Wisconsin Avenue
Milwaukee 3, Wisconsin
Your Name
---------------------------------
Company
Address
------------------------------------.--~,
User Group
Code
THIS REVIE'.JJ FOE T3 T")APTOF THE IG~),O U~~ETi GT~Ot~I~ OFC /\ ZA110N'8 PROGRAM
RE\nE'Il 1\110 EIj/\ L1J AT10N PROCEDURE. NO}\JI\;1E0;:
~) AI\E CORDIALLY INVITED
TO P 1\[; TICl P P,TE IIT 1'H18 EV ALl] IiTTO}\T.
o
o
o
P:OO FORTRAN
(An Interpretive Program for the Fortran Language)
Edited by:
()
3081
Prank H., Maskiell
computer Center
Pennsylvania Transformer Division
McGraw-Edison Company
Canonsburg, Pennsylvania
Phone: 412
745-9100 Ext. 205
November 15, 1963
I wish to acknowledge contributions and suggestions to this system from:
E. stewart Lee
James A. Field
University of Toronto
o
John W. Holmes
Cooper-Bessemer Corp.
Donald A. Jardine
DuPont of Canada
o
o
/
o
TABLE
OF CONTENTS
PAGE
o
o
DECK LABELS
0
PLQ FDRTRAN SYSTEM AND LANGUAGE
1
OPERATING INSTRUCTIONS
13
SAMPLE TEST PROORAM AND DATA
24
LIST OF OUTPUTS OF THE TEST PROORAM
28
SPS LISTING OF PlXl FORTRAN PROCESSOR 02
31
LABEL TABLE FOR PROCESSOR C2
70
LISTING OF THE PROCESSOR C2 DECK
77
SPS LISTING FOR SUBROUTINE RELOCATOR AND RELOCATABLE SUBROUTINES
82
LABEL TABLE FOR SUBROUTINE RELCCATOR AND RELCCATABLE SUBROUTINES
93
SPS LISTING OF POO FREE FORM SUBROUTINES
96
LABEL TABLE FOR FREE FORM SUBROUTINES
109
LISTING OF THE PDQ FREE FORM SUBROUTINE (11-63) DECK
112
SPS LISTING OF POO FIXED FORMAT SUBROUTINES
117
LABEL TABLE FOR FIXED FORMAT SUBROUTINES
130
LISTING OF THE PDQ FIXED FORMAT SUBROUTINE (1l-63) DECK
133
SPS LISTING OF PDQ FOffi'RAN PROCESSOR CLC2
138
LABEL TABIE FOR PROCESSOR CLC2
170
LISTING OF THE PROCESSOR CLC2 DECK
177
SPS IJISTING OF P:cQ FORTRAN PROCESSOR CLT2
181
LABEL TABLE FOR PROCESSOR CLT2
213
LISTING OF THE PROOESSOR CLT2 DECK
220
.0
o
o
1620 USERS GROUP LIBRARY
PROORAM ABSTRACT
TITLE:
P:OO FORTRAN (An Interpretive Program for the Fortran Language)
Author; Organization:
Frank H. Maskiell, Pennsylvania Transformer Division,
McGraw-Edison Company J Canonsburg, Pa.
15317
November 15, 1963
Date:
Direct Inquiries to Name:
Users Group Membership Code:
3081
Frank H. Maskiell
Phone: 412
145-9100 Ext. 205
Pennsylvania Transfor.mer Division
McGraw-Edison Compal\Y
Canonsburg, Pennsylvania 15317
Desert tion Purpose: POO FORTRAN is a modification of the UTO Fortran and
or ran Wl.
onna , which utilizes noating point variables 1n the "excess 50n
notation. In the hundred plus programs compiled to date by the system, the
object time running is less, the size of the object deck is smaller, and core
storage requirements for the object program, subroutines, and data is less
than a~ other Fortran system without floating point hardware.
Specifications:
Used by Program: The Processor requires 18008 digits
permi ting 199 symbol table entries on 201, 2199 symbol table
entries on 40K. Class itA" Subroutines for the object program
require 6600 digits. Instruotions of the object program begin
loading in location 6600.
B.
Equipment Required by Program: Card System; Auto Divide.
Program will operate on 20K and will internallY adjust for aqy
additional storage available. Programs may be compiled on a
machine 40K or greater, for a machine of lesser capacity by
means of a control digit.
c.
The Processor and Subroutines are written in SPS and then compressed.
c
o
Stora~e
A.
Additional. Remarks: Any program in FO-oo4 language may be compUed in the
eystem; however, additional language facilities are included. The FO-004
language has been expanded in the P~ FORl'RAN system to include: (a) CCMMON
statement for reserving locations in the symbol table for nonsubscripted and
Eubscripted variables, '(b) batch cornpUation of programs without subroutines,
(0) continuation cards for For.mat and input/output statements, (d) repetition
of field format (nFW.d) etc.--Format also includes an A and a D specification,
(e) listing or punching of referenced source statements and symbol table,
(f) PRCCEDURE statements permitting a group of Fortran statements to be utilized
as a subroutine similar to the Fortran II Subroutine subprogram, (g) TRACE
facility without generating additional instructions in line and including the
address as well as the magnitude of the variable at running time,--The for.mat
of TRACE at object time may be altered by a single instruction, (h) two subroutine
decks, one permitting a relaxed input format requiring only that a space or blank
column separate input variables, and the second requiring input data to be in the
precise format of the input statements---Either subroutine deck may be used with
the compiled objeot program depending on the format of data to be used.
,i
o
o
o
c
DECK LABELS
\
DECK 1:
PDQ FORTRAN Processor 'C2 consisting of 245 cards.
DECK 2 ~
POO FORTRAN Subroutines Free Form (11-63) for (fe,,) '{{1 /J ~
Relaxed Input Format consisting of 246. cards.
Cards 0 thru 47 constitute the Subroutine Relocator.
Cards 1000 thru 7017 constitute Relocatable
Subroutines with the system, Cards 24000 thru 24109
constitute the Class nAft Subroutine Package.
DECK 3:
[I. I
PDQ FORTRAN Subroutines Fixed Format (11-63) consisting
24E cards for input of data conforming to the precise
e,f
~nput for.mat specification. Cards 0 thru 47 constitute
the Subroutine Relocator. Cards 1000 thru 7017 constitute Relocatable Subroutines with the system. Cards
25000 thru 25111 constitute the Class UA" Subroutine
Package.
DECK
o
o
4:
DECK->:
Sample PDQ FORTRAN Test
Sc~rce
Deck
Sample Data for Free Form Input
4.
DECK
6:
Sample Object Deck compiled from DECK
DECK
7~
PDQ FORTRAN Processor CLC2 consisting of 236 cards.
DECK
8:
PJQ FORTRAN Processor CLT2 consisting of 236 cards.
~.I
• ~
o
o
o
POO FORTRAN for the 1620
o
.Int roduct ion
The PDQ FORTRAN system follows the language features of Fortran with Format, FO-OO4.
However, the variables of this system are in "excess 5011 notation, a characteristio
of Fortran without Format, F0-002. The object deck prepared is of minimum .size
whioh may optionally have the subroutines punched ilTImediately thereafter or which
may have the subroutines loaded at object time running. Two alternate processors
are available in the system to provide a larger symbol table at compile time---See System Options.
Fortran Specifications
.ny program written in FO-OO4 language can be run in this system without additional
change. However, additional statements are possible in this system as elaborated
l1ereafter.
Permissible Statements
A.
Arithmetic Statements:
A
B.
B op C etc.
a
Control Statementsl
1.
00 TO n
2.
GO TO
3.
IF (a)
4.
IF (SENSE SWITCH 1)
5.
DO
(D:L'~'
or
, m
2
l
ic:m,m,m
n
RETURN
1
~
n
8. END PROCEDURE n
9. EXECUTE PROCEDURE n
o
10.
CONTINUE
11.
CONTROL m
12.
PAUSE
13. STOP
14.
END
111
1).'
M
6. BEGIN PROOEDURE n
7.
i
n , n , n)
2
1
nil:
DO
--- '\n)'
3
na
-----------------_. __._--
f:
... 2 -
o
15. BEGIN TRACE
16. END TRACE
c.
Input/OUtput statements:
1. READ n,
list
2. PUNCH n,
list
3. ACCEPT n, list
4.
5.
PRINT
n,
TYPE n,
list
list
D. Specifioation Statements:
1. Ca·1HON
2.
DIMENSION
30 FORMAT
E. Fixed Point Arithmetio
The operators + , - and * in the fixed point mode give results
MOD 10000•. Hence, the addition of 9998 and 4 gives 2 with no error
detection due to the overflowG Should divis10nby 0 be attempted,
an error overflow will be indicated.
F.
Relocatable Subroutines
1.
SIN and COS - evaluates sin (x) or cosine (x)
Method - Hastings approximation with improved reduction to first
quadrant.
, Length - 650 digits
Speed - 128 zr.sec.
Accurac.y - Error not more than one in last digit of mantissa for
all angles" except sine of angles near 11· /2 and
cosine of angles near zero, wh~n error occasionally
roaches two in last digit.
Note f
If all significance ts lost, typewriter will indicate OlitO.
o
- 3 -
'C
2.
EXP - evaluates eX
Method - Addition loop successively multiplies 1.0 by 2, 1.1,
1.01, 1.001, and 1.0001, reducing argument by the logs
of those factors until argument mantissa is less than
0.0001; approximation exp(x) = 1 + x is then used.
length -
500 digits
Speed - 16 msec.
Accuracr.y -
Error not more than one in last digit of mantissa for
positive arguments, not more than two for negative
arguments.
3. LOO - evaluates loge
x
Method - Addition loop successively multiplies argument by
2, 1.1, 1.01, 1.001, and 1.0001, acoumulating negative
logs of those factors until argument mantissa is greater
than 0.9999; approximation log x = x - 1 is then used.
Length - 568 digits
Speed - 19 msec.,
o
Accuracy - Error not more than one in last digit of mantissa for
arguments greater than 2.0 or less than 0.9; for arguments
closer to one, loss of accuracy is inevitable, but
routine is always more preoise than is x - 1.
J"X
4. SQRT - evaluates
Method - Odd-integer method generating result by adding complements.
Length - 360 digits
Speed - 116 mseo.
Accuracy - Perfect, rounded to an eight-digit mantissa.
5.
ABS - evaluates
i xl
Method - Load dividend to FAe.
Length - 20 digits
Speed - 1 msec.
Accuracy - Perfect
!I
I
-4-
o
6. DRH - drops decimal digits of a variable
Method - Obvious
Length - 172 digits
Speed -
5.5
meec.
Accurac,y - Perfect
7. ATAN - evaluates arctan (x) • Result is in the range -
Tf arctan(,,)~1
Method - Table look-up and reduction of argument to less than 0.1;
three-tem Chebyshev approximation is then used. Result
is complemented (if necessary) in fixed-point avoiding
loss of last digit in PSB.
Length - 818 digits
Speed - 126 meec. for argument less than 1
178 msec. for argument 1 or over
Accurac,y - Error not more than one in last digit of mantissa.
Additional Specifications
A.
Q
PROCEDURES
A procedure is defined as a group of FORTRAN statements which are
to be executed as a unit more than once in any larger program. Such
a group of statements is preceded by a statement
BEGIN PROCEDURE n '
where n is a procedure number. This number must not appear anywhere in
the program as a statement numbe r, and cannot be used in more than one
procedure. N.B.
The procedure statements must be followed by the statement
END PRCCEDURE
n
where n is the procedure number of the preceding procedure.
The procedure n may be executed at al'\V time by the statement
EXECUTE PROOEDURE
n
which transfers contrOl to the statement immediately following the'
BEGIN PROCEDURE n statement and obeys the statements of procedure n until
o
i7
- 5a) the END PROCEDURE n statement is executed, which transfers control
to the statement immediately f'ollowil1g the EXECUTE PROCEOO'RE n
statement th~"t, entered the pro'J~;dure ~
b) a RETURN n
statement is executed. This returns control to the statement
immediately following the EXECUTE PROCEDURE n staiement that
entered the procedure. A RETURN . statement is valid only within
the procedure from which it returns controlo
Any statement may be included within a procedure, including EXECUTE
PROCEDURE statements referring to other procedures, except:
a) BEGIN PROCEDURE, RETURN, or END PRCCEDURE statements referring to
other procedures.
b) EXECUTE PRCCEDURE referring to the procedure within which it is placed.
B.
CONTROL
In
This statement controls the typewrite r calTiage.
m =* 101
m
o
=*
102
m .. 108
c.
returns typewriter carriage
tabulates
PAUSE
The
program.
the halt
computer
D.
spaces typewriter
program execution is halted by a 48 OP CODE in the main line
The tiP" address of the instruction contains the address of
instruction. Depression of the ·'START" key will cause the
to continue to the next program instructiono
STOP m
The program execution is halted after the carriage is returned and
STOP m is typed. If m ·i8 omitted, STOP 0000 wUl be typed. Depressing
"START" wUl cause the computer to continue to the next program instruction.
E.
END
The program execution is halted after the carriage is returned and
END is typed. Depressing "START" will cause the carriage to return and
END to be typed.
F.
o
TRACE
The results of all arithmetic statements may be traced without the
generation of any additional instructions. Replacement type statements,
.JI:;
':1
.. 6 that is: A::: B; C ::: D(K); I ::: J; will not be traced since no arithmetic
operation is required and, hence, FAe is not used. If the replacement
statement includes a subscripted variable on each side of the equality,
the statement may be traced. The tracing at object time is by the use
of SWITCH 4.
0
BEGIN TRACE will turn on the trace feature. This will replace the
nomal EMFAC instruction (26 ADm, FAC) with a combination "FMFAC-TRACE"
instruction (17 FMTR,ADDR). Each arithmetic statement thereafter wUl
permit tracingo Tracing will be terminated when an END TRACE card is
encountered.
Succeeding statements will not be traced untU another
BEGIN TRACE is read.
G.
PRINT
(
Print n list will cause the variables in the list to be printed
according to the for.mat specification n after a carriage return has been
executed. This conforms with the print statement of Fa-004. No indexing·
is permissible within the list~
H.
TYPE
TYJ?! n J list perfonns the same function as Print n" list with
the exception that no carriage return will be executed prior to the output
of data. This will per.mit the printing of columns of data utilizing the
typewriter tab settings and the Control 108 statement.
I.
INPUT/OUTPUT LISTS
o
If the length of the list in an input/output statement requires more
characters than are available before column 73, the list may be continued
on the next card. Terminate the partial list preceding a continuation
with a con~a. The next card must have a digit punched in column 6 followed
by the continua-G:1.on of the list. The use of more than 3 or 4 continuation
cards may generate a format string exceeding 460 digi'lis which will destroy
the compilero Hence, some discretion is requiredo
J.
C(}!]l.10N
The common statement is followed by a list of variables whose object
time addresses will begin in the first symbol location after the function
Symbols. This will enable the assignment of addresses to symbols cammon
in several programs. Dimension variables which are listed in cOllllon
statements will have the necessar,y space reserved and must not be again
listed in a Dimension statement. CAUTION: The Common statement( s) must
be the first compiled statement in the program.
Example:
COMMON A,B,C,D(2 J 4),E
o
0'1
K.
FORMAT
Two subroutine decks are included with this system to permit input
data to be in either a fixed format or a relaxed fonnat. Should a desired
set of specific.ations require more characters than are available on the
format card, the specifications ma.y be continued on tbe next card beginning
in column 1. A digit must be punched in column 6. A single fonnat specification may not be split between cards. Any fonnat card to be followed by
a continue card should terminate with a comma in anticipation of another
format specification. The d11plication of the format staterl1ent number on
continuation cards in columns 1 thru 5 is optional.
Permissible fonnat specifications include I type (Iw), F type (Fw.d),
E type (Ew.d), D type (Dw), A type (Aw), X type (wX), and H type (wH).
or the numerical field speci~ications and the A specification may have
fields repeated by preceding ooooooooo
OFLO
Overfiow in FAD, FSB, liMP,
FDV, EXP, Loo, SIN ~ cas
9999999999
MESSAGE
ERIN
oFLO
o
Zero divisor in:
:mv
F.XD
OFtO
Zero argument in tOO
TABLE III
9999999999 or 9999
9999999999
~999
9999999999
- - - - - - - - - - - - -_ _ _ _ _ _ _ _ _v'·
- 18 -
MESSAGE
CONDITION
CONTENTS OF FAC
. NSQR
Negative argument in SQRT
SQRT of Absolute Value
of Argument
Negative argument of LOG
LOG of Absolute Value
ERLN'
o
of Argument
F. Error Messages While Subroutines are being Processed
If the program, data and subroutines require more memory than is
avaUable J then the message OVERLAP xxxxx POSITIONS is typed where
XXXJOC
is the number of digits overlapo
If the subroutine deok was
being loaded and compiled, then the ,resulting object deok is not
If the subroutines were being loaded at object time,
complete.
the program will not run.
G.
Data Input at !YPewriter
Each execution of an ACCEPT statement causes the typewriter
carriage to return.
o
The operator then types the desired data in
the required format, and presses RELEASE and START.
error is made, set Switch
4
If a typing
ON, press RELEASE and START.
The
tyPewriter carriage will be returned and the data may be entered
correctly.
H.
Trace Mode
If the trace mode has been compiled, then when the object
program is executed the program will operate in the trace mode if
console switch
switch
4
4 is
ON" and in the non-trace mode i t console
is OW.
The trace mode causes the result of each executed arithmetic
statement to be typed using 15 or E14.8 format preceded by the first
four digits of the address of the' variable traced.
Normal output
o
hi
'.
I'
,.
'VP'
j
'In
- 19 -
.C';
is not inhibited.
If an ACCEPT statement is executed while tracing,
the follR~G~*~-~3~*-~-----~-------~--~~-
0 0 0 K3
02 02 C
C 1\1
CHI, 23, 1 (]
02634 311150811510 02030 ---------------fiJ----CHI-=-3,CHI-l*
_O=-:2=-6=-..4.:...6=---_4=---7_=_ 02602 012CO 02 040
BNE
102*
02658 45 02102 11513 02 050
UNR
*&44
,CHlt2*
C261C 16 00892 -2158 02 060
TFM BRC&6
,CONIOt
02682 49 00546 oooeo 02 064
B
BEGINt84*
02690~·____ ~~~~~~~0~2~0=1~0--------=O~O~R=G~*=-~37*~_=--_=~~~------------0269C 16 01512 -1514 02 015
TFM SDECOO-2 ,SDECOO*
027C2 15 00698 CCOOO 02 080
TD~
SBSWCH*
02114 17 09582 -2126 02 090
BTM CSORN,*&12*
02726 26 02149 10972 02 100
TF
*&23,PUTETB&6*
02738 31 13025 ceo CO 02 110
TR
INST2&1~
___O=--c2=-1-=--:5=-..C~_4__=_:5=___0.::..:2=_--=-11=---4-=--1=_7=___5~13=___C=2 120
BNR * &24, CHI t 2 t
02162 16 13024 -3914 02 130
TFM INST2&6,COMPlT*
02714 27 14104 14103 02 140
BT
PUT2,PUT2-lt
02786 12 10972 -0009 02 150
SM
PUTETB&6,9*
0279B 49 02602 COO CO 02 160
8
102*
02806
C2 170
OGRG *-3*
02806 J) 03938 -2818 02 180 IOINST BTM SWC,lSUB.$-1,01*
02819
17
02 190
lSUBS OAC 11,lOAO SUBROUTINES@*
___~2~B=-5~2~_~3~1~~11~5~I=_O~·_1=_7~0~1=_9=_____O~2~2=_0~0~__~F~-O=R~~~,A~T=----T~R~__C~H~I~-~l~,~P~H~I~-~I~*~________________
02864 26 02881 08454 02 210
TF
*&11,SMTLU1&10t
0281c 11 00004 COO-6 02 220
AM
4,6,10t
02888 26 02905 08454 02 230
TF
*tI7,S~TlUl&10*
02900 15 00005 OODOK 02 240 ________~T=O~~__~5~,~2~,~1~1*~~~--__-----------------02912 11 16398 -0006 02 2·50
AfI;
BRINST&6,6t
_-----'----"0::..-=2::....;9"-"2=-4-=-----=2"-'1~1=__4~9::-4~0~1=__4-'----'9::...::3::_9~_=0::..:=2=___"2=_=6::...:0"_________----=B=-:T~---=B=-=G:..:::O::...:&=--=1=-=2::...!t~B::...:G=-=O=-=&=-::1=-=1=--=*~___________
02936 16 03145 OOOJ1 02 270
TFM SWlP&1,17,10t
_____J2294~__~1~6~O~3~6~3~0~J~7~0~2~6~~O~2~~2~8~0~------~T~F~·M~i~T~R~A~N~S~&~1~8~,~P~H~I~&~6~*-------------------02960 31 17017 04509 02 290
TR
PHI-3,FMTSP-I0t
02972 16 03575 COOQO 02 300
Tf~
WIDTH
,80
02984 31 17510 11512 02 310 FSCAN TR
CHI-l,CHI<
02996 45 03028 17511 02 320
BNR *&32,CHI*
03008 16 00892 -3994 02330
TFM BRCt6
,CONfMTt
03020 49 00546 ceooo 02 34C
B
BEGIN&34t
03028
02 350
DORG *-3*
____~0~3~O~2~"8~~1=--4~1~7~5~1~1~C~0~0~K~3~~O~2~3~6~O~______C=M~;___C~H~:~I~,2~3~,~I~O~*=----____________________
03040 \46 02984 012eo C2 370
BE
FSCANt
03052 14 17511 000-0 02 380
C~
CHI"IU*
03C64 46 02984 01200 02 390
BE
FSCAN*
03076 14 11511 OOOK4 02 400
eM
CHI,24,10t
03088 47 03144 012CO 02 410
BNE SWlP*
03100 16 03635 -2726 02 420
TFM TRANSt23,lTPAR*
03112 16 03654 -2984 02 430
TFM TRNS£Rt6,FSCAN*
03124 16 03145 OGO~l 02 440
TFM SWlP&1,41,lC*
03136 49 03612 00000 02 450
B
TRANS*
02 460
DORG *-3*
03144
BTM
[RROR,7171,8t
03144 17 11534 OP1?l 02 47C ShlP
HNH
PUNCrt
03156 41 03142 01100 02 480 ____
eM
CHI,40,10*
03168 14 17511 oco~o 02 490
8NH
CHCHI&12t
03180
41 04046 011ce 02 500
02 510
CM
CHI,69,IC*
C31g2
14 175.11 CCOC9
Af
HClL*
03204 46 04182 Ollce 02 5?O
TO
TRANS&19,CHI*
03216 25 03631 11511· 02 530
TFM
lFIND,,9*
_______ Q~2.2JL ____L6 C3 5 6L.IT= 00 02 540
_ _-=00..=2'--"6-=2:..:2==----=-1-=-4_17511
:.1--:-:'_ _
_____'0_
o
--------
-----
'if
-0---
o
o
o
-- ---------------- ------- --- ---------------------------------------- ------------------11
LCCTN
OP
P/L
Q
PG LN
LABEL
~NEM
OPERANDS AND REMARKS
Pt.GE
0
_____ 032 i!L_iL.1 7 ?!L_Q_Q.QfJ__.J2.£__ 5 r; Q_____________~~~_~tJ I
, 41
,lOt
03252 46 03360 0120C C2 560
PE
TIER1
03264
14 17511 COO~4
02 570
CM
C~I,44,lO*
03276 47 04046 01300 02 580
El
~C~H~C~H~I~t71~27~----------------~---C3288 46 0336C 0120C 02 59G
CE
TIER*
03300
14 17511 000~9
02 600
CM
CHI,49,10t
03312 46 03360 01200 02 610
BE
TIERt
03324
16 03563 000-0 02 62C
TfM ffINO,,10*
03336
14 11511 000M6 02 630
C~
Chl,46,10*
03348 46 04046 C11ce
02 640
BH
CHCHI&12*
03360 31 11510 17512 02 650 TIER
TR
CHI-1,CHI&1~
03312
17 09356 CCO-O 02 660
HTM CFXN,OO,lO*
03384 17 OJ65~ 0(0-0 02 610
B1M WIDTST"lOt
03:3 9 6
26 04019 1748 1 02 680
T F -----;::R:-::P=-=F:-:-M:-::.T:-:&:-:2:-:1:----,---:;S=Y7:"M-:-:t:------------03408
16 03635 OCO-O 02 69C
TF~
TRANS&23,OQ,10t
03420 44 03552 03562
02 100
BNF
PRETRN,EFINO-l*
_____O~3~4~32
21 04034 04033 02 710
PT
CHCHI
,CHCHI-1*
03444 14 17511 000-3 02 120
C~
CHI,03,lO*
03456 41 04046 01200 02 730
BNE
CHCHI&12~
03468 31 17510 11512 02 74C
TR
CHI-l,CHI&l*
C3480 21 04034 04033 02 750
8T
CHCHI
,CHCHI-1t
03492 14 17511 COOC9 C2 760
CM
CHI,69,10*
03504 47 04046 OllCO 02 170
BNH
CHCHI&12*
03516
17 09356 COO-O 02 180
DTM CFXN,,10*
03528
32 17480 COOOO 02 790
SF
SYM-lt
03540 26 03635 17481 02 8DO
Tf
TRANSt23,SYM~
_--,---=-0-=:..3..:::...;552 33 03632 CCOCO 02 810 PRETRN Cf
TRANS &20*
03563
2
02 820 EFIND OS
2,**
03564
33 03634 CCOCO 02 830
Cf
TRANS&72*
0351t 32 03635 ceooo 02 840
SF
TRANS&23*
03588
32 03631 OCOOO 02 850
Sf
TRANS&19*
03600
16 03654 -2996 02 860
TfM--=T~R~N~S~B~R~&76-,=f=S~C7A~N=&~1=27*--------------03612
11 03630 000-5 02 870 TRANS __
A_~____
*_&~1_8~,~5~,~1_0_*_____________________
03624
16 11026 -coco 02 880
TfM PHI&6*
03636 21 11019 C3A23 02 890
A
PHI-l,TRANSt11t
03648 49 00000 00000 02 900 TRNSBR B
*
03658
02 910
DCRG *-1t
~3658
32 11480 ccooe 02 920 ~IDTST Sf
SYM-l~
0361C 26 03633 174fl 02 930
TF
TRANS&21,SYM*
03682 22 03575 17481 C2 940
S
~IDTH,SYM*
C3694 47 03130 01300 02 950
BN
*&36*
03706
14 17481 000-0 02 960
C~
SYM,,10*
03718 46 09556 01100 02 970
BH
CSORN-26*
03730
17 11534 OPll2
02 9S0
8T~
'[RROR,7172,8~
03142 14 17511 COOKI
02 990 PUNCT CM
CHI,21,10*
03154
41 03198 012CO 03 000
BNE
*&44*
03766
16 03635 -3298 03 010
TFM TRANS£23,SLASHt
03778
16 03654 -2972
03 020
TFM TRNSBR&6~FSCAN-12*
03190 49 03612 CCOOO 03 030
8
TRANS*
03198
03 040
OURG ,*-3*
C37Cj8 46 02984 01100 03 05C
uH
FSCAN:t0381C
14 17511 CCO-4
03 OAO
C~
CHI,04,10t
03822 41 04046 01200 03 070
BNE CHCHlt12*
03834
16 03635 -3514
03 030
TFM TRANS&23,RTPARt
_ _---"0'---"'3'--"8'----=46
If 03654 -3866
03 090
TF~"
TRNSI3R~6 FINISH*
o
'-12
---_.. -_ ..
__ ._.-.... __ .._._,•...
.--~.--~.~.--~-~- ........... ~ ............... -~ •• -.,.'".'''' •.••• ,.''"'''" •• ","",II.,,,, •. ~ ...
,.•,, •.
l:,i
-.----_.. __ .
--~--.---.----------.-----
0-
0
LGCTN
C38S8
03866
03866
03878
03890
03902
03914
03926
03938
03950
03962
03974
03981:
03994
03994
04006
04014
04014
04026
04034
__
04034
04046
04058
04070
04082
04094
04102
041C2
04114
04126
04138·
04150
04162
04174
04182
03515
04182
04194
04206
04218
04230
04242
04254
04266
04218
04290
P/L
-----
Q
49 03612
ceoco
03896
03896
00000
03925
03938
17019
17026
17026
14664
00892
00462
J7020
17019
16397
17019
00210
16
21
31
25
43
11
26
21
27
16
49
OOO~l
16243
17019
17019
-0894
00000
43 04014 17521
49 04046 00000
31 17510 17522
49 029R6 00000
45
17
16
32
26
49
09556
11534
03611
17480
04081
02Q96
17511
OP1?1
-4126
00000
17481
00000
22
47
16
16
12
46
49
03575
03130
03654
03611
04081
03612
02996
04079
01300
-4102
-29CJ6
000-1
01100
11
27
14
46
14
47
17
16
16
31
16
000-0
04033
00007
01200
-4434
11512
-4366
00000
000-0
-3654
-4490
OOOCO
oooee
04314
C4322
04322
04334
04346
04358
4~
09356
04034
17511
04322
17511
04058
03658
03635
04413
17510
03654
03612
17
16
16
49
03658
03635
04413
04302
0436f
043t:6
16 03623 000-2
0430~
0
UP
----~--
--
000~8
01200
000-0
-36'10
PG LN
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
0"3
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
100
110
120
130
140
150
160
170
180
190
200
210
220.
230
240
250
260
270
280
290
300
310
320
330
340
350
360
370
380
390
400
410
420
430
440
450
460
470
480
490
500
510
520
530
540
5')0
560
570
580
590
600
610
620
630
640
LABEL
MNEM OPERANDS AND REMARKS
PAGE
TRANS:t
B
OORG .-3*
FINISH TFM *&30,PHI*
*&18,PHI-l:t
A
,BRINST&5:t
TR
*&23,PHI-l:t
TO
BD
*&24,210*
PHI-l,l,lO:t
AM
PHI&6,l*
TF
PHI&6,PHI-1:t
A
PUTPHI,PHI-l:t
8T
,BRCt8:t
TfM BRC&6
BEGIN:t
B
OORG .-3*
.&20
,CHI&10:t
CONFMT 80
B
CHCHI&12*
DORG ·-3*
CHI-l
,CHI&ll*
TR
FSCAN&12
,5*
B
DORG .-3*
CHCHI BNR CSORN-26 ,CHI:t
,1111
8TM ERROR
,8*
RPFMT TFM TRANS-1
,RPTl*
SYM-l:t
SF
.-1
,SYM:t
TF
B
FSCAN&12*
OORG .-3*
,RPFMT&21*
WIDTH
RPT2
S
PUNCT-12*
BN
TFM TRNSBR&6 ,RPT2*
RPTI
,FSCAN&12:1:
TFM TRANS-1
,10:t
RPFMT&23 ,1
SM
BH
TRANS*
FSCAN&12:1:
B
DORG *-.3*
,EFIND&12*
WIDTH OS
BTM CFXN.,10-t
HOll
CHCHI
,CHCHI-l*
BT
CHl,61,10:l:
CM
BE
*&104*
eM CHI.,48,10=t
BNE RPFMT*
,
,10=1:
BTM WIDTST
TFM TRANS&23,HTYPE:I:
TFM HOLllt11,HCONT2*
CHI-1,CHltlt
TR
TFM TRNSBR&6,HCONTl~
B
TRANS*
DORG *-3:1:
,
BIM WIDTST
,10*
TFM TRANS&23 ,XTYPE:I:
IFM Helll&ll ,HCONT4&24*
B
*-56*
OGRG *-3*
HCONII TfM TRANSt11,2,10=l:
7
0-
,
'13
I
O~
0-
!I!!
- - - _ .. _-----
0
0
LOCTN
OP
P/L
(J
04318
04390
04402
04414
04422
04422
04434
04446
04458
04466
04466
04418
0449C
04502
045C9
04519
04520
04532
04544
04552
04552
04564
04516
04Se4
04584
04596
04608
04620
04632
04644
04652
04652
04664
32
26
16
49
11480
03635
03654
03612
COCOO
17481
-44.'34
00000
31
16
26
49
11510
03654
03635
03612
11512
-4466
17511
00000
12
46
16
49
17"t81
04422
03623
02984
000-1
01100
000-'5
COOOO
0467~
04688
04100
04112
04724
04731
04756
04768
04180
04792
04804
0481'-:
04828
04840
04852
048c4
04876
04884
04884
C489C
04908
11
15 00699 00004
31 17510 11528
49 09710 00000
31 11510 17522
15 00699 OOOOM
49 09710 00000
31
16
16
15
32
49
33
33
33
33
24
46
17
31
14
47
25
31
14
46
17
16
16
49
17510
17240
11631
00697
00702
11634
11480
17't 18
17476
11474
17481
04756
11534
10
00000
17523
04840
OOOOq
17510
17511
04852
11534
06020
05151
05068
26 04907
31 13009
26 13008
17516
000M9
000M9
COOOI
00000
COOCO
OCOOO
00000
OCOOO
00000
04745
01200
0-076
05261
00009
01100
17523
17526
00009
01100
0-077
-0005
COOKO
00000
PG LN
03 650
03 660
03 670
03 680
03 690
03 70G
03 110
03 720
03 730
03 740
03 750
03 760
03 170
03 780
03 790
03 800
03 810
03 820
03 830
03 840
03 850
03 860
03 810
03 880
03 890
03 900
03 910
03 920
03 930
03 940
03 950
03 960
03 970
03 980
03 990
04 000
04 010
04 020
04 040
04 050
04 060
04 070
04 080
04 090
04 100
04 110
C4 120
04 130
04 140
04 150
04 160
04 170
180
190
00
LABEL
MNEM OPERANDS AND REMARKS
HOlll
Sf
TF
TFM
B
OORG
HCONT3 TR
HCONT2 TFM
Tf
B
OORG
HCONT4 SM
BP
FMTSP
DIM
TFM
B
OORG
DC
TO,.,
TR
B
COHM
OORG
TR
TOM
B
IF
DORG
TR
TFM
TFM
TOM
SF
B
ER6
SENSE
IFSS
ER1
OORG
CF
CF
CF
CF
C
BE
BTM
OAC
TR
CM
BNH
TO
TR
CM
Oh
BTM
TfM
TFM
B
TEN
OORG
TF
TR
TF
TR
SYM-lt
TRANSt23,SYM:t
TRNSBR&6,HCONT2*
TRANS*
4-3*
CHI-1,CHIG1*
TRNSBRG6,HCONT4*
TRANS&23,CHI*
TRANS*
*-3*
SYM,l,lO*
HCONT3*
TRANSG11,5,10*
FSCAN*
*-4*
11.,74900000Glt
OMSWCH,4t
CHI-l,CHI&17*
CSt
"-3*
CHI-1
,CHI&11*
,4
DMSWCH
CS*
.. -3*
CHI-l,CHI&5*
PHI&220,49,10*
OMMl,49,10*
FSTSW,I*
IFSWCH*
ASCAN&12*
.-3*
SYM-1*
SYM-3*
SYM-5*
SYM-1*
SYM,SENSEG8*
IFSS*
,16
ERROR
lO,SENSE*
OUT
,IFSSRC*
CHI&12,69,10*
*&60*
OU1&9
.,CHI&12*
CHI-l,CHI&15*
CHI,69,10*
*&24*
.,77
ERROR
KKt6
,OUT&5*
THAT&11,20,10t
ElEVEN&12t
.-3*
*&23,PUTET8&6*
INST1&1*
INSTl&6,TFFAC:t
INST2 RVINST*
PAGE
8
0
t11*
0:
,8*
,8*
'-1'1
".".,."
.....
,,~.,,'
,., ................... ~ .......".,--"
.................... ,."."
,
....
, ...
, ......
J~~
_ _ _ _ _
~
•• _ , . " ...... " . . . . .
f
':'1
"r
- - - - - - _ .... _---_ ....
0
(~
'-.JI
0
---------_.
__._---_ ..--
P/L
CP
04932
04944
04952
04952
04964
04976
04988
05COO
05012
0'5024
05032
05032
44 04952 13015
49 04964 00000
05044
-0041
17512
-5080
-0041
01200
-COOS
CCOJ2
17513
00OM4
05056
05C68
05080
OSOg2
05104
05116
05128
05140
05152
05164
05172
05172
C51E4
0'5196
05208·
05216
05216
05228
05240
05252
05260
05260
05261
05272
05281
05282
C5294
05306
05318
05330
05342
05353
05354
27
44
27
43
14084
04988
14104
05032
31 OCOOO
21 00006
49 05044
..
14083
13016
14103
13016
05172
16243
oooeo
05216
31
16
31
17
14
47
16
11
45
17
16
49
00000
06020
J7510
06002
06020
05116
06020
06020
05056
14630
05151
00462
43
49
44
49
-0024 00053
00000 00000
00000 000"0
CCOOO 00000
14
46
46
49
OC060
00000
00000
00000
1
.1
11
9
31 17510
17 09356
26 05323
12 00004
14 17511
47 05366
1
17 11534
053~6
11 09582
K6 00011
05378
26 00006
05390
05402
26 05689
05414
16 C5704
05426
16 05528
C5438
31 17510
C545C
14 17511
_ _ 05 4 6~ __~__0 '5 4 8 6
--~----
Q
CCO~4
COOOO
0-000
01200
OlIGO
COOOO
17514
-530(,
08454
000L6
COOK3
01200
PG LN
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
C4
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
0-078
04
-537H
05389 04
08535 04
(,8535 ' 04
04
C-CC1
.-5689 04
11'512 04
ceope
C13CO
---------.~-.
._-----------_ ... _ .... _._ .... __ . __ ._-_._ ... -_._--- -
- --- ---.----_ ..
LOCTN
--.--"-
LABEL
210
220
230
240
250
260
270
280
290
300
310
320
330
340
31)0
360
370
380
390
400
410
420
430
440
450
4[;0
470
480
490
500
510
520
530
540
550
SAO
570
'580
590
600
610
620
630
640
650
660
670
680
690
7CO
710
720
730
G4 140
04 750
-, . . . .
'--"- -"-- -- ---
_--_.-
..
__
._----- --
..
_.... __
._---_._-_ .._-----_._- -
-- ._--"-_._-_.
MNE~1
OPERANDS AND REMARKS
\1NF
R
DORG
BT
BNF
*&20,lNST1~13*
PAGE
*&20*
*-3*
PUT 1., PUT 1-14=
*t24,INST1&14:f:
PUT2,PUT2-14=
Bf
*&44',INSTl&14:f:
UD
TR
OUT
,IFRCFL*
,L:f:
A
OUT&6
B
*&20tOORG *-3=1=
,IFRCFX:f:
TR
OUT
,OUT&41*
TFM KK&6
CI-II-1,tHI&I,2:f:
i:LEVEN TR
STATNO,*t;12*
eTM
Cflll
KKt.6
,OUTt.41*
BNE *t24t
,OUT&.5=1=
TFM KKt.6
A~
KK&6,12,10*
BNR ELEVEN,CHI&2:t
THAT
3TM PUTX,44,lO*
TF~
*-1,44,10*
8
~f:GIN*
DCRG *-3*
24,FAC-7,2=1=
IFRCFL Be
e
:f
,FACt
BNF
B
:f
DORG *-3*
FAC,,8:f
IFRCFX CfooI
:f:
BE
BH
B
*
TfM
KAY &6, 05AO(l:*
TR
CHI-l,CHlt.l:t
CHI,7(),104=
*&24=t
C ~}
SNL
0
"*
OCRG *-3*
l,@:f
DC
IFSSRC DC
1,4*
11,60000000000*
DC
9,49000000@*
DC
TR
CHI-l,CHI&3*
DO
8TM
CFXN,*&12:t
'lI't17 , SMTlUIt. 10*
TF
4,36,104=
SM
CM
CHI,23,lC*
BNE *£24*
DC
1,@,**
BTM ERROR,78,R.:t
BTM
CSORN,*£12:t
TF
OUTtl1
,*&11
,SMCNT-t
TF
UUT&.6
TF
nSADG ,SMCNT:*
TfM DSADO~15,1,8t
ELL
0-
-----------------_._--
,0*
0--
ti2 ___
o
-~-~----~
LOCTN
OP
P/l
Q
PC LN
LABEL
- -----------
~
~ -~
---
---
---~ -----~-~-~---
..
-- ---
------~-
MNEM OPERANDS AND REMARKS
PAGf:
0
11 09582 -5510 04 760
BT~
CSORN,*£36*
17 0935~6--CC-0':"O---()4- -iTfS------------ -13rM---(FX-N-;-;TG*---------------~-·-----------054~8
26 OH535 11481 04 ~~_S}_ _ _ _ _ _~F
SMCNT,SyM* ________________.___ _
C5510 11 05528 -COOS 04 790
AM
*£18,5*
05522 26 OOOCO 08535 04 800 KAY
TF
,SMCNT*
05534 45 05438 11513 04 810
ANR ELL,CHI£2*
05546 26 COOll 05694 04 820
TF
OUT&11
,DSAOO&51
05558 44 05582 ceOCR 04 330
LHJF *&24
,OUT&8*
O~510
15 00000 CCCGJ 04 84C
TrM OUT
,1
05582
11 14630 CCOJ2 04 850
3T~
PUTX,12,10*
05594 26 05694 16243 04 a60
TF
DSAOC&5,L*
05606 26 05641 05648 04 862
TF
*&35
,EMM&6*
05618
11 05641 COOJ9 04 864
AM
*&23
,19
05630
45 11516 00000 04 86A
BNR NOSPCE*
0~642
31 00000 056e5 04 870
EMM
TR
,DSADO-4t
05654
11 05648 -0020 G4 880
A~
*-6,20*
05666 26 08535 16850 04 890
TF
SMCNT,ME~CAP-1*
05618 49 00462 COO CO 04 900
B
tiEGIN*
05685
__~__________~C~4~910
DORG *-4t
05689
00005 -coDa 04 920 OSADO DSA O,O,o,ot
_ _-=-05694
00005 -0000
05699
00005 -OOCO
051C4
oe005 -0000
DC
1,{Jit
05105
1
04 930
TR
CHI-l,CHI&7*
057C6 31 17510 11518 04 940 GOTD
C~
CHI,24,10*
05118 14 17511 COOK4 04 950
BE
COMPUrt
05130 46 05198 01200 04 960
TR
OUT
,GGG*
05142 31 00000 C7131 04 970
3TM CFXN,*&12*
05154
17 09356 -51~6 04 980
TF
CUTtS
,SMCNT-1*
05166 26 C0005 08534 04 990
BTM PUTX,8,10t
.~0~5~1~1~8~.~1~1~:14_6_3~O~0~0~0_-~8___
0_5__
0_0~0_____
B
BEGIN*
05790 49 00462 COOOO 05 010
DCRG *-3*
0519~
05 020
05198 . 16 06020 J1091 05 030 COfViPUT TFM KK&6,PHI&11*
TR
PHI-3,GOTORC-3*
05810 31 11017 07068 O~ 040
TDM SBSWCH,lt
05822
15 OO~98 COOOI C5 O~O
TR
CHI-l,CHI<
05834 31 17510 17512 05 000
BTM STAINO,*&12*
17 06002 -5858 05 070
A~
PHI -1,4,10*
11 17019 000-4 05 080
.~M
KK&6, 4, lOt
11 06020 000-4
O~ 090
05870
BO
tCMPUT&24,CHI-l*
05882 43 05822 17510 05 100
A
PHI&35,Lt
05894 21 17055 16243 05 110
A
42&PHI,L1=
21 11062 16243 05 120
05906
A
54E.PHI,Lt
21 17074 16243 05 130
05918
T i~
CHI - 1 , CHI &3
31 17510 11514 05 140
05930
RTM-;--L---S~O~R~N~,-*--&~1~2~t------------------17 09582 -5954
05 1~0
05942
TOM SBSWCH,O.t
05954 15 00(;98 ocoeo 05 160
TF
PHI&6,SMCNT*
26 17026 08535 05 170
059t6
~ T ._ _P:........=...U-=-T-,-P-,-H~I_~,~P-,-H~I_--=1-,-*________
27 14664 11019 C5 18.0
05918
lJ
dEGIN=t
059<;0 49 00462 ceoco 05 190
11 09356 -6014 OS 200 STATNO GTM CFXN,*E12*
06002
TF
,SMCNT-1t
06014 26 00000 08534 G5 210 KK
TF
*t22, SMTLljl& 10*
06026 26 06048 08454 05 220
*632,5*
,06038 44 06070 ceOC5 05 23C
n: * £ 1 a,.s T J\ T i·~O-l:4:
26 06C68 C60CI
05 240
06050
05414
05486
o
o
*
-_ ... _._-_.-. __ ..-
_ _ _ _ • _ _ _ _ _ • __ ••.••• __ .. +"' ••••• ,........ _ . " .. _ _ ~~ ........ ~. ____ ... ,•.•• ,,,.~.,.,, •••••••••• """ ..... ,, ... ,J .... _."
-_ ..
•
""H.,....... ,
ti:
-'~'--'-'
--'
-_._-------_._-----
1"'\
\.j
LOCTN
0-
P/L
Q
49 00000 ceooo
PG LN
05
05
26 06092 08454 05
44 06102 00004 05
49 06050 oouoo 05
05
26 06119 08454 05
16 00005 -0090 05
49 06050 00000 05
05
C~134
06134 17 06566 -6146 05
06146 31 00000 06682 05
06158 21 00005 08534 05
0611C
11 14630 000J6 05
06182 26 06199 08454 05
06194 26 00004 16243 05
06206 26 00088 C8535 05
06218 26 16398 16243 . 05
0623C 33 16394 oooco 05
06242 31 00']89 16454 05
06254 31 00091 16392 0.5
06266 31 00098 16455 05
06278 27 14976 14975 05
06290 21 00006 16243 05
06302 26 00010 08534 05
06314
17 14630 OOOJ2 05
06326 49 00462 00000 05
05
06334
06334 32 06354 00000 05
06346 49 06366 OCOOO 05
05
06354
06354 33 06354 00000 05
OC366 17 06566 -6378 OS
06378 31 00000 06690 05
06390 26 06412 08454 .05
06402 21 00006 OC004 05
06414 11 14630 000-8 05
06426 44 00462 C6354 05
06438 26 16249 08535 05
06450 12 16249 OOOJO 05
06462 26 16398 16243 05
06474 27 14928 14921 05
06486' 49 00462 OOOCO 05
05
Ot4'14
0649.4
11 06"566 -6506 05
06506 31 00000 06111 05
06518 26 00C05 08534 05
0653C 21 00011 16243 05
06542
11 14630 OCOJ2 05
06554 49 06724 00000 05
06566 31 17510 17512 05
C657E
14 11511 000(9 05
C659C
47 C6566 C11CO 05
066e2
11 09356 -6614 05
C6614 26 06655 08454 05
06062
0606'1
06070
06082
06094
06102
06102
06114
06126
0
CP
250
260
270
280
290
300
310
320
330
340
350
360
370
380
390
400
410
420
430
440
450
460
470
480
490
500
510
520
530
540
550
560
510
580
590
600
610
620
630
640
650
660
670
680
690
700
710
720
730
740
750
760
170
780
790
LABEL
MNEM OPERANDS AND REMARKS
B
BEG PRO
END PRO
XETURN
EXPROC
GETNG
PAGE
11
~
-
o~
*
DORG *-4*
Tf
*&22,SMTlU1tl0*
BNF *&20,4*
B
KK&36*
DORG *-3*
TF
*&17,SMTlU1&lO*
TFM 5,90*
B
KK&36*
DORG *-3*
BTM GETNO,*t12*
TR
OUT
,BEREC*
GUT&5
,SMCNT-1*
A
8TM PUTX,16,10*
Tf
*&11,SMTlUltlO*
4,lt
TF
88,SMCNT*
TF
BRINSTt6,lt
TF
BRINST&2t
Cf
TR
89,CRAM-3*
91,BRINSTt
TR
98,CRAM-2t
TR
COMGO,COMGO-1t
BT
A
OUTt6
,l*
OUT&10
TF
,SMCNT-1*
8TM PUTX,12,10t
BEGINt
B
DORG *-3t
SF
XETURN*
XETURN&12t
B
DORG .-3t
XETURNt
CF
BTM GETNO,*t12:J:
TR
OUT
,BERECt8*
TF
*&22,SMTlU1&10*
A
OUT&6
,4*
BTM PUTX,8,10*
BNF BEGIN,XETURN:J:
TF
lOOER,SMCNTt
LODER,10,10t
SM
BRINST&6,l:J:
TF
BGO,BGO-1t
BT
3EGINt
B
DORG --3t
BTM GETNO,*&12*
,EXRECt
OUT
TR
QUTt')
,SMCNT-1*
TF
CUTt11
A
,l*
BTM PUTX,12,10:t
B
TESTOO*
TR
CHI-1,CHI&1*
CM
CHI,69,10*
BNH ·-24*
BTM CFXN,*tI2*
TF
*t41,SMTlUltlO*
0
0
'11
p,
0
..
------.-.-.----~-----.----~----
0
--.-----
lGCTN
OP
Cl::626
06638
Of650
26 06660 Oe454
12 066'55 000-1
L6 00009 OC009
26 0668C 06565
49 98765 COCCO
Of66,2
0
..
06674
06681
06682
06690
06690
06698
C6698
C6710
06111
06711
06723
06724
06736
06148
06760
06112
06184
061Q6
06801
06808
06820
06832
06844
Ob8S£.
06868
06880
06892
06904
06916
06928
06940
06952
06964
06916
C698d
01000
01012
01024
07031
07031
01042
01054
01C67
01070
07011
070Be
07082
01094
07101
01106
8
Q
P/L
49 -OOJO
oooeo
49 -OOOQ 00000
26 -OOOK ceOOl
1
1
6
6
44
31
12
26
31
26
15
11
26
26
11
26
26
26
26
26
26
26
44
15
44
15
17
11
47
49
03914
00000
05648
06783
00040
06802
00000
1
06802
06838
00,000
06838
06874
00000
00006
00011
00018
00023
00030
06964
OCOOO
06988
00012
14630
01153
06136
03914
1
11
12
13
3
1
()
2
12
1
5
OC701
01031
-0020
05648
CCOOO
06783
00000
-0010
068C2
16457
-0010
06838
164'57
00044
000.59
00044
00054
00049
ce001
COO02
00019
00002
000L6
OCOl6
01200
00000
----------
MNEM OPERANDS AND REMARKS
PG Lf\;
LABEL
05 800
*&34,SMTLU1&10:J:
*&17,1,10*
9,9*
*&18,GETND-1:J:
B
98765*
OORG ·-4*
BEREC B
10,,25*
OORG *-3*
8,,264B
DORG .-3*
TF
2,1,26*
l,@4=
DC
EXREC DC
1,1*
DC
6,700002*
6,00012Gl.f.
DC
TESTOO BNF CONFMT-20 ,OOSWCH*
,OORCRO:J:
TR
OUT
EMM&6,20:J:
SM
.&23,EMM&6*
TF
TR
OUT&40:t
TF
*&18,·-1*
TOM
*
DC
1,Gt·*
AM
*-6,10*
TF
*&18,*-18*
,CRAM:t=
TF
AM
*-6,10*
TF
*&18,*-18*
TF
,CRAM*
TF
OUT&6
,OUT&44*
,OUT&59:t=
TF
OUT&11
OUTG18
,OUT&44*
TF
OUT&23
,OUT&54*
TF
,OUT&49:t
TF
OUT&30
BNF *&24
,OUT&7*
TOM OUT
,2*
,OUT&194:
BNF *&24
TOM OUT&12
,2*
BTM PUTX,36,10*
AM
SLOT
,36,10*
BNE TESTOOt124:
CONFMT-20:t=
B
0'5 810
05 820
05 830
05 840
05 850
05 860
05 870
05 880
05 890
05 900
05 910
05 920
05 930
C5 940
05 950
05 960
0'5 910
05 980
05 990
06 000
06 010
06 020
06 030
06 040
06 050
06 060
06 070
06 080
06 090
06 100
06 110
06 120
06 13C
C6 140
06 150
06 160
06 110
06 180
06 190
06 200
06 210
06 220
06 230
06 240
06 250
06 260
06 2'70
C6 280
06 290
06 300
06 310
06 320
06 330
06 340
PAGE
12
0
Tf
SM
TF
TF
OORG
DORCRD DC
DC
DC
DC
DC
GOTORe DC
DC
DC
DC
DC
DC
DC
0
·-4*
1,1*
11,100000000004:
12,140000000000*
13,47000000110Uat
.3,68*
1,1*
9,300009000*
2,04*
12,320009500000*
1,1100099*
5,00067*
12 260005900099*
1./8
r,
~
0
0
-------~-
LOCTN
07130
07131
07139
06724
01140
07152
01160
07160
01172
07184
01192
01192
0120C
012CO
07212
01224
07236
01248
01260
07212
C7284
07296
01308
07316
07316
01323
07323
01324
0733c
07348
01360
c73c8
0736e
0138C
013<;2
0740C
07400
07412
07424
01436
07448
07460
01468
07468
0148C
C74S2
07504
07516
07528
0154C
C7552
07559
01564
CP
.. ---.----
Q
12
1
8
16 13003 OCO~3
49 07284 0COOO
31 17510 17518
26 13009 r1199
49 07224 (;ooeo
J7 02452
-coro
31 17510 17524
16 13003 COOl4
11 09356 coo-o
2(:, 13013 17481
33 13010 ceoco
45 07284 17511
16 13013 -ooco
31 13014 164r:::3
21 14084 140?3
49 06724 COOCO
49 02562
ceoco
1
31
17
16
49
COOOO C7316
14630 COO-8
14864 -1368
14810 ceoco
16 14864 J47CO
45 07400 16937
49 07424 CCOCO
43
38
26
If.
16
49
07424
16937
16868
17481
09581
08388
CC459
00400
16243
CCRS9
-7468
ceooo
26 16873 08535
26
31
31
26
26
46
34
C8455
16264
16846
16850
168'50
CCIOO
OOCOO CCIG2
16818
16819
16929
07575
07558
17610
1
26 0798'5
ccoo.c
44 C764C (7985
44 C7620 C7982
015£8
___ .__--.9 7 6J;_C__ ._tQ.. 07758 -79L2
C157t
0
-_._---_.__._-_._--_._----------------_. -
-~----
--_._-- .. _-------------_.---
- - - - - -_.- -_.
0--
--------_._---_.- ----- - - - - --_... _--_._-.----
- -_._------
P/L
-~
PG
06
06
06
06
06
06
06
06
06
06
IN
MNEM
DC
DC
GGG.
DC
CONTIN DS
PAGE
OPERANDS AND REMARKS
12,260C06S00000*
1,44:
8 ,900000001*
,1[5TOO4:
,48
,10·t
INSTl£1
TF~
B
ENOX-32*
OCRG *-3*
TR
CHI-l,CHI&7.t
LABEL
350
360
370
380
390
PAUSE
420
430
45()
460
470
06 480
01) 490
O~
f)QO
06
06
06
06
06
C6
06
06
06
510
520
5'50
1)60
570
STOP
I~STl£1,CONTRl-l*
B
CCNTRl£24*
*-3:t
,O7!:
STOPSR
*-3i:
CHI-l,CHI&13:t
INSTl&I,34,lO:t
CFXN,,10:t
INSTl&11,SYM:t
INSTl&8:t
*&24,CHli:
INSTl&ll:t
,CRAM-4:t
INST1&12
PUTl,PUT1-1:t
TESTDO=t
*-3:t
ENOSR:t
*-4*
l,@:t
OUT
,ENOX*
PUTX,8,10:t
OUMPE54,*E20:t
DUMPt
*-3*
DUMP654,PUTPHI&36:t
*620,IMAGE*
*632*
*-3*
*624,SKPPCH:t
IMAGE*
BUfBAS&6,lt
SYM,999,9=t
CSGRN-l,*&20*
StJTlU*
*-3:t
HUFBAS&11,SMCNT*
BUFBAS&16,SMTlUl&11:t
GUFBAS&17,USEDFS:t
3UFBAS&61,MEMCAP-5:t
OORG
BTM
OORG
CONTRl TR
TFM
B1M
TF
CF
580
BNR
590
TF~
595
bOC
TR
BT
06 610
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
TF
620
630
640
6·50
660
670
680
690
700
110
720
730
740
750
760
770
B
OGRG
ENDX
B
DGRG
DC
END
TH
8TM
TFM
B
DORG
TFM
BNR
B
DCRG
SO
WNCD
TF
780
TF~
790
800
810
820
TF,..
8
OGRG
TF
C~
830
TF
06
06
06
06
06
06
C6
0"
06
06
06
840
850
870
880
89C
900
910
9/0
93C
9'i 0
gsa
,
0
TR
TR
TF
*t59,~EMCAP-l*
001
*630,MEMCAP-1:J:
TF
BCI
PSTAB*
1:
RelY
l,;jj, *-4:t
DC
TF
00IT-3*
i\OTCCf.l
,DCIT-3t
BNfbNF FlPCON
,00IT-6* .
FXPCLN TFfv' WNUMD&t, Df~.!...! - ~=t _____.__
--
-0'_
Ll1
----.-.---.-----.-~
_
---_._----_._._-_.. .•_--_.
__._._----.----_ _-_._-_
..
..---~-
..........
__
._._ ...... -
--'-----
,-
rf··'
- -------- - ---,---- -----------.-,-
o
----------
- -----------,-
-----------------
CP
01612
0162 C
49 07116 ceoce 06 9fO
8
hADDRt
----------..1-1,"- 'j'7iY------------ ----rSt R<;---.=-31:-------
C7 6 2 C
1 6 ~ 1 ? 8 - 1976
49 C7716 COOGe
44
14
46
16
49
0714C
07752
07764
____~07776
07188
07196
071S6
01808
07816
___--.::0~7_=::8_=::16
01828
07840
01852
07864
0187t.
078 S8
079CO
079ce
01908
07920
OJ 9 3 2
07944
07956
07968
C
07696
01985
11670
e1158
C1716
C7983
COR99
(1200
-1983
ceeee
38 07554 CCleo
34 00000 CCICJ
1
44 07816 01739
38
cooce
COlce
12 C1515 OOOJO
12 07558 CCOJC
49 07540 ceoco
33 01739 CCCCO
49 07716 oeoco
39 01971 CC 100
37 07139 CCOCO
26
12
44
26
44
49
07814
01814
01164
07898
C1908
01164
26
26
34
38
12
49
C1930
07558
COO 00
07554
07515
07776
6
1
C79P~
C79E6
07987
07988
01988
oeoee
08012
08024
08036
C8048
G80fO
08072
e8C7e;
P/L
44 07796 C1982
49 076CO cecce
0173~
o
------- --------------------- -,------ -- ------------------,
lCCT~
01632
07640
0164C
C1652
07664
0761t
01688
07696
07696
011e8
07716
07716
01728
o
-----------------
01574
COO-l
CCOC5
07814
ceo C6
ceooo
PG LN
B
WACDRt
OORG *-3*
NOTceN BNf
~CTACC,CUIT-5*
C~
COIT-3,999,9*
010
020
07
07
07
07
07
07
07
07
07
07
01
07
07
C7
01
07
07
07
01
07
07
01
07
00459
C03CO
16864
-0152
C01C2
COICO
OC~GO
ecoco
01
07
07
07
07
07
C7
07
C7
, DO IT - 1 2
030
040
BE
PSTABt
Tr~
W~UMB&~,DOIT-~*
GSO
B
060
C70
OHO
07 090
C7874
CCOC9
CO 1 O l e 7
CClCO 07
CCOKC 07
CCOOO 07
07
07
1
07
08140
08080
00402
08036
00000
02819
ooceo
cocoa
1
Wf'.l U ~ fH~ ,.,
F l PC GN T F f-I.
ceo
PAGE ~
----------------------------
C 6 9}3 0
990
-
MNEM CPERANDS AND REMARKS
C6
07
07
07
07
07
07
07
07
C7
*
WAOOR*
OORG *-3*
NOTACC BNF VAR,OOIT-6*
B
FXPCGN*
----~C~O~!R~G~*~-~3~*~~---------------------------
100
110
120
130
140
WACOR
WNTY 001&38*
SPTY ,~11*
DC
1,@,*-4*
BNf VARE20,*-lt
wNU~B
ISO
RETURN
W~TY
S~
*
OCI&59,10,lO*
160
SM
DOI&42,lC,lO*
170
B
001&24*
190
OCRG *-3*
190 VAR
Cf
WAODR&23*
200 _________B~~-~~:A~O~O~R~*~----------------------~
2.10
DCRG *-3*
220
WAT Y 0 CIT -11* 1
230
Sf
WAOOR&23i
240
Tf
*&34,001&58*
250
S~
*&22,1,10*
260
BNF RETURN,5*
270
TF
*&22,*-2*
2:3 0
__-=-B~N~f_ __=_*--=t:_=2--:=0__=,--:=6:__=_*----------------290
B
RETURN*
30C
OORG *-3*
310
TF
*f.22,VAR&18*
320
_____~T~F~~D~C~I~&~4~2~,~9~*~------------------------
0
*
3 >3 0
S PT Y
340
350
360
370
380
390
WNTY C_~O~,I~&~3~B_,t~~~----------------------S~
001&59,20,10*
B
RETURN&12*
OS
6*
DC
1,@*
07 400
43
46
31
49
34
39
36
49
LAEEL
...
-~
410
420
430
440
450
470
460
490
'sec
DC
DOlT
EXIT
OS
BC
BC3
TR
B
STePER ReTY
WATY
RNCD
2
Df':
l,~*
,*El*
MOCN7-24 y SKPPCHt
LCCPt
402,BUFBAS&2*
STCPER,152,7t
*
LSUBSt
*
*
l, ,i, .-44:
___ .QJiQfJ;________________c2__l'~_______~.JL_~0___* -:3 '!_____________________
50
•
-------------_._-
0"
0
---------- _._---_.
LGCTN
OP
P/L
Q
08080
08092
08104
08116
08128
08140
08152
08164
08176
08188
08200
08212
08224
08236
08248
08260
08212
08279
08284
08296
.__
08308
083P'1
08320
08332
08344
08356
08368
08380
08388
08388
C8400
08412
08420
08420
08432
08444
08456
08468
08480
084e8
08488
085CO
1';
16
38
38
16912
16863
16859
02813
08031
00000
16719
08182
00000
08241
08182
08182
08116
OCOC8
05648
16313
KOOOO
OOOOJ
-0402
00400
00400
00400
00102
COICO
16856
16451
08181
OOOJO
,18008
01100
OCOOO
08182
16313
20102
38
34
39
26
26
26
12
14
46
15
26
22
34
15 16099 OCOOI
39 16819 OC100
41 NI000 00000
15 08309 00008
38
38
38
38
49
0
08620
oe632
OC4CO
C04CO
00400
00400
00000
26 C8535 16850
26 08454 16849
4<1 08444 00000
12
12
26
44
44
49
44
26
08512
15
C8524· 49
08535
08536 45
08'548 45
08560 26
08572 26
Ob584 44
OB5G6 33
OP608
15
08619
16458
16538
16618
16698
00402
08534
08454
17491
08488
08420
08704
08536
08534
17481
08420
08704
11516
08577
00009
C8656
17481
11482
000-1
000-1
CC009
17489
11479
00000
17487
11490
COOOO
R9999
11491
11490
C8454
17481
17481
ceooo
PG LN
07
07
07
01
01
07
01
01
07
07
01
01
01
07
07
07
07
01
07
07
07
07
07
01
01
07
07
01
07
07
01
07
07
01
07
07
07
07
07
01
01
01
07
07
01
01
01
07
01
01
07
CCOOO
08
31 00089 17412
26 C0088 C8~35
08
08
08
1
520
530
540
550
560
570
580
590
600
610
620
630
640
650
660
670
680
685
687
690
100
705
710
120
730
140
750
760
170
780
190
800
810
820
830
840
850
860
810
880
890
900
910
920
930
940
950
960
910
980
990
000
010
020
030
LABEL
MNEM OPERANDS AND REMARKS
lOOP
TOM
TFM
WNCO
WNCO
WNCO
ReTY
WAry
TF
TF
TF
SM
CM
BH
TOM
TF
S
MOON1
K
INCREM OS
TOM
WATY
NOP
OS
F1
TDM
WNCO
WNCO
WNCD
WNCD
SMTlU
B
OORG
TF
TF
B
OORG
SMlOOP SM
SM
SMTLUI TF
BNF
BNF
B
OORG
BNF
TF
TOM
!3
SMCNT
SMNOT
OS
BNR
BNR
TF
TF
BNF
CF
TOM
DC
TR
TF
PAGE
15
0
8UFBASt50,1,11*
BUFBASt1,402*
LOAO-2*'
lSUBS-6*
STOPER-5*
*
EOC*
*&18,FCTENO*
,CRAMt
*&53,*-1*
*-18,10,10*
*-30,lAST&12*
*-48*
8*
EMMt6,MOON1&18*
USEOFS&49,USEOFS&49*
,24:
,20102
20000
,*-4*
TRACE&l
,1*
lSTM*
,
51000
,2*
,**
*-11,8*
ZERCRlt
ZERCR2-2*
l-ROUT*
LROUT24=
INITL*
*-3*
SMCNT,MEMCAP-1*
SMTlU1&10,MEMCAP-2*
SMTlUlt
*-3*
SMCNT-l,l,lO*
SMTlU1&10.,l,lOt
COMP,9*
*t32,COMP-2*
SMLOOP,SYM-2*
SMTST*
*-.3*
SMNOT,COMP-4*
SMCNT-1,COMP-1*
COMP-4,Ot
SMlOOP,99999,7t
,**
SMTST,COMPt
NOSPCE,COMP.,..l*
*&17,SMTlU1&10*
9,SYMt
MOON3,SYMt
SYM*
SYM&l*
0
1,4},**
89,SYM-9*
88,SMCNT*
0'2L
---- ----_.-
0
0
0
-------
------------ .. - - - -
LCCTN
LP
P/L
Q
08644
C8656
08668
08680
086<.12
081C4
08716
08728
0874C
08752
081f.4
08116
08788
088CC
C8812
08824
08836
08848
0886C
08812
08884
08896
08908
08920
08932
08944
08952
08952
08964
08911
08912
08984
08996
09008
09020
OQ028
09028
09040
09052
09064
09076
09088
0910C
09112
09124
09136
09148
09160
CCi112
09184
0<;196
0920£
C922C
C9231
09232
27
43
14
47
17
24
46
47
24
46
31
24
41
25
43
11
16
26
32
11
15
15
16
15
16
49
14976
08972
17511
11440
1153:4
17481
08420
08420
17491
08420
17483
C8455
11416
08822
08836
oe534
08890
08883
08882
08890
16213
08535
11511
11705
09581
11452
14975
OC699
CCOK4
01200
C-072
17491
C1400
(1200
11481
C14CO
11007
16856
01100
08534
CC200
000-1
J6213
(18534
COOCO
-COOO
00001
00000
000M6
ceoco
-8952
00000
15 00697 00001
49 12690 00000
26
14
46
44
49
09231
17511
09028
09300
09232
08535
COOK4
01200
006Q9
12
26
26
11
31
11
26
31
14
46
26
17
23
32
31
22
16
08454
09105
09 7 25
09230
17508'
09356
19994
17508
17509
09332
17491
09356
11491
00096
17508
09230
1<;999
000-1
08454
084'54
000-1
17510
COO-O
11481
17510
COO-4
01200
17481
-COGO
45
09~64
17513
COOOO
oco-o
11481
COOCO
17510
CC099
PG .IN
LABEL
08 040
C8 050
08 070
08 080
08 090
OE 100
08 110
08 120
08 130
08 140
08 150
08 160
08 110
08 lBO
08 190
08 200
08 210
08 220
08 230
08 240
08 250
08 260
08 270
08 280
08 290
08 300
08. 310
08 320
08 330
08 340
08 350
08 351
08 352
08 354
08 356
08 358
08 360
08 370
08 380
08 390
08 400
08 410
08 420
08 430
08 440
08 450
08 460
08 470
08 480
08 490
08 500
08 SIC
08 520
08 53C
08 540
COMGO,COMGO-1t
OMM,OMSWCH:t
eM CHI,24,lOt
PUTETA-12:t
BNE
BTM ERROR,72,8:t
SMTST C
SYM,COMP*
SMLOOPt
BV
BNE SMLOOPt
COMP,SYM*
C
SMLOOPt
BV
TR
COMP-8,ETAC-1*
SMTLUltll,FCTENOt
C
BNH PUTETA-36*
TO
*&22,SMCNT-l*
BD
*&24,200*
SMCNT-1,},lO:t
AM
TFM *&54,USEOFS-51*
*&35,SMCNT-lt
TF
SF
*&22*
AM
*&.18,t
TOM USEOFS-51,1*
TOM SMCNT,Ot
TFM CHI,46,lO*
TOM FXORFlt
TFM CSORN-l,*t20*
PUTETAt
B
DORG *-3*
TOM FSTSW,lt
TFSAVE:f:
B
OGRG *-4*
DMM
TF
DIMONT,SMCNT*
,24
eM
CHI
BE
*&32*
BNf OIMC-32
,OMSWCH*
B
OIMB£12*
DGRG *-3*
SMTLUl&lO,I,lO*
SM
DIMA&5,SMTLUl&lOt
Tf
TF
OIMB&5,SMTLU1£lO*
DIMONT-l,I,10:f:
AM
TR
CHI-3,CHI-lt
BTM CFXN,O,lO*
DIMA
TF
19994,SYM*
TR
CHI-3,CHI-l*
CHI-2,4,10*
CM
BE
OIMCi
Tf
SYM&10,SYM*
BTM CFXN,,10i:
SYM&10,SYMt
M
SF
96*
TR
CHI-3,CHI-1*
D I MONT-l ,99*
S
TFM 19999,,*
DIMB
DIMONT OS
,.*
8NR
*&.32,CHI&2*
MOON3
~NEM
OPERANDS AND REMARKS
PAGE
-
'--0-
16
BT
80
0-.
,10*
52
•
o
--------_._--- .._.. _---- -_.-
--.-
lOCTN CP P/l
Q
PC LN
LABEL
09244 15 00699 ocoeo 08 550
09256 49 00462 (COOC 08 560
09264
OA--'5--7C--------------_ _--=--0--=-9=2--=--6...:.4_-=1-,4~1:...:1. 5 11 00 () K3 08 5 8 ()
09216 31 li~08i751008 590---09288 46 09312 0120r 08 60e
09300 11 11534 C-079 08 610
09312 45 09710 11513 08 '620
09324 49 09300 ceoco 08 630
09332
08 640
09332
22 09230 11481
0& 6~0
DIMC
09344 49 09220 CCOOO 08 660
09356 16 17477 o-ceo oe 67C CFXN
09368 16 09398 J7477 C8 680
093~0
11 09398 OCO-l 08 690
09392 2~ 17418' 17511 08 700
094C4 31 11~08 17510 08 710
09416 45 09436 17511 08 120
09428 49 C9484 OCOOO 08 73C
09436
08 740
09436 14 11511 oeo-o 08 1~0
TOI'"\
OPtRANDS AND REMARKS
CMSWCH-t
B
REGIN*
MNE~
PAGE
o
-OORG--*-3*----·--
*
C~
TR
BE
BTM
BNR
B
ChI , 23, 1 0
CHI-3,CHI-l*
*£24*
ERROR,19,8*
CS,CHI&2*
*-24*
DORG *-3*
S
OIMONT-I,~YM*
B
.OIMB*
TFM SYM-4,,8t
TFM *&30,SYM-4*
A~
*&18,1,10*
TO
SYM-3,CHI*
TR
CHI-3,CHl-l*
B~R
*&20,CHI*
B
*&56*
OGRG *-3*
CM
CHI"IU*
_ _-=0 9-==-4....:....4~8_--=--4.=..6---=-0--=--9...:.4..::.0...:.4---=0-=-1-=,2:...::0:...::0~-=O~8=----..:.7 60
BE
*- 44
0946C 14 11511 CC009 C8 170
CM
CHI,69,lO*
09472 46 09380 OllCO 08 18C
BH
CFXN£24::t
09484
14 09398 J1481 OH 190
CM
CfXNt42,SY~*
09496 46 10510 CI1CO 08 800
BH
EXCESS*
09508 26 09531 09398 08 8.1 0
TF
*t23,CFXNt42*
_-.,.---'0"'-9=.....5:::..,:2"'-C=----=2_6=--=1...!...1...:...4-=8-=-I------=-C-=C.::..0-=0-=O-----'-=O-=8~8 2_-'-O_ _ _ _---.:T....:..F_-----"S'--Y'--M_,::t=----____________
09532
32 17478 CCOCO 08 830
SF
SYM-3*
09544 44 09558 C9354 08 840
BNF
*&14,CFXN-2*
09556 42 cocoa ceooc 08 850
BE
09558
08 860
DORG *-9*
09558 26 09~81 093~5 08 870
Tf
CSORN-l,CFXN-l::t
09570 49 08~88 CCOCO 08 8BC
B
S~TlU*
09582
14 17511 COO-3' 08 890 CSCRN CM
CHI,3,10*
OS594 15 11705 OCOCO 08 900
TOM FXORFl*
09606 46 C9S58 C12CO 08 910
BE
NUMBER*
09618
14 11511 acopo
OF 9/0
eM
CHI,70,10*
09630 46 09958 01300 08 930
BNL NUMBER*
_ _~0::....:9:....:6=--4.:..:2~-'1::...4~1=_7.!_1)--=-1: :. .l--..: : . C(~~.: . .0.:,. .t-'.: . .8_.::...0,.:::8_9 4 C
Ctv'
ChI , 48 , 1 0
09654 46 09114 elloe C8 950
Bh
*£20*
09666 49 09710 ceoco 08 96C
8
CS*
09614
08 970
DGRG *-3*
___~0~9~6~1~4~__1~4~=1~1~5~1~1~0~O,~0~N~5~~O~8~9~8~O~_ _ _~C~M~,__ CHI,~~,lO*
09686 46 09110 01100 08 990
Ah
CSt
,~O~9:....:'6~9:....:8~_1=_5~_=_1=_11.!-0~5~C~C.::...0.::...c~c~_~0~9_.::...00C
TOM FXORFL,2::t
TFM SAlT&G,SYM-8*
CS11C 16 09740 J7473 09 Ole CS
C9722
26 17482 11597 09 070
TF
SYM&I,IER09*
CS134 26 17473 17511 09 030 SALT
TF
SYM-8,CHI*
09746 31 11~08 17510 09 040
TR
CHI-3,CHI-lt
0915E 11 C9740 OCO-2 09 O~O
A~
SALT&6,2,10*
0971C 14 17511 cco~c 09 060
C~
CHI,40,IC*
09182 46 10638 013CO C~ 070
ENl SYMCHK::t
C9794 33 17480 ceooo 09 ODO
cr
SYM-l*
OS8CE 33 17478 cccce 09 OYO
CF
SYM-3*
___ 99818
33 17476 CCOCO
09__ 10!L ___________ ~E _ _
SY_t-';~5~________________
*
0
'.• __
*
*
o
_'O-
53
o
----------------- --- --.-----.--------------------- ----------- ---- ------- --------- -------,jjl"r
.....LCCT~
---=--g~.::...:'~!~
CP
P/L
Q
~~ 5i~~~-~~~~~
C~8~C
PG IN
14
09R6L 15
09874 46
09886
It
09898 26
C991C 26
C9~22
32
C9934 32
09946 49
~9 58 ____ 26
0997C 16
09982 16
C9g94 14
lCOC6 47
1001e 31
lC03C 49
1 CC 3 e
o
o
MNEM GPERANCS ANO REMARKS
PAGE~-
__~~---~}g------------------~l--09 130
C0 14C
-.-.-----;--~-.~------------.-----.-
C985C
L~BEl
S YM-!t
SfoITlut
OGRG *-3t
NG~Bl&A
,SYM-3t
FXNUMB C~
11705 eCOC2 09 150
TOM FXORFL,2-t
EXCESSt
10510 GI10e 09 160
BH
17473 C-OOO 09 170
TFM .:;YM-e
,
,8*
09921 1C116 09 190
TF
*f,;23,NU~el&6t
11482 CCCCC C9 190
TF
SYMElt
17481 CCO-~c~C-~0~9~2~C~C----~s~r~---~S~Y~M~,t~~----------------17478 ceoco C9 210
SF
SYM-3t
C8388CCOOO 09 22C
B
S~TLUt
1748 1 C8 3 19 09 2_3_0__N_lU~ 8 ERTF
S YM
, F1
09 0 57 JC226 C9 240
TF~
NUMBER-l,NUMB3*
10116 J7414 09 750
TFM NUM8l&A
,SYM-1t
11511 cccpe C9 260
--~c~P:~:--~C~h~.I~,~7~O~,~lO~t~~~~----------10038 C12CO 09 210
BNE *&32t
17510 17512 09 280
TR
CHI-l,CHI&I*
09994 (COCO OY 2QO
B
.-36*
lC116 J7478
*
-----0-,9-3-C-O
0 r=-=)R:-:::G:---.---3-t,.--------------
lCC38 14 17511 CCO-3 09 310 ~U~B __~C~~---~C~H~I~,~3~,~1~0~*-----------------lC05e 46 10166 01200 09 320
BE
FlNUMBt
lC062_~1~4~1~7~5~1~1~C~C~O~C~9--~C~9~3~3~o~------~e~~~.~~C~H~-~I~,6~9~,~1~O*~--------______--------10014 41 09350 OIICO 09 340
BNH FXNUMBt
____1~C~086
14 10116 J7481 09 3~O ______~C~M-,_~N~U~M~8~1~&~0~,~S~Y~M-*~---------------le098 46 10122 01100 09 ,/,0
BH
NUMBl&124:
le110 25 COOOO 11511 09 310 NUMBl TO
,CHIt
1 C1 2 2 3 1 17 5 1 0 1 15 --:-1-=-2--=-0-=-9--:::3-=-P.-=-C----"--'---=T:-:::q:------:e:-:-=H=:--:I:--=-=-:1~,-::e=-::H~I~&~1;;-t-;--------------1C134 11 10116 -0001 09 390
A~
NUMB1&6,lt
10146 Jl 11473 000-1 09 400 NUMBS AM
SYM-b
,1
1 C1 5 8
4 9 1 0_-=0-=3.. :.: . 8----.:.:.('-=--C-=--0_=_0_=_0_-=-09-=---4--=---=-10
B
NUMB -f.
lClf6
09 420
DGRG *-3*
lClf.6 ~2~~~--=1=C=3~2~8~1~C~I~1~6__~G~9_~4~3~C~-~F_lNUMB __T_r____N_U_M_B_2_&_S~,_N_U_M_B_l_&_6_*__________
,lOt
lC178 14 11473 CCO~l C9 440
eM SY~-8
,51
1C190 46 lC214 C12Ca 09 450
BE
*&24t
lC202 16 09957 JC334 09 46C
TFM NUMBER-1,NUMB2&12*
10214 26 10268 099~1 09 410
Tf
VARBR&6t~UMBER-l*
lC226
12 11413 CCC-l 09 480 NU~B3 SM
SYM-D
,1
lC238 31 11~lO 17~12 09 490
TR
CHI-l,CHI&I*
1025C 14 11511 CCOPO 09 50G
e~
CHI,IO,lOt
lC262 46 00000 01200 09 51C VARBR BE
t
10274 41 10354 CllGO 09 520
~NH
CMPARt
lC2E_~~__~1~6~I~O~2~6~8~'~J~O='3~3~4~_O~9~5~--3~O~________~T~F~~__~V~A~R~8~R~&~62,~N~'U~M~B~2~-&~'1~2~~~___________
1029B 14 10328 J1481 09 >,40
CM
NUM82&6
,SYMt
1031C
46 10334 CllCO C9 550
BH
NUMB2&12*
lC322 25 OCOOO 11511 09 560 NUMB2 Te
,CHIt
lC334
11 lC328 -0001 C~ 570
A~
NUMB2&6,lt
lC346 49 10238 ceoco 09 580
~
NUMB3t12t
____~I~C~3~5~4~________________-=C~9~~~9~0________~DO_~G__._-_3_*__________
1C354 14 17511 CCOMS Cq boc CMPAR C~
CHI,45,10t
____~1~0~3~f~,6~_4~7~1~0~5~4~6~C~1~2~C~l~)__n~J9~~6~1~O________~B~N~E __P~l~U~S~&~1=2~t___
1C~1e
26 lC544 lC156 09 6~C
TF
PLUS&10,NUMB~&lOt
lC39C 14 17513 ceCKO as 630
eM CHI&2,20,lO*
10402 41 10438 C13CC 09 640
Bl
*&36*
Ie 4 14 _4--'-..:-7--=--1C:=_4~5..:::..O--.:::.O=1=2~O.. : .O__....::.o.......:.q_r,_r.::-=.J_____.
B:\\ f
.. (; 3 6 t
0
---_.
_._------_.. _----- - - - - - - - - - - - - - - ,
0
lCCTN
- - - - 11028
-----
11040
11052
_ _-_._----_...
110{;4
0
11076
11088
1110C
11108
11108
11120
11132
11144
11156
11168
11180
11192
11204
11216
11228
11240
______ .1. 1 2 5 2
11264
11216
11288
113CO
11312
11324
11336
11348
11360
11312
11384
11396
114G8
11416
11391)
11416
11428
1144C
11452
114t4
11416
11484
11484
11495
114<;6
11508
11516
1ISlt
11532
11~34
0
11r;46
11558
11510
11582
CP
P/L
31 00010
00004
00096
11000
11000
11108
10894
23
32
22
21
44
4g
Q
PC
IN
LABEL
16245
11395
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
240
250
260
270
280
290
300
310
OUT&10
,SYMBSB-4*
,NOMS-:4:
OUTt4
96*
ETAN&3,99*
ETANt3
,OUTt4*
,OUTt14*
GORE
QUERY4:
B
DORG *-3-:4:
SUBN,l,lOt
GORE
AM
ETAN&6,SUBN*
TF
SUBN,15,10*
MM
TFM *&30,TOPtlt
S
*&18,99*
,OUT&1:t
TR
QUERY&.12*
B
COLECT TOM FAGR&1,3*
TFM SYMBSB,O,111*
TFM NOMS,,8*
CHI-1,CHltl:t
TR
CM
CHI,69,10*
FAGR-24:t
BH
BTM C5,2,10*
SYMBSB,SMCNTt
TF
CHI,10,lOt
CM
BE
*&48*
CM
CHI,20,lO*
BNE FAGR&12*
TOM FAGR&l,2*
TR
CHI-l,CHltl*
BTM CFXN,,10-t:
NOMB'ISYM-t:
TF
FAGR
CF
NOMB*
TF
*&18'1COlECT-l*
8
*
DORG *-3*
OS
NOMB
'1FAGR&11*
eM CHI,24,lO*
BE
SCRIPT,42*
SO
*-2,SBSWCH*
PUT ETA TR
ETAN,ETAC-B*
ETAN&4,SMCNT4:
TF
B
QUERY&36*
OORG *-3*
SF
PETA
ETAN&1*
,0
DC
SUBN
2
,**
TOM
FLAGSW,ot
B
PUTETB-12*
DORG .-3*
ERROR,14,8*
NOSPCE BTM
OS
5*
ERRMSSt20,ERROR-lt
ERROR TF
WATY ERRMSS*
TOM SKPPCH'Il,ll4:
TOM TYSTS1
,1*
CONFMT-20t
B
oecco
C0099
00004
00014
oecco
11 11495 0(;0-1
21: 11003 11495
13 11495 OOOJ5
16 11174 J7471
22 11174 00099
31 00000 00001
49 10906 00000
1'5 11385 00003
16 16249 -00016 11395 C-OOO
31 17510 11512
14 17511 GOOC9
46 11360 01100
11 09710 000;"2
26 16249 C8535
14 17511 COOJO
46 11348 01200
14 11511 COOKO
41 11396 01200
15 11385 COO02
31 11510 1'1512
11 09356 000-0
26 11395 11481
33 11395 00000
26 11414 11191
49 00000 00000
14 11511 COOK4
46 10682 01242
43
31
26
49
11438
10991
11001
10930
00698
11006
OBS35
00000
32 11004 00000
2
15 00700 oeooo
49 10954 COOCO
17 11534
5
26 111,19
39 11'599
15 e0459
1'5 00839
49 03974
PAGE
MNEM OPERANDS AND REMARKS
0-014
11533
00100
OOf)CJ
COOOI
cecco
,320
330
340
350
360
370
380
390
400
410
420
430
440
4'50
460
410
480
4QO
500
510
520
530
540
550
560
510
580
590
600
610
620
630
640
650
660
670
615
680
690
700
120
730
740
150
760
765
770
20
-
-. ---
0-'
TR
M
SF
S
A
BNF
!J~
0
•
o
-----------
LCC1~
OP
--------
-
P/L
--------- - -- --
-
--
W
-
-- ----
PC LN
11 340
12170 4f.; 12370 C12CC
_________ ~ E 2 __~_~II)Jt ___~~QU____!_l 31) 0
LABEL
~NE~
CPERANCS AND REMARKS
BE
CM
SS5:t
C F 1 , 33 ,Ie t
PAGE
Q
-j-60------- - --- ---sE------s-s 6*
______11_£D T PHI SF
p=-:Uc:-:T
=-cX
,-:-1=-:--------------14616 14 14742 J6937 13 900
C~
PUTTO&6,BUFBAS&1~*
14688 46 14810 C13GO 13 91C
BNl OUMPt
141CO 44 14736 14630 13 920
______B~-N-F__-.-&~3~6~,~P-U-T-x-t--~=_-----------------l4112 25 cooeo 11020 13 930
TO
OUT
,PHIt
14724 31 17020 17021
13 940
Tc~
PHI,PH_I_&~I_*-=~________~--------__
14136 25 J6862 COOOO 13 9S0 PUTTO Te
BUFSAS
,OUT
,2*
14748 31 coooo eeOCl
13 960
TR
CUT
,0UT<
14160 11 16243 -COOl 13 970
AM
L,lt
14172 11 14742 -OOCI 13 980
A~
PUTTD&A,lt
14784 12 14663 COO-l
13 990
SM
PUTPHI-l,l,lOt
14196 46 14616 01100 14 000
BP
PUTPHI&124:
14808 42 00000 OCOOO
14 010
RM
1481C
14 020
OCRG *-9*
14810 16 14742 J6862
14 03C DUMP
TFM PUTTD&6,BUFBAS1=
14822 43 14846 00459 14 G40
flO
*£24,SKPPCH*
14834 38 16851 CC4CO
14 050
WNCD lCAD-4*
1484t 26 16861 16243
14 060
TF
LGAO,Lt
14B58 49 14700 CCOCO
14 070
S
PUTPHI&3A1=
14866
14 080
DCRG *-3*
148t6 11 -0000 -cnoo
14 090 SUEI
MM
,,27*
14878 32 OCC96 ccoee 14 10C
sr
96*
o
*
o
Q
_ _ _ _ _ _ "._."._. ___ .• ""M_~.' __·_.,~~· _
- - . - - - , _ .......
_'_'___'_~·
,1 1
"
!I
_._---_
0
0
-----------.-------.---.--~------
LOCTN
148(jC
14902
14914
14926
14928
14940
14'152
14964
14976
14988
15000
15012
15024
15036
15048
15059
15060
15072
15083
15084
15096
___
15098
15098
15110
15122
15134
15146
15158
15166
15166
1~178
15190
15197
13783
1519B
1~210
15219
15222
15234
15246
1525€
15270
15282
15294
153C~
0
15318
15330
15342
15354
15366
15378
1539C
15398
15398
1'5410
15422
Q
P/L
OP
21 -OOQ9 -coco
16 -0071 -COCO
22 -0070 -0099
1
33 16394 000-0
31 C0089 16392
31 00096 16453
26 COC88 16249
33 00084 00000
14 15066 J7012
41 15060 01300
43 15036 00459
38 16937 00400
16 15066 J6937
Ie; 16937 00000
1
31 J6937 00084
15 00079 00000
1
11 15066 -C01'5
42 00000 COO00
43
11
26
26
31
49
15166
15128
00000
11631
17510
11670
00700
-C002
17511
17511
17512
00000
32 17511 COOCO
15 00700 00000
49 15110 00000
16
17
15
15
44
11
44
31
16
26
16
27
31
26
44
27
49
5
13783
13040
3
16308
16306
15270
13783
15398
15554
13016
13008
13C13
14C84
13009
13008
15474
14084
15410
J6349
000-0
ceOCl
000Cl
13032
OCO-5
13031
130C9
0-000
13029
-C06e
14083
15554
16391
13015
14083
COOCO
44 15474 13015
44 15454 13016
26 13013 1~443
-
PG LN
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
110
120
130
140
150
160
170
180
190
200 ,
210
220
230
240
250
260
270
280
290
300
310
320
330
340
350
360
370
380
390
400
410
420
430
440
460
470
475
480
490
500
510
520
530
540
550
560
570
580
590
600
610
620
630
640
650
660
LABEL
BGO
COMGO
GOER
MNEM OPERANDS AND REMARKS
A
TFM
S
DC
CF
TR
TR
TF
CF
CM
BL
BO
WNCO
TFM
TOM
DC
TR
TOM
DC
AM
88
OORG
PUTOMG 80
AM
PUTOMH TF
TF
TR
B
OORG
SF
TOM
B
OORG
OP
CEXP
ACC
OS
TFM
13TM
OS
TOM
TOM
BNF
AM
BNF
TR
TFM
Tf
TFM
BT
CEXPA
TR
TF
BNF.
8T
B
OORG
BNf
BNF
TF
PAGE
99,,21-*
71,,27*
70,99,274=
1,61*
BRINSTf.2,.10*
89,BRINST.:J:
96,CRA"'-4*
88,lODER*
84*
GOER&6
,IMAGE&75*
GOER.:J:
*&24,SKPPCH:J:
IMAGE*
GOER&6,IMAGE-t
IMAGE:f:
l,dl,*:f:
,84
IMAGE
,2*
79*
1,.,*:t
*-18
,15*
*
.-9*
*&68,FLAGSW*
,,&18,2*
,CHI:t
OMMl,CHI:t
CHI-l,CHI&l:f:
S:f:
*-3:+:
CHIt
FlAGSW*
PUTOMG&12t
.-4:f:
5,C&11=1:
OP,AFXP*
COOE,,10t
3
,*-2*
USEDFS&44 ,1=1:
USEDFS&42,1:t
*&24,INST2&14:+:
OP,5,10*
CEXPA,INST2&13*
TEMP,INST1t7:.f:
INST1&14"a:f:
,INST2&11:t
INSTl&6
INST1&11 . ,FAC*
PUTl,PUT1-1*
INSTlt7,TEMP*
INST1&6,TFFAC*
CEXPB,INST1&13*
PUT1,PUT1-1*
CEXPA&IZ*
*-3*
CEXPB,INSTl&13:t
CEXPC,INST1&14*
INST1&11,RVINST&11*
~.3
27
..
-- -
-.-~
0--
0-,
0-
-- --_._---~--
-0-LCCTf\
15434
15446
15454
15454
1546t15414
15414
15486
15498
15510
15'522
15534
- - - - - 15546
-
~----------'--"-'--"----
CP
P/L
C;;
16 1378S CCOKP
49 13772 oeooo
16 13785 CCOMJ
4<) 13772 OCOOO
44
31
26
21
21
31
49
15434
15554
13030
14084
14104
13018
15454
13016
13018
164't4
14083
14103
15554
11
26
31
44
44
44
Pi
16
31
16
49
1
15
13040
13024
11508
15698
15754
15654
00100
13185
13002
13029
13184
16432
-0060
00000
44
16
44
I!'
49
15822
13785
15678
00100
15618
13031
OCOt<':J
13016
OCOC2
COOOO
44
15
26
31
27
49
15178
COl 00
13008
13009
14084
15654
13016
00002
1(,;391
13025
14083
16
44
15
49
13185 CCCMJ
13784 13016
00100 ocoe2
13184 roooo
ocoeo
1~C:;54
15554
15569
15510
15'l82
15594
15606
15618
15630
15642
15654
015666
15618
15690
15698
15698
15110
15722
15734
15146
15754
15754
15166
15118
1519C
15E02
15814
15822
15822
15834
15846
15858
15865
15866
-15818
15886
15886
15898
15910
1~922
0 1515946
<134
oco-:-o
13013
11')10
13032
13031
13016
00002
OOOKP
oeoco
PC LN
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
14
15
15
15
15
15
15
15
IS
16 15951 J64CO
49 15898 ocoeo
16
16
33
31
31
31
15951
15991
00696
15554
13009
13018
J6416
OOOK7
ccono
130C9
13025
164CO
0
-
15
15
15
15
15
15
15
15
15
15
15
15
15
15
610
680
690
700
710
120
130
140
LABEL
CEXPO
TFM
B
CEXPC
CEXPB
150
760
110
180
790
800
810
820
830
840
850
860
810
880
890
900
910
920
930
940
950
960
970
980
990
000
010
020
030
040
050
060
010
080
090
100
110
120
130
140
150
160
170
180
190
200
210
MNEM OPERANDS AND REMARKS
TEMP
c:FCT
CFCTA
CFCTB
CFCTC
FIX
FLOAT
FOF
TwAGS
PAGE
28
COMMGN&l t 21 t l011*
c=t
OORG --34:
TFM CUMMON&1,41,1011*
B
C:f:
OORG --3t
BNF CEXPO,INST1&14t
TEMP,INST2:f:
TR
INST2&12,RVINST&12*
TF
PUT1,PUTl-l=l:
8T
PUT2,PUT2-1*
BT
TR
INST2,TEMP*
B
CEXPC*
OORG --3=1:
OS
1*
OS
15*
8TM COOE,,10*
TF
INST2&6,INSTl&11*
TR
CHI-3,CHI-l*
BNF CfCTA,INST2&14*
BNF CFCTB,INST2&13*
BNF -&24,INSTl&14*
TOM FlAGSW,2*
TFM COMMON&1,27,lOll*
TR
INST1,RVINST*
TFM
INST2&II,FAC*
B
COMMON*
DORG --34:
BNF CFCTC,INST2&13*
TFM COMMON&1,41,1011*
BNf CFCTA-20,INST1t14*
TOM flAGSW,24:
CFCTA-204:
B
OORG --3*
BNF -&24,INSTl&14*
TOM FLAGSW,2-t
TF
INST1&6.TfFAC-t
TR
INSTl&7,INST2&7t
BT
PUTl,PUT1-1*
B
CFCTt84*
OORG --3*
TFM COMMON&I,41,lOll*
BNF COMMON,INST1&14*
TOM FLAGSW,2:.J:
COMMON=t
B
OORG --4*
TFM TWAGS&11,FIX2*
B
-&20*
OORG *-3*
TFM TWAGS&11,FLOAT2*
TFM S58CO&13,27,10*
f.:QSW=I:
CF
TR
TEMP,INSTlt1*
TR
INSTl&7,INST2&1*
TR
INST2,FIX2-t
0
tafL
•
----_._--------_.-_ .... -._-
0
-_.-
lCCTN
15958
15970
15978
15918
1599C
1tOO2
16014
16026
1~038
16050
16062
16C74
1tG86
16098
If 11C
CP
_.---_ ..."._--
P/L
Q
44 15978 13015
49 15990 CuOCO
21
41
44
31
27
31
31
26
16
16
41
4q
14084
14104
16038
13018
14104
13G09
16189
13008
13013
15991
16118
16138
140b3
141C3
13016
16432
141C3
15554
13009
13013
-C060
COCti 1
00696
ceooo
31 13002 16182
49 16150 COOCO
32
27
33
49
14638
14084
14638
06124
OCOCO
14083
OCOOC
OCOOO
It182
0
0
16.183
16188
16193
16197
16198
16210
16222
16238
16243
1624.4
If249
16250
0'2452
02562
02586
020CO
C1964
03914
02834
02198
02882
02918
02954
03938
02726
03514
03690
03654
C3298
GC696
OC697
OC698
2
00005
5
4
16 13183
15 11705
.49 15246
00005
5
1
'5
1
-2SE6
J6233
00000
-2000
-1964
---------- .. -----
PG LN
15
15
15
15
15
15
15
15
15
15
15
15
15
15
15
15
Itl18
16118
16130
16138
16138
16150
16162
16174
.--------
220
230
240
2'10
260
210
2RO
29C
300
305
310
32G
330
350
360
37C
15 38.0
15 390
15 40C
15 410
15 420
15 43C
15 450
15 460
15 470.
15 480
15 4.90
15 500
15 510
15 520
15 530
15 540
15 550
15 560
It) 570
15 580
15 590
15 600
15 610
1'1 620
15 630
15 640
15 650
15 660
15 610
15 680
15 690
15 100
15 710
15 720
15 130
15 740
15 75C
15 770
15 780
1'5 790
-- .--
-- ..
-.-.~-~.--.---
---~------
LABfl
-- -
-.- ..._..
--_._ ...
_._----_..
_.. _--
--------
_----_.
__._-_._-_
..
_.
-------------
MNEM OPERANDS AND REMARKS
P.l\GE
8NF
R
*&20 7 INSTl&134=
8T
NrJP
BNF
TR
ST
Tf<
TR
TF
TFM
TFM
NOP
PUTI,PUT1-lt
PUT2,PUT2-14=
*&36,INSTI&14t
INST2,RVINST*
PUT2,PUT2-1*
INSTl&7,TEMP-t
TRAREC&1
,INSTI&74=
,INSTl&ll::t
INST1&6
INSTl&ll
,FAC*
,lOt
,41
SSBCD&13
,EQSW*
*&20
B
lOT*
29
0'-
*E;20*
D()f 700 1200311 7019170214501594170244911622014170
-159920000K44611622012001417020000K34701562012004905282031J751017512490147004501
-1674526110241417511000M647017180120017115340P1701417511000M94604584012001417511
-1752M74605706012C01417511GOOM446Q4520012001417511000M24701858012001417521000N74
-1827606134Q1200151609900004490046201417511000M34701926012001417519000N647067240
-19021300460455201200490720001417t:;11000N94701974012001417515000034606354012r\:41
.-191775110008246071600120CI417511000N74602210012004602346011001417S11000M14~40
-205220120014175110COM54711754G12C01417517000N7460633401200470213801300151609900
-2129149004620450649417~1949073240430217817521491175401601512-269031175101752249
-220S139801417513000N9~602314012004707140011003117510175201417511000034702294012
-22823117~10175181613024-2882490248203117510175201613024-29544902482014115110000
-2357331175101751e4702450012001613024~291849024820311751017522141751100003470247
~24341200311751017~181613024-2798490248201613024-28341613019000K7141751100009460
-2509253COIIOCI7115340P1731709356-2~422602564085341613 029-000616130330-00*2jI410
-2584414103261302402812450262217513490672401417511000K33111508115104702602012004
-2659502702175131600892-21~849C054~01601512-15141500698000001709582-272626027491
-27359723113025000004~02714175131613024-39142714104141031210972-000949026020J703
-2810938-281BN3564144G062644259566463495545620:f:311751017019260288108454110000400
-2886-62602905C845415C0005CCOCKlll~39S-00062714940149391603145000J71603630J70263
-2961117017C4509160357~000C03117S1017~12450302817~111600892-3994490054601417S110
-3038K34602984012COI417S11000-04602984012001417511000K4470314401200160~63~-27261
-3113603654-29841603145000M14903612017115340P1714703742011001417511000M047040460
-31881100141751100009460418201100250363117511160356300-001417511000M146033600120
-32641417511000M447040460130046033A0012001417511000M94603360012001603563000-014[-1
-3~397~11000~64604046011003117510175121709356000-01703658000-0260407917481160363
-3~145000-04403552035622704034040331417511000-34704046G1200311751017512270403404
-~4903314175110000947040460110017D9356000-03217480000002603635174813303632000003
-35653036340a00032036350000a3201A~l000001603654-29961103630000-51617026-00002117
-3641190362349000C000032174dOt)OUJ02603A3317481220357517481470J73001300141748!.9 0 q
- 3116-046095 56011001 7115 34C r 1 72141 7") 11 000i< 14103798012001603635-32981603654- 29724 ·-"!I
-37919b361204602984011001411~11000-44704046017001603635-35741603654-386649036120
-38661603896J702021038961701931U00001~39725039251701943C393800210111701~OOu-1261
-39417026162432117026170192714664170191600892-0894490046204304014175214904046031
-40161751C1752249029R6045095561751117115340P1711603611-412~3217480000002604!
17
-4091481490299602203575040794703710011001603654-41021603611-2996120408100003
77
.
I
I
I
,
\,
I
I
II
'tLiitm'
It
'tS"'" tU t t l t
•
I
,
! t
t tirin"
b
)
+
i
It"""
WI
Jw:Unn·!:!!!IMtLI!'~W.IIJ""*lL.!r)ti"JaJ~·
U"".u:u:."" l l U " l l " " 'l.1'."b"UU; J
•
n",,"
-416661'2011004 c}029960 1109 3 r;;6000-027046~~4-040-3314T1-i)I'-i 6o-btj'~7-4604322(j"12d-Ol-4-[~15"11'b-oOM
o
-424184104058012001103658000-01603635-36901604413-44343111S10115121603654-436649
--=43113612 O-i-703-6 ~f8COO-=-O i 6-6363 S=j6S-4i6-64-4"i3-=44904-ij0430-zof60362 30 00- 2 3217480 000 0 0 2 A
-43933~35174Bl1603654-4434490361203117510175121603654-44662603635175114901612012
-4468174810CQ-14604422011COlh03623000-549029R4-074900000*15006990000431175101752
-45438490971003111510115221SUOb99COOOM4909110031175101151~1617240000M~1611~310UO
-4618M 915006 91 oeoo 13 20J702 OCOOO/+9 (i-~-3403311480000vO 331 7478000()03 31741h000003_3I 74--4693740000024174810474546047560120011115340-01602455562450t0000000031000J0052Al
-416814115230000941048'+0011001'500009175233111'510 1 752614175110')009460485201100111
-484315 340-0711606()20- I )OOr: lA051 ~~ lOOOK04<10'506 8026049071 09723113009000002613008163
-49189131130181643244049521301549049640271408414033440498813016211410414103430~O
-49933213C16310000005172210CU0616243490504403100000052161606020-004131J151011~12
-50681106002-50BOI406020-00414705116012001606020-00051106020000J24505C5617513L11
-51434630000M41605151000M449004~~043-0024000~34900000000004400000000604900000014
-5221600-00046C0000012004600UCOOIIC049000000*MUOOI)OOOOOOOM9000000t31175101751417
-52919356-53062605323084541200004000L61417511000K347053660120*11115340-078170958
-53122-5318K6000110538926000U608~35260~6890853516057040-0011605528-5689311751017
-54475121417~110aOP04605486UI30U1709~82-55101709356000-02A08535114dl1105528-0005
-552226000000853545054381751326UOOI1056944405582000081~OOOOOOOOOJ1714630000J2200
-5591569416~4326056410564811056410COJq4511516000003100000056851105648-00202608S3
-5612516B5049C0462-0COU-oooc-ocnO-OOOO*3117510175181411511000K446057980120031000
-575011311109356-57662600CC50a5341714~30000-8490046201606020J7091311701701068150
-5826698000CI311751017512170600~-~8581111019000-411C6020000-44305822175102117055
-5901162432111062162432117014162433117510175141109582-5954150069800000261-7026G85
-5916352114664170194900462000001709356-60142600000085342606048084544406070000052
-605160606806001490000002606U92U8454440610200004490605 002606119084541600005-00QO
-6126490605001706566-61463100000066d22100005085341714630000J62606199084542600004
-6201162432600088085352616398162433316394000003100089164543100091163923100098164
-6216~52114976149152100006162432600010085341114630000J24900462032063540000049063
o
-63516603306354000001706566-63183100000066902606412084542100006000041714630000-8
-64264400462063542616249C85351216249000J02616398162432114928149214~0046201706S6~
-6501-65063100000067112600CCS0853421000111624311146300OOJ2490672400000311151017S
-657612141151100009410656601100170935~-66142606655084542606660084541206655000-12
-66516000090000926066800S56~4q98165049-00J004q-00UQ026-OOOK00001*JP00002-0812t44
-67213974001013100000010311205648-00202606183056483100040000002606d0206783150000
-6801*1106802-001G2606K38068022600000164571106838-001026068140683826000001645726
-6a86600044260001100059260001800044?60002300054260003000049440696400001150000000
-69632440698R00019i500012000021114630000l61101153000l6470f736012004903914J~90000
-1043J40000C0COOOM700000011UO*-h8Jl00009000-4l20009S00900JI00099-0067K6000~90009
-71189K6C0065COOOO~ROGOOOotI613003000M84907284031175101751826130090719949072240J
-7193102452-3111510115241613003000l41709356000-0261301 31748133130100000045C72e41
-126815111613013-00003113CI416453271408414083490672404902562*3100000073161714630
-1346-81614r64-736d491481001614864J470045074001693749014240430142400459381693700
-1421400261686816243161148100R9916015RI-1468490838F026168130853526168780845~3116
-14q681qI6264311692916J46260757~16R502607558168504611670001003400000*01022601985
-1516440164G019854401620079821601758-7982490771~01601758-19764907716044076960198
-165131401985COR9946176100120C1607758-79834907716U440179607982490760003801554001
-11283400000±OI0J4407816077393srCOOOOOIOOI201575000J01201~58000J0490754003307139
-1808490111603907971001003207739000002607874075141201814000-1440776400005260789~
-1884 78144407908CC{10649077 6407f'10793007 87426075 S80()009340000000 10 13B07S 54001 GO 1 ?~
-19591515000K0490171600000COOUOO**430B14000459460H080003003100402168644<108036-01
-8034523400COCCOIC23902819CCI003600000005004900000t15169120000JI616863-04()238168
-81095900400380281300400380803100400340000CCOI0239167790010026081821685626000001
-81846451260824108181120e 1 e,2000JO 140B 182JB00846081160 1100150000800000260564~Q_t49 00 530
t;.
')
n__________Tf
__~O~1~Q~3~2~~2~6~U~2~4~
. 3~O~L~4~4~e__~U~O__
-_4~,.
"' ..-!
-
--- ---
PDQ FORTRAN SLJBROUTINE RELOCATOR
370
OG 380
00 390
26
26
15
31
21
33
49
----
-------------_._----_. __ ._-
)
82.
..... ......... -.-..
,
lOCTN
OP
01044
01056
01068
01076
01076
01088
01100
01112
01124
01132
01132
01144
01156
01168
01180
01192
01204
01216
01228
01240
01252
01264
01272
01272
01284
01296
01308
01320
01332
01344
01356
01368
01380
01392
01404
01416
01428
01440
01448
01448
01460
01472
01484
01496
01508
01'520
01532
11 02453 -0001
31 02380 00400
49 01180 00000
P/l
Q
01132
02380
00406
02481
00628
02445
00000
02384
02384
00000
01180
01167
02482
01272
n2443
C2453
02453
01240
l~ 00450
43 01448
38 02380
49 00996
02441
-2380
00000
02482
02481
02481
00411
01100
00001
00450
00400
00000
31
33
11
49
01332
01321
01320
01321
02488
01392
01381
01380
01381
02493
01410
00000
02381
01167
01156
00001
02488
00002
02481
02483
00001
02493
00002
02481
01167
02482
00000
-0012
00000
44
26
26
26
25
31
1'5
49
00996
01526
01514
01507
01531
00000
00000
00996
00450
02453
02448
02453
00000
02380
00000
00000
31
15
43
31
16
00000
00099
01396
00402
02441
02194
45
32
21
21
49
43
16
31
45
21
21
24
47
44
15
44
15
21
44
15
44
15
21
26
015~O
01540
01552
01564
01576
01588
01598
01600
oeooo
00450
02167
00-01
,
lOOER,l*
TR
BIN,400*
B
CONST*
OORG .-3*
BNR YYM,LOOER2-3*
XX
SF
SIN*
A
406,BIN&4*
A
INCRE,BIN&4*
B
ENDSUB*
OORG *-3*
YYM
.sO
CONST,P4ARK*
TFM *&23,BIN*
TR
lOOP
BOX*
BNR MOO,BOX*
lODER2,INCRE.:J:
CONST A
A
lOOER,INCRE*
lOOER,411*
C
BNH *&24*
TOM 450,1*
'SUBR,450*
CON2
BO
WNCO BIN*
RElO=t
B
OORG *-3*
MOO
BNF *&60
,BOX*
TOM *&37
,1*
BNF ~&24
,BOX&6*
TOM *&13
,2*
A
BOX&6
,INCRE*
BNF *&60
,BOX&l*
TOM *&37
,1*
,BOX&11t
BNF *&24
TOM *&13
,2*
A
80X&11
,INCRE*
TF
*&18,lOOP&11*
TR
,BOX*
CF
8IN&1*
AM
LOOP&11,12*
B
lOOP*
DORG *-3*
-BNF RElO,450*
SUBR
TF
*&66,lOOER*
TF
*&42,lOOER2*
*&23,LOOER:t
TF
to
*&35*
,BIN*
TR
TOM
RElO,*
B
OORG *-3*
,IERO,*
ARITH TR
TOM 99*
BO
HERE,450t
TR
402,ONB&10=t
TFM IMAGE&61,l,9,*
DC
1,@,*-1*
TFM IMAGE&68,O=t
5~O
560
... " .."..
,-~-----------,-.~.~
00
00
00
00
00
00
01 070
01 080
16 02448 -0000
..........-- ... ...... ,." ....,,-"'.. ,, .... , ...." ...,......
LABEL
01 060
1
.,--~----,
PG IN
570
580
590
600
00 610
GO 620
00 630
00 640
00 650
00 660
00 670
00 680
00 690
00 700
00 710
00 720
00 730
00 740
00 750
00 760
00 770
00 780
00 790
00 800
00 810
00 820
00 830
00 840
00 850
00 860
00 870
00 880
00 890
00 895
00 900
00 910
00 920
00 930
00 940
00 950
00 960
00 970
00 980
00 990
01 000
01 010
01 020
01 030
01 040
01 050
02482
-..•..
MNEM OPERANDS AND REMARKS
PAGE
AM
2
0
i·
i
~
0
'*
83
0
~~,---~
--
....
-~.---
-- - - - -
....
....
t·"ie.& tit. Ufb
---
-liB
rid
._---
-_._--------- ._-
0
.---.-~--.---.---.---
-- - ---------- -
Gil
P/L
01612
01624
01636
01648
01660
01672
011) 8't
01696
01708
01720
01732
01744
01756
01J68
01780
01792
01804
01R16
16
16
I) 1659
01~28
1·.;
2'5
11
11
14
41
11
16
33
38
11
11
14
47
3f
3B
47
34
39
4 <1
31,
49
-~~-
--- ---_ .. ---_ ..
W
J2~53
-0060
-ooeo
01654 -2330
neOGa COOOG
01f>54 -DOOI
01659 -0001
01654 -2440
J 164 ~i 01300
01731 Ou-Ol
J2459 -0499
02455 00000
02380 00400
0244~ -0060
J2453 -0060
')10,)9 -0401
]1036 01300
02380 CO'5CO
02380 unltOC
01804 00900
OOCCO 00102
02295 00100
00000 OCOOO
00000 oor;oo
00000 conoo
01B96
44 01916 OuLj 50
01908
01916
01916
01928
01940
It
OlQ52
01963
01<164
C1<176
01988
02000
02()12
_~2024
02036
02048
02060
02072
02084
__-.1);>096
021C8
C2112
02112
02117
C2118
____
----.
_.. _-_._.-
LOCfN
OU340
01852
01B64
01876
0IBed
01896
0
----
..
0213C
C2137
02137
021S7
O-----~ 2~_9 2
-------------
9
05106 C(;OOO
36 02380 00500
47 01916 0090G
'J? 00406 00411
15 00407 coooo
1
33 00402 ooono
34 OOCOO CCI02
39 C2335 octeo
38 C0402 00100
39 C23r:;4 001eo
49.ulP40 -')106
36 0519B 00500
26 05112 05266
26 05165 05271
26 05184 05271
25 05189 oeJOO
31 OOOGO (J'j 198
1') 00000 OOJOG
1
OOCO') -011:)2
31 O~190 00164
49 u:il06 00000
1
2U
3t";
- ------_._ .. _---
PG IN
100
111]
120
130
140
150
160
l70
180
190
LABEL
TO
MNEM OPERANDS AND REMARKS
TFM
TFM
TFM
TO
AM
A:-1
CM
BL
AM
TFM
CF
01 210
01 220
01 230
01 240
CM
Bl
01 2'10
RNCO
260
270
280
290
WNCD
01
(11
01
01
01
01
01
01
01
01
01
01
BNLC
Q
RCTY
WATY
300
H
310
KNCD
a
320
.330
340
3'50
3AO
370
380
390
400
410
420
430
440
450
460
470
480
01 490
01 500
01 510
01 520
01 5"10
01 540
01 550
Gl 560
01 ')70
01 5~·H)
DDRG
HERE
BNF
J
OORG
OVER
RNCO
BNLC
S
TOM
DC
CF
IMAGE~73t60*
TD£11,fJ:t
TO£6, I MAGE*
4:
TD~6,1.:1=
TO£11,1*
TO&6,IMAGE&60*
TD*
*£23,1,9*
IMAGE&19,499*
IMAGE~75*
TO&11,401*
TO-12*
IMAGE*
IMAGE*
*-24*
*
Ml*
*0.:1=
0:4:
*-3*
OVER,450*
1*
*-3*
IMAGE*
*-12*
406,411*
407*
1,@,**
402*
*
M2*
402*
ReTY
WATY
WNTY
WATY M3=t
B
Q, 1 ,7*
CHGlD1- RNCD 1&92*
TF
1&66,1&160*
TF
1~59,I&165*
1&78,lt165.:1=
TF
TD
1&83*
,1&92:4:
fR.
TOM
nORG *-7*
*
DC
1,{iJt
OSA
152*
1&34,164t=
CHGlD2 TR
r,
01 590
01 600
If.
DORG *-4*
PI
(,10
(Jl 620
01 fdO
PAGE
WNCD IMAGE*
AN
Ir-1AGE~68,60*
AM
IMAGE&.73,60*
01 200
01
01
01
01
01
Dl
01
01
01
01
01
__ ._-----
- - - - - - - - - - - ----
01 090
01
01
01
01
01
01
01
01
01
G1
--_.
or~B
DC
l,@*
ONfJ
20:1=
DUG
35t
gil
3
.• --~------'- ',--.,--.,.--.-.-,.,,-,~-~,,-.---."'-..-~'".'.,,""""""
,
I
\
"
w
P/L
LOC,TN
OP
02193
02194
02706
02718
02230
02242
02254
02266
1
l6 -5105
11 00006
14 00006
It 7 00000
41 00000
34 0.0000
36 00000
49 00008
02178
02291
02293
02295
02335
02359
02380
02380
02440
02441
02443
02448
02453
02459
02460
02461
02467
02468
02416
02416
02481
02482
02~42
05103
-0002
-5317
C1300
COOOO
00102
00500
00000
2
2
20
12
11
1
60
1
2
5
5
6
M9 05000 COOOO
!Wi 9
1
05032 00000
1
5
1
60
05106
00500
26 00060 19969
05012
J'5 05200 OOOOM
M9 05056 OQOOO
Q512B
05140
05152
05164
05176
01
01
01
01
01
01
01
01
01
01
01
01
U1
01
01
01
01
01
Q5QQQ
05032
Q5032
05044
05056
05068
05080
05092
05104
05116
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
05000
Q5Q2~
PG LN
26 00060 19939
J5 05200 00002
33 00099 00000
14 00052 OO,IM7
M7 0'5556 01300
J6 05175 08-42
K1 05175 00052
4L 01062 05113
32 QOQ~3 00000
16 00019 -0000
K3 05602 00060
2~ 00060 CGOOO
M4 C5?OO 00099
640
650
660
670'
680
690
700
710
720
730
740
750
760
770
780
790
800
810
820
830
840
8:50
860
870
880
890
90e
910
920
930
940
950
960
970
980
990
000
010
020
030
040
02
02
02
02
0202 050
02
02
02
02
LABEL
060
070
080
090
02 100
C2 110
02 120
02 130
02 litO
02 1"0
02 lot,
02 170
02 1 (,;0
ZERO
,.~~~----------- ~.-~'~''''-="""-='''''''=''''-=''_.''=.--',.,.
MNEM OPERANDS AND
DC
TF
AM
CM
Bl
NOP
RCTY
RNCO
B
REM.\RKS
PAGE
40_':
1,@*
1-1,1-3,2*
"6,2*
6
0*
'*
*
0*
,1&211*
B,*
DC
2,0*
2, @:f:
DC
HI
OAC 20,PROCESSING COMPlETE;>t
M2
OAC
12,OVERLAP OF @*
M3
OAC
11, POSITIONS(i):f:
OS
14:
BIN
,SIN4
IMAGE OS
OS
60*
OS
MARK
1*
OS
24
LODFR2 OS
5*
LODER OS
'5*
OS
64:
BARF
B
'5000,,0*
OORG ·-4*
DC
1,@*
')032,,0*
i3ARF2 B
DORG *-3*
DC
1,;Ji*
1~*
OS
INCRE
OS
BOX
1*
OS
60*
, , I NOUT t~3*
,5106
OS
I
DENO START*
...
.
*
COS
SIN
0-'
:t
*
SINE AND COSINE*
*
DORG 50004:
TF
FACrCTAB-l*
TOM , SIN1,4,011*
B
SIN&241!0*
DORG -1:-3*
TF
FAC 1 STAB-1*
TDM SIN1,2,O.:f:
CF
99*
fAC-8,47,10'4:
CM
BRANCH FOR SMALL ARG.*
Bl
SIN2'10,
TfM *&83,42,09*
A
*&71 I FAC-B r O*
,*&57
3D
ER 9
,1*
SF
FAC-T1=
TFM 79,0*
M
SIN2P,FAC,O*
X IN FIX1::D-POINT REvSt
TF
FAC",
2Nf
*&24,99,0*
8?
0-
.
,
o
LCCTN
CP
___ C513P~
0520 C it J
052 12
3J
OC;~24
05236
05248
P/L
u
CC~~_9___ ~~pvQQ __ ~_Z
__ 129_________
Sf
F /\C:t
~ L-d - --~lf}P-----F-,',c-~--~~-iI\2
f~-G-E(Or-\I~-;-- ADO-FOR -;~Fn~-t
C 0_0 6 0 __~LiJi! c 0 ~£_~1 0_____________.IL___ f AC
T['fI ft\C-13,C,114
l~ CC()47 CCu0,I? 22()
A
FAC,ft,C"
X IN HALF Rb.VOLUTIfJ"'lS*,
21 C0060 OGG60
02 230
CCC60 0:' A 1 t:;
02 2()u
*
C2 240
S
FJ-\C,C1'JE-t-
0'12(:0
33 C0060 CuCCO
O?
CF
F .'\et
O~272
21 OG06G C0G60
02 2AO
22 ceObO
Cl~C7
2C"JO
s-;
__ _
___________________ _
_ _~O~~5~-2~8~4~_~2=2~C~C~L~6~U~O~'1~4~'(~;7~_C~'2~--=2~7~U_________ ~S_____~f~A~C~,_!~lf~:E~:,~,~___X_'-=I_N__R~I~G~H~r__t_\N_f~~L~L~~_'~S_~_____~
05296 2:- 0 C 0 9 9 0 GC 60 O? 2 :-.0
T 1',
'1'-J, F l~ C.fo5 :3 0 8 ,.. 3 t: 5 ~ 6 t~ () C' 0 4 I 0 2 2 ',' c
Cr
SIN 2 L 1 2 , F f\ C- 1 3 , O:f:
05-320
37 OOOite oecco
02 JOO
SF
f/\C-12:t
____~O~~5~3~3~2~~2=3~O~C~C~5~7~0~O~O~~~-7~_(~)2=_=3=1~{)________~~_},____~_-_A_C_-~3~,_F_A_C_-_3_*______________.__________________
05344 26 O(j('4C ceCRn 02 3?G
TF
FAC-70, 8A"
X Sc';)UAREDt
O~3~6
JC 05403 -~~48 02 3JO
TF~
*&47,SINC7,017*
o5 3 6 8 1 6 00 u10 J ~ 1 4 g 02 340
T r rFAr: & 1 C , 1 5 14 '" f
05 38 0 ~ '3 () GU40 COO 7 0 02 3 ~ C
f'~
F AC - ~~ 0 , F ;\ C E 1 0-*
05392
2f-- uc')70 nCC('(l
C2 360
TF
FAC&lC",
LOOP TO t::VALlJATc't
054C4 22 OL070 OUC90 02 310
S
FAC&10,90"
HASTINGS APPRUX.*
0541A
J2 05403 -OOOA 02 3fO
SM
*-13,E,07:f:
l
!
____Q5~4~2o::...:8~_ft/I~4~O....:...5_:c.3....:::8....::C~(...::H-_; 8~3=--_(::...)2==--..:.:...3~Y...:.:.O________----=B::...:.:\J~'F_-__*_-_"t....:...'. :. :. R. !. .,..:.:..:3--=--3~,--=O--=f.______________________________ _
0544 a Z 3 0 C () () 0 0 L 070
0;( 400
rvi
FA C , f AC &1 0'*
C 54') 2
t-A 3 0 ~ ~) 6 8 CC \.) 78
C2 4 l 0
Ii ['
S I '\i 2 &12 , 7 f. , 0 ,
;~=SUL r #- 1*
RESULT
05464
46 C0948 01200
O~ 420
Sl
lE2FAC
,
____~O~5~l~t7~6~-=2=()~r.~C~0~7~3~C~.C~'~_'9~r~J__O~2~.4~3=O___________T~F_:___F~A....::C==&=1=3~,~9~9~t_·_________________ .______________ _
05488
25 00074 Cl'182
02 440
Til
FA.C&14,FlEREC4:
____-"C~5::...c5.:..:0~O~~1=6~O~O~O...:.;5--=L~0~O::__=:(::....:.H,.;....:J0==---.. . :0::.:. .;)2=:: :. . . . :. 4~J:;..:::..0________-----..:T~r~-"'~\-----..:F:.....:A:....:.C::::..---.::::.8..L,_')--=:O.J. ,-=l:. .: O=------:*________________________________
t_:.....;)
,,
o
o 5 5 24
43 Olu28 UO(!S3
1 2 00 () c; 2 C00- 1
C24fO
C2 470
8[>
S t,;
05~36
31
Oe05J (,G(',)4
C2 4:'-:C
05548
05556
tJ,q
05512 (;OUOO
CZ 4 C,O
02 SOO
TL
B
05512
d~OD-24,fAC-7*
F AC- (-; , 1 , 1 0 ,
L 00 P
t-AC-1,FAC-6*
TO NORMALIZE.t-
*-3':1, ,0-1=
DCRG
*-3.t-
____--=0:....::5'--'-';----".~c.....:d=---~~__4..:....:tt=----=O-=1..::.:.O..::::.5-=2_('--'-'-)~_=·2=--·I."__')O=___(:....:.',?=_=_.-_r_)-=---1--=--O__ =S_~I---,----,N=2=-------__-------=B~'\---=----=a__
-_.....:E:.:..-~~·~~D-=---C..L,=S--=-I---=----=N:--=1~,_-=1:...:*_______________________________
05'5(,8
26 C006G'OltsSl
02
c;~c
TF
fI\C,FLTONEt
05~80
49 Ol02B
02
520
B
E~OD-24*
05587
05602
cocoe
()2 SitU
02 SSQ
LltJRG *-4*
05624
02
~70
DC
05~32
~
02
')~O
DC
B,64596371t
05633
1
C2 590
DL
05640
7
02 60n
DC
1.0*
7,796896Gt
02 560
SIN2P
SIN25
rc
16
13
9
05615
DC
lA,159154943092"
13,-25000COOOOOOO*
9,1~7079A32*
CONSTANfS.:f
____~O~l
5c..:::6~4!2:2=--________=~)_ _ _ _ _ _ _iJ: :. . !2=____.:6: .:. .;1===_u:: :. )_______--.-:::[::...;.:1C=--~2=-'Lj..::....)~t____________._______________ -'-___________ _
05648
19990
19970
00060
S
02
02
02
02
620
630
640
SINC7
DC
STAB
CTAB
OS
6,467117*
,19990*
ASU
FAC
rs
0S
,00060t
,19970*
OCQ4B
02 66C
ZEi~F AC DS
,00948t
____--""O'---""I'-'--'C:. .=: 5'--"2=---____________-----=u:..-='2=----.:6"'--..7-=-(-=--.)_=;-:~N=O..:;:D__---=cC:..:::,)'------___________--=-,_0_1_0_5_2_4-__________________. _______.
010~2
G? 6~J
E~9
OS
,OlO~2*
____....:::O'-"'1:....:.8~,~-'.l~_____________---'l::c..::)2:.;..__n---'---H--=--J_.:...F=L~T__=.:C~~'J~['________'_r~._~___________~,_C__l:L:)l t_
-------------------01.182
027JO
FZ[:n::c f)'~
,OIW1Zt
____~U~1~q~C~7__________________~n~12~._·~'1~1~';__~G~N~1-____~!~~~~____________~,.~O~1_Y_O~7_t_____________________ 4
o
05 65 ()
'-;-j
_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _...::l:.....:;l
2~._
r
7? U
7:, (I
"*
L~"
n
~r
t
t.:.2 t
.--.--~----.-------.---------------.----------------
-----_._.-
LOCTN
OP
P/L
Q
pc; LN
01052
02 740
02 750
02 760
02 770
02 780
02 790
02 800
02 BI0
02 820
07 830
02 840
02 850
02 860
02 870
02 880
02 890
02 900
02 910
02 920
02 930
02 940
02 9'50
02 960
02 970
02. 980
02 990
03 000
03 010
03 020
03 030
03 040
03 050
03 060
03 070
03 080
03 090
03 100
03 110
03 120
03 130
03 140
03 150
03 160
03 170
03 180
03 190
03 200
03 210
03 220
03 230
03 240
03 2'50
03 260
03 270
01062
03 280
05COO
05(:00
05012
05024
05036
C5048
05060
05072
OSu84
05096
05108
05120
05132
05144
05156
051f,B
05180
05192
05204
05216
05224
05~24
05L.36
05748
05260
05272
05284
05296
05304
05304
05316
0'5328
05340
C5352
05364
05376
05388
05400
05412
05424
05436
05448
05460
05472
05480
05 /t80
05492
199'50
00J60
00912
28 00060 19949
14 00U'55 N3112
M6 05480 01300
14 00052 00O~2
47 u2?84 01100
32 00053 COOOC
26 00098 OlE!82
J6 05114 00J40
1<.7 0'5114 00052
21 COOOO 00060
16 00052 00-50
11 00052 000-1
2;:> 00091 01893
fti,f, 05132 01300
M4 0"224 00099
32 00052 ooeoo
1] 00052 OOJOI
33 00091 00000
M9 u5236 GOOOO
01893
OCOOO
01904
00003
~9
00091
OOUSl
00063
05327
05315
0.5310
05388
22
21
M3
J2
J2
J2
31
32
M5
26
23
21
11
33
49
00091 01948
00063 ·00063
05304 00082
G5327 OCO~1
05315 000-9
05310 COO-1
00G82 C0083
00082 OOGOO
05328 00093
00048 00U86
00062 00048
00062 00090
00061 000-5
00053 00000
01052 00000
21
32
26
J6
J6
J6
~1948
OOORI
OOCOO
44 01062 00099
49 00912 00000
LABEL
*
*
*
EXP
PAGE
MNEM OPERANDS ANO REMARKS
6
0
-*
EXPONENTIAL TO BASE E4=
*
OORG 5000*
GET ARGUMENTi
,ETAB-1
FAC
LO
"
FAC-5,53112::t:
C~
EXPONENT TOO LARGEt
BNl EXP2"O,
FAC-8,42,104=
CM
SMALL EXPONENT4=
BNH SETONE",
FAC-7::t:
SF
TF
98,FZEREC*
TFM *&30, 140,09::t:
*&18,FAC-8,O*
S
,FAC, ,
FIX ARGUMENT*
A
FAC-8,50,94=
TF~
FAC-8,l,IO, LOOP TO SET EXPONENT*
A~
91,lOGlO*
S
BNN *-24,,0*
,99
BNF -&'56
,0*
COMPLEMENT
FAC-8
SF
,9,
,101
ARGUMENT*
AM
FAC-8
CF
91*
B
,0*
*&20
DORG *-3::f=
!
CORRECT OVERORAFT*
A
91, LOGlO"
SF
FAC-9*
FAC&3
.ONE-3::f=
TF
,FAC&3,010,INITIALIZE lOOP*
TFM EXP1-1
TFM EXPl-13,lOG2,07*
TFM EXP1-18,91,0.10*
S
EXP1&60
,0*
OORG *-3*
91
S
,LOG2*
A
FAC&3
,FACt3*
LOOP TO ELIMINATE OIGIT*
SO
*-24,82,0,
SM
EXPl-1,l,010*
EXPI-13,9,010*
SM
EXP1-18,1,010*
SM
TR
STEP FOR NEXT DIG ITt
82,83"
-SF
82*
BNR
EXP1,93,0*
,86::f=
TF
48
M
FAC&2
,48*
,90
MULTIPLY BY
A
FAC&2
,t
AM
FAC &1 ....5 ,10*
FAC-7t
CF
B
ENOO.:J:
DORG *-3*
BNF ER9,99
LARGE ARGUMENT::f=
B
EROt
OS
,19950*
OS
,00060*
,00912-4=
OS
OS
,01052*
,01062*
OS
,
,,
Ni
,
,
EXP1
EXP2
ETAB
FAC
ERO
ENDO
ER9
,,
0
87
.. _-.,,.....~' ... ,-.,
-
...,. .. ..,;
•· ...t·p·-t
j"j
- - - - - -- _. -------.------.-----
0
LCCIN
OP
P/l
&.)
01332
01<393
01'101
01948
02284
05000
050CO
05e12
05C24
05G36
O~04f!
0
05060
C5L12
05084
05096
05108
05120
05132
05J44
05152
05152
05164
05116
05188
05200
05212
05224
C5236
05244
"
26 Ua050 12 (11306
21 00091 00091
22 00065 01946
,.: <) G5096 0(;000
03 410
03 42{}
03 430
03 44(,
03 4:'0
03 460
03 410
03 480
03 490
03 500
03 510
03 520
OOORI
OOORS
-1939
R9990
fl.6 G5~44 C1300
£1 GOO99 COUOO
22 00065 00000
~50
03 560
03 510
03 580
05194
05223
L5235
00000
JI 05194 OUO-1
J2 05223 000-1
J2 0:>235 -0009
~6 05188 C1400
21 00065 00098
22 {J0065 01903
16 00052 OOON4
25 00099 C0065
33 00065 OOOCO
46 00948 01200
2~ OC(i6f. 01882
~3 05432 000'i4
31 (;0054 cor;c;s
25 00065 00910
12 OO(J52 001}-1
~9 {i5316 OCOOO
11
33
43
12
LOUfc.2 OCf)-S
•
•
*
•
LOG
00053 00000
01(128 OO~53
00052 000-1
lOGl
03 590
03 600
03 610
03 620
03 630
03 640
03 650
03 660
03 610
03 680
03 690
03 700
03 710
03 720
03 130
03 740
1)3 1'50
03 160
03 110
03 780
03
03
03
03
820
03 830
PAGE
LOGR
1
,01882:1=
,01893*
101901*
,01948*
102284*
*
NATURAL LOGARITHM:I=
*
OORG 5000'*
TF
FAC-10,lTAB-1*
CM
FAC-10,0,111*
BNP
ELOG"O*
Sf4
FAC-18,50,10*
M
LOG10,FAC-18*
TF
lOG OF CHARACTERISTIC*
FAC£5,99"
SF
FAC-11*
91,FAC-lO:t
lU
eM 91,50.10,
lOOP TILL OVER 0.5*
ANSWER BUILDS UP IN*
BNL "&44, ,e,
A
FAC&5.*
91,91"
FAC&5,LOG2t
S
B
*-48.,0*
DORG .. -3*
INITIALIZE LOOP*
TF" lOGlt6,91,OlO,
TFM LOGI&35,98,010*
TFM lOG1&41,lOG11.07*
CM
,99990,1,
lOOP TILL OVER 0.9999*
FIRST 1.1, THEN 1.01.*
BNl .&44,,0,
A
AND SO ON.*
99".
FACt5=t=
S
8
lOG1"O*
OORG ·-3:1=
LOGlt6,1,010,STEP 1.1 TO 1.01, ETC.*
AM
SM
LOG1&35,l,OlO*
SM
lOG1&47 t 9 I 01*
NO OVERFLOW AT END*
BV
lOG1,,0.
FAC&5 1 98:t
A
-5
FACt5,ONE-4., LOGX ., X-1:t
TFM FAC-8!54!10*
SAVE SIGN:t
TO
99,FACt5"
CF
FAC&5:t
TEST FOR ZER(
BI
ZERFAC
"
TO
FAC£6!FIEREC:I:
80
LOGR,FAC-6,O*
TR
FAC-6 I FAC-5!,NORMALIZING LOOP*
TO
FAC&5,FllL*
Sf"!
FAC-8 1 1,10:l:
E
"-48,,0*
DURG "-3*
AM - FAC&2,5, 10, ROUND RESULT*
CF _ FAC-7:t
80
ENOD-24,FAC-7"TEST fOR CARRV4=
5M
FAC-8,l,lO*
,
790
800
810
0:)
OS
lOG2
SETONE OS
OEND ·-3*
:1=
03 530
J6
J6
J6
14
05256
05268
05280
05292
05304
05316
05328
05340
05352
05364
05316
05388
05 LtOO
05412
05',.24
05432
05432
05444
0541:8
03 290
03 300
Q3
03
03
03
03
03
05~44
C54'J6
LABEL
03 330
O')~CO
MNEM OPERANDS AND REMARKS
PG LN
Eg
-'~'--'---'-"'-
., ..... ,
P/l
,. ""-'''--
Lee TN
CP
05480
05't92
05500
05500
05512
05524
05536
05538
05539
05548
05'560
19930
00060
OC910
OC948
01052
01062
01882
01893
019C1'
01939
01948
05568
31 00053 00054
49, 01 C23 COOOO
46
34
19
41
01200
00102
00100
f),GOOO
33 00050 00000
M9 0'5036 00000
05000
:05G.OO
05012
05024
05036
05048
05060
05012
05084
05096
05108
05120
05132
05144
05156
05168
05180
05192
05200
052QO'
05212
05224
05236
C5760
0'5272
05284
05296
01062
JOOOO
05539
00000
5
,
05248
Q
,
31
21
'46
""'7
13
11
25
15
16
1-13
26
15
J6
21
M3
12
M9
00044
COO71
00948
05304
00063
00098
C0080,
OOu12
U0063
05144
00013
00062,
05162
00000
05200
00053
05156
01846
19909
01200
01300
OOONO
COI<.~')
'01832
00005
oc~oo
oe098
00072
GCOOO
00005
COO53
00062
000-2
00000
KO 05218 05162
ooooe
C0053
Jl 05162 000-1
31 00043 COC44
33 00060 CCOOO
32 u0061 OCOOO
M5 C5156 00072
26 000~2 (C097
49 01052 ocoee
22
' PG LN
LABEL
~
FAC-7,FAC-6*
ENDO-24*
OORG *.,..3*
B
03
03
03
03
ElOG
03 920
ERLNtJ
03 930
03 940
03,950
03 960
03 970
03 980
03 990
04 000
04 010
04 020
04 03C
04'" 040
04 050
0,4 060
04 010
04 OBO '
04 090
04 100'
04 110
04 120,
04 130
C4 140'
04 ~50
04 160
04 170
04 180
04 190
04 200
04 210
04 270
C4 230
04 240
04 2SC
04 260
04 270
04 280
04 290
04 300
04 310
04 320
04 33U
04 340
04 350
04 360
04 370
04 3~O
_PAGE
TR
03 840
03 350
03 860
870'
880
890
900
03 910
'MNEM OPERANDS AND REMARKS
BE
ER9i=
~CTY
*
WATY ERLNt-1
,,0*
t
NOP
DORG *";'9t
OAC
CF
B
LTAB
FAC
FILL
ZERFAC
ENOO
ER9,
S
,ERlN
M'-)
0'5048 (;JOOO
01882
05360
23 00060 19~~ E9
49 (;1052 UCOOO
0
Lhl
..
LI\BCL
~---
.-~
...
-_ ..
tJ! Nt: /Vi
..
-
.-
opr
_._._-.-.- . .
Rt~NDS
430
NOP
440
450
46(:
470
.420
DURG *-9-1:
~
nAC
SQRT t:4~~
B
QTAS
FAC
DS
Oft
49U
lE~FAC
OS
OS
04
C4
04
04
04
04
04
04
04
04
04
04
04
400
410
4/..0
NSt,;R
SQf:RM
--
...
-~
..
'.-.'--~
._---_.
__ ._--
.
------.--- ....
_-
•.....
AND REt-'IARKS
PAGE
SOO
ENDD
FL TUI'60
00672
OC684
006-;6
00708
OC720
00131
00132
OC144
OC756
00768
00780
00792
008C4
OC816
00828
00839
OC840
0
CCB52
0---
OC864
ce876
CC888
GCGCC
---
26
32
44
33
41
15
24
46
46
26
26
26
22
14
47
26
32
21
28
44
26
32
15
28
44
32
26
16
15
21
26
2'5
26
46
33
9
10
00479
C0479
004<0
004"39
00000
C0695
00052
00732
00564
00419
00060
00479
00471
00471
01052
00779
00775
00779
00419
00684
00618
COOOO
00061
00060
00732
COOOI
00419
00052
00411
-0060
00803
00099
00779
00948
00000
C0419
COOOO
00419
00000
CCOCO
ccoe5
OC471
01200
01300
CC06C
00419
00419
C0052
OOO-Q
01300
00731
00000
OC471
00479
00099
00779
CCOOO
oeOC5
00060
00099
00480
000C)2
OCO-O
0000-0479
C0774
00000
OC839
01200
C0479
43 00968 OU052
43 01004 00053
31 00061 00910
31 00053 00054
12 00419 000-1
46 C08152 01300
-
__
.-
-
---.-~--.-----,.--------
PG LN
00 000
OC 010
00 020
CO 030
00 040
00 050
00 060
00 070
00 080
00 090
00 100
00 110
00 120
00 130
00 140
00 150
00 160
00 170
00 175
CO 180
00 190
00 20e
00 210
00 220
00 230
00 240
CO 250
00 260
00 270
00 280
CO 290
00 300
·00 310
00 320
00 330
co 340
00 350
00 360
00 370
00 380
00 390
00 400
00 410
00 420
00 430
00 440
00 4'50
00 460
00 470
00 480
00 490
00 500
CO 510
CO 520
00 530
OC 540
LABEL MNEM OPERANDS AND REMARKS
poe FORTRAN SUBROUTINES
11/63
*
..
....
....
.
:I:
J. w. HOLMES, THE COOPER-BESSEMER CORP.
D• A. JARDINE, OU PONT OF CANADA LTD.t
F. H. MASKIELL, PENNSYLVANIA TRANS FORME
MCGRAW EDISON·CORP.*
*
*
*
FLOATING ADO AND SUBTRACT*
*
DORG
OIVDIG DC
OS
TF
FSB
SF
BNF
CF
NOP
TOM
FAD
C
BE
BNL
TF
TF
TF
S
CM
Bl
TF
SF
A
LO
BNF
TF
SF
TOM
LO
BNF
SF
ADCT2
FAD1
OS
"TF
TFM
TOM
A
TF
TO
TF
ADCTI
1
BE
CF
OS
Be
80
TR
TR
SM
BNN
"*
401*
9
lot
FAD-1
FAD-It
FAD
FAD-It
'*
AOCT2-36
FAC-8
FADl-36:1:
*&48*
FSB-l
FAC
FAO-I
FAD-9
FAD-9
ENDO
FA01&11
FAD1&1*
FAD1&11
FAO-1
*&36
*t18
,011223344:1:
,*-1
,FSB-1
,5
,FAD-9*
,FAC
,FAD-It
,FSB-1t
,FAC-B
,8
,
,AOCT2*
SUBTRACT:t
"
"
,,
ROUNDING DIG
.,
LARGER OPERA
REVERSE SIGN
,,
COMPUTE RIGH
,1011*
EXIT ON SHIF
"
,fAO-9*
,FAD-It
,99*
,FA01&11*
:f;
FAC&I
FAC
*&24
FACtI
FSB-1
FAC-8
FAD-9
FAC
*&23
99
FAD1&11
IERFAC*
FAC
FAD2
ENOO-48
FAC&1
FAC-]
FSB-1
*-48
,5*
,FAC*
,99*
,FAD
,*:1:
,FAC-8
,0
,0
,FAO-I
,fA01&6*
,t
,ADCT1:t
,5t
,,
,10,
,11*
,27,
,FAD-l
,.*
,FAC-8
,fAC-1
,FILL*
,FAC-6*
,1
,5*
y
t ,
SAVE EXPONEN
EXPAND FIE·
ADO WITH S
,,
,,
BRANCH FOR C
NORMALIZING
,10,
CORRECT EX
TEST FOR UNO
9~
-
-------_._----------_._-------
....-....
-.- ... --......... --~~-.-.'-------------.----..-~~- -.."'---"...-....... '".......-.............." .....-".~~--~-----..
il
:i
lCCTN
00911
00910
00912
00919
00924
OC936
00938
00939
OC948
CC96C
00968
OC968
00980
00Q92
010C4
01016
01028
01040
01052
01060
01060
01062
01062
01C14
01086
01098
011CO
01101
01110
01126
01128
01140
01152
01164
01176
01188
01200
01212
01224
01236
01248
01256
01256
01268
01280
01292
01304
01316
01328
OP
P/L
0
1
34 POPOP 00102
1
39 00939 00100
41 OCOOO oeoco
PG LN
00
00
00
00
00
00
00
5
26 00060 01873
49 01052 00000
11
26
11
26
46
44
32
49
00060
00060
00419
00052
01062
01052
00060
01060
000-5
00059
000-1
00419
01400
00099
oeoco
COOOO
42 00000 OCGOO
26
34
39
41
00060 01B61
00000 00102
01101 00100
00000 ceooo
5
49 01028 OOOCO
32
32
23
46
43
11
43
32
12
26
49
5
00053
01120
00060
00948
01256
00093
01268
00085
00052
00060
01292
OOOCO
CCOCO
01127
01200
00084
-0005
00084
00000
COONI
00092
ceooo
11 00092 -0005
12 00052 COONO
26 00060 00091
21 00052 01119
33 00053 CCOOO
46 01016 C1300
49 00912 oeoco
550
560
570
580
590
600
610
620
630
640
650
660
670
680
690
700
710
720
730
740
750
160
770
180
790
BOO
810
820
830
840
850
860
870
880
890
900
910
920
930
940
950
960
970
980
990
OCO
010
020
030
040
050
060
07C
00
00
00
00
00
00
CO
00
00
00
00
00
CO
00
00
00
00
00
00
00
00
00
00
00
00
00
00
CO
00
00
00
CO
00
CO
CO
00
00
00
01
01
01
01
01
01
01
01
01 080
01 090
LABEL
DC
OS
RCTY
DC
WATY
NOP
DORG
UNFlM DAC
ZERFAC TF
FIll
ERO
B
FAC2
ENDD
BB
ER9
OVFlM
•
•
*
*
FMP
FMP1
FMP2
*
*
PAGE
MNEM OPERANDS AND REMARKS
1
,@
. ,.-1
"10707
,
1
,@,*-4-t
2
0
,*:t=
,FIll DIGIT MA-YB
,246t
UNFlMt
t
.-9t
'5
FAC
,UFLO@t
,FlEREC-9
,,
ZERORESUlTt
ENDO*
OORG .-3*
RouNot
,10,
,5
AM
FAC
,FAC-1
. SHIFT FOR CA
FAC
TF
"
,1
,lOt
AM
FSB-l
TF
FAC-8
,FSB-l*
BV
ER9*
,99:t=
BNF *&24
SF
FAC*
B
.&8*
OCRG "-3*
t
BB
OORG "-9*
FAt,
,FNINES-2t
Tf
ReTY t
WATY OVFlM*
NOP
:t=
DORG *-9*
,OFlO@t
OAC 5
[NOD-24t
B
4:
*
FLOATING MUlTIPlY*
*
OS
5*
FAC-7:1:
SF
SF
FMP-8*
MUlTIPlYt
M
FAC,fMP-l"
BE
ZERFAC*
TEST lEADING DIGIT*
BO
FMP1,84"
At,;.
ROUND PROOUCT:I:
93,5"
BRANCH IF CARRV4:
~o
FMPl&12,84"
SF
85*
FAC-8,51,10, ADJUST EXPONENT*
Si--1
Fl\C,92.f:
TF
fMP2:t:
B
OORG *-3:1:
ROUND PROOUCT*
AM
92,5"
FAC-8,50,10, ADJUST EXPONENT4:
SM
FAC,914=
TF
A
FAC-8,FMP-9" COMBINE EXPONENTS:t
CF
FAC-71=
0-.
BNN
ENOO-36*
B
ERG:t=
*
4:
97
0-
Hi!!!!!' HI IInc '
o
·11··
UPII
. 1 '!II'
---------------
LOCTN
01344
CP
-
-- --
-
-
....
P/L
-.
. ... _. - ..
Q
5
. ...
PG LN
01 100
01 110
LABEL
*
*
·-clTzo----·--
..
__ . ------~----.:---
MNEM OPERANCS AND RE~ARKS
P~GE
3
FLCATING OIVIUE AND REVERSE DIVIOE*
---65-
* . ------.------------------ ----- - -.-
---~*
___O~I~3~4~6_=2~6~C~lc=3~8~I~C~0~0~6~·0~~0~1~~1~3~O~ __F~O~V~R~__~T~F_ FCV-1,FAC"
INTERCHANGE OPERANDS*
o1 35 8 2 6 CCC6 COl 345 0 1 140
Tr- --.--F" AC , F 0 VR-= 14:----.-01310 41 00000 OCOOO 01 150
NOP
01382 32 00053 00000 01 160 FDV
SF
FAC-7*
01394 25 01461 01374 01 170
TO
DVRNO&11 ,FDV-8"ROUNOING*
014C6 28 00091 C0060 01 180
LD
91,FAC*
01418 43 01438 01314 01 190
Be
*&20,FOV-S*
0143C 4G C1062 CCOOC 01 200
B
ER9*
0143E
01 210
DCRG *-3*
---~~~--~~~~~~~-~~~-------~~~~~~----------------------~
01438 32 01314 00000 01 22C
SF
FUV-9*
01450 25 00092 C040C 01 230 CVRNU TO
G2
,400*
01462 29 00091 01381 Cl 240
0
91,FOV-1"
DIVIDE*
01474 46 00948 01200 01 2S0
nE
IERFAC*
01486 25 00099 00091 01 260
TI1
99,91"
SAVE SIGNt
01498 22 OC052 C1373 01 210
S
FAC-8,FDV-9,,5UBTRACT EXPONENTS*
01~10
41 01~54 C0083 01 280
BO
FDV1,83*
_____._-=-O~I-=-5-=-2-:::2-~3~2~0~0~C~8:.._::4:_____:C~C~0:_::C=_:O:_-.-::0~1:=___:2~9=__O::__ _ _ _=-5-=-F~-.::.8~4~,...!..,--;.,--=_----=-=-----=~l~E~A~O;.;I~N~·G~l;.:E:;.:R..:.:O~*~-_-_------I
01534 16 01119 CCONO 01 300
TFM FMP-9,50,10,5ET EXP AOJUST:f:
*
_.___ .~ 1~5'=_4=_6-=--4..:.....::...q--=O--=-1=2,-=8-=-0-~C-=C-=0-=0-=0~--=0-=1~3=--=1=--=O=------------=B=---.-:F~~~·P=-.2=---=-1=-2~*
o
o
01554
01554
01566
01518
___________._________
01 320
OGRG *-3*
-26 00060 00090 Cl 330 Fr.V1
TF
FAC,~O~~
NON-LERO LEADING OIGIT*
16 01119 COONI 01 340
TF~
F~P-q,51,10, SET EXP ADJUST*
GO TO TEST AND tND*
49 01292 cecco 01 350
3
F~P2",
01 360
*
01 370
*
01 3RO
*
FIXED POINT ARITHMETIC*
01 390
*
01~90
22 00060 Cl~8q CI 400 FXS
S
FAC,*-I*
01602 49 01626 COOOO 01 410
B
*&24*
01614 21 C0060 C1613 01 420 FXA
A
FAC,*-l*
01626 46 C1638 01400 01 430
3V
*&12*
01638 42 00000 ceoco 01 440
3b
*
01644
01 4~O
DCRG *-5*
01644 23 00060 01643 01 460 FX~
M
FAC,*-lt
016~6
32 OC096 CCOCO 01 470
SF
96*
01668 26 00060 00099 01 480
TF
FAC,99*
01680 42 COCOO 00000 01 490
BB
*
01686
01 500
--~D~n~.1R~G~*--~~~._*~------------------------~
01686 26 01121 000(0 01 510 FXDR
TF
FXD-l,FAC*
01698 26 C0060 01685 01 520
TF
fAC,*-13*
___~0~1~7~I=:....::C=-·_4..:...;I~C=:..;C=:..;0=:..;0=-0=---=--CO=0.:=..O-=-O_-=-0-=-1--=::.5..:::.3-=-O_____--.-:..f'IJ.:..::IC:...:.·p__~*~____________________._ _
01722 14 01721 o-OC- 01 540 FXC
CM
*-1,,811*
01734 46 01784 01200 01 550
BE
FXD1*
01746 28 00099 00060 01 560
LD
99,FAC*
01158 29 CO(96 01721 01 570
0
96,FXC-l*
01710 26 C0060 CCC95 01 5RC
TF
FAC,Q5*
_ _-=C:....=,1'-.:7-=8=--=2~_4_=__=2=__..:C=_:O=_:C=-O=-O==_______O.::...'c;::..O;::....:::..0.::...0_.::...O=1_:::..5...::...9__=_O_ _ _ _~B:...::P_,~----..:*~---_--_------.-----. . - ___ .. _
01784
Cl 600
DCRG *-9t
01784 2~ 00099 00060 01 610 FXDI
TD
99,FAC*
C17~6
lA 00060 OR999 01 62G
Tr~
FAC,999G,8*
,5t
01808 49 01GP4 ceoco Cl 630
B
ER9&12
,
01816
01 640
DCRG *-3t
*
*
*
01 650
*
*
98
LUCTN
01816
01828
01e40
01842
I
CP
02188
022CO
Q
44 01040 00060
33 00060 00000
42 00;000 OCOOO
00060
19930
19950
01851
01863
01882
01893·
01907
01912
01915
01921
()1923
01930
01931
01939
01948
01958
01962
019(,4
01916
01988
02COO
02012
02024
02036
02048
02060
02072
02080
02080
02092
02104
02116
02128
0214C
02152
02164
02176
P/l
10
12
19
11
14
5
3
6
2
7
1
8
9
10
16
22
41
14
46
46
33
16
26
49
4
01999
01999
00000
01999
02284
02.080
01999
01058
01345
01346
0-000
01963
OCOOO
0-0001200
01100
COOCO
-2080
01851
COOOO
26 01127 00060
16 01058 -2104
12 01999 000-1
46 01128 01100
16 01058 -1060
42 OCOOO 00000
26 02181 01813
22 02187 02151
41 00000 00000
26 19929 00060
16 01058 -2220
PG LN
660
670
680
690
700
710
720
730
740
750
760
770
780
790
800
810
820
830
840
850
860
870
880
890
900
910
920
930
940
950
960
910
980
990
000
010
020
030
040
0.50
060
010
080
090
100
110
120
130
140
150
160
110
180
190
02 200
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
LABEL
•
•
•
RVSGN
PAGE
MNEM OPERANDS AND REMARKS
4
0
'*
'ENDD-12,FAC*
*
NEGATION ROUTINE*
BNF
CF
FAC*
BB
*
OORG .-9*
'*
'*
*
*
*
*
FAC
LTAB
ETAB
FLTONE
FNINES
FZEREC
LOG10
ONE
SYMBOLS AND CONSTANTS=t
OS
*,60*
OS
OS
DC
DC
DC
DC
DC
DC
DC
DC
DC
DC
DC
DC
DC
DC
,19930*
,19950*
10,5110000000*
12,999999999999*
19,i*
11,2302585093*
14,10000000000000*
5,99995*
3.0*
6,999500*
2,O=t
7,9950331*
1,0*
LOGll
8,95310180*
9,693141181*
lOG2
10,5810000000*
FIXER
*
*
*
*
EXPONENTIATION ROUTINES*
*
*
*
OS
4*
A.*~-NIJ*
FAXIN TFM FAXI-1,O,8,
S
FAXI-l.--13*
NOP
*
*-1,0,811,
FAXI
CM
A.-N*
BE
SETONE*
BP
*&56*
'CF
FAXI-1*
TFM ENOOt6,.&32"SEr RETURN ADORESS*
TF . FDVR-1,FLTONE*
B
FOVR*
DORG· *-3*
TF
FMP-I.,fFAC*
TFM ENDO&6,*&12"SET RETURN ADDRESS"
SM
fAXI-l,I,10*
BP
FMP*
TFM ENOO&6, BB" RESTORE COMMON EXIT* .
BB
FAXBN
FAXB
TF
S
NOP
TF
TFM
0
*
FAXB-l,FIEREC-9*
*t23,--134=
*
lTAB-l,FAC*
ENOOG6,*&20"SET RETURN ADDRESS ..
99
0
-- .._--- _.
o
----
•
_ _ __._ _ _ _ _ _ _ _ _ _ 0 _ _ • _ _ • _ _
P/L
LOCTN
OP
02188
02200
02212
02220
02220
02232
02244
02252
02252
02264
02216
26 19929 00060
16 010-58 -2220
49 19930 00000
Q
26 01121 02181
02298
02310
02322
02334
02346
02351
02358
002366
02366
02318
02389
02390
02392
02392
02404
02416
02428
02440
024-52
02464
02411
02476
02488
02500
02512
02524
02529
02536
02538
02539
·02550
crQ2562
------
LABEL
MNEM OPERANDS AND REMARKS
02
02
02
02
02
FAXB
Tf
190
200
210
220
230
TFM
PAGE
5
LTAB-l,fAC.
ENDOl6,-'20, ,SET RETURN ADDRESS*
LlAB.
.-3.
B
00R6
FMP-l,FAX8-1t
TF
16 01058 -2252
02 240
TFM
ENDDI6,-120, ,SEt REtURN ADDRESS.
49 01128 00000
02 250
8
FMP*
16 01058 -1060
26 19949 00060
49 199NO 00000
02284
02284
02296
02298
PG LN
26 00060 01851
"2 00000 00000
26 00419 01958
15
16
0\4
32
00695
01058
OQ492
-0419
M9 00"92
00000
-23616
0006t)
R050...·
ooooe
l
16 01058 -1060
32 -0057 NlltOQ
M2 00000 00000
16
16
14
33
49
16
34
39
44
26
38
48
42
-0419
00056
00060
00051
00780
021t82
00000
1
00000
02524
02410
02461
00000
4
00000
OOON8
-0000
0-0000000
00000
OK539
00102
00100
02419
02451
00100
00000
00000
6
21 021t64 02463
16 02482 -2529
02 260
OORG
02 210
TFM
TF
B
02 280
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
.02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
290
300
310
320
330
340
350
360
310
380
385
390
400
410
.420
4-30
440
450
460
470
1t80
1t90
500
510
520
530
540
550
560
510
580
590
600
610
620
630
640
650
660
610
680
690
100
110
120
OORG
--3*
ENDO&6.
RESTORE COMMON EXIT.
B8"
ETAB-I,FACt
ETA8,,5*
--3'
FAt,FLIOHE.
SETONE TF
S8
DORG
--9*
-
•
•
•
Fix
*
+
FIX I FLOAtiNG POINI NUMBER.
TF
TOM
.TFM
BMF
TRFXC
TRFLC
•
•
•
*
FLOAT
STOP
SF
OS
B
•FIIFI,FIXER.
ADtT2-36 ,0+
ENDD&6.-r.44 •• SET RETURN ADDRESS.
,FAC.
FADl12
,90500
,2711*
FAD-l
,
,
--9.
*
SMM
END
,
•
.04+
COMMON EXIT.
,2711.
.0+
+
FLOAT A fIXED POINT NUMBER.
*
TFM FS8-1,58,210.
TFM FAC-,"
CM
FAC,O,all*
CF
FAC-3t
FA01&12.
8
,8.
,SMM
TF" WArY&6
ReTY
a,.-4+
DC
1
WATY
BNF -&36
,WATY&3*
,STOP-I.
TF
WATY-6
WNTY WATY...;,9*
,
*
H
EM"
..
..
F4D&12
OORG *-3+
TF" EMOD&6, 8B" RESTORE
,51408
SF
FAC-3
OS
88
DORG
*
WATY
.0.
,
*
*
--9*
OAC 4
88
OORG
OAC 6
BT
WATY-12
TF" WATY&6
--6*
,ENoa,
,STOP at
,WATY-13+
,EM"
LOa
.1*
-- -
----
I
~ ,
t;.
W,
lOCTN
OP
P/l
Q
02586
02598
0261C
02622
02633
02634
02646
02658
02670
02682
26
26
47
15
02604
00000
02620
02585
1
00000
02581
03061
02694
03061
03913
03165
02585
PG IN
LABEL
MNEM OPERANDS AND REMARKS
02
02
02
02
02
02
02
02
02
02
TRACE
TF
TF
BNC4
TOM
DC
RCTY
WNTY
750
PAGE
,FACt
,42t
*£10
TRACE-l
,
1
34
00102
*
38
OCI00
TRACE-St
16
-2384
820
TF~
PINFMT
,TRFlC-5*
44
00057
830
BNF *&24
,FAC-3*
16
-2352
840
TFM PINFMT
,TRFXC-5*
02~94
15
-OOfO 02 850
TFM lAST-l,FACt
02706 31
03618 02 860
TR
MARK-2
,RTPAR&44t
_____0~2~7=1=8__~4=9~0=2~Y~7~8~0~O~\O~0~0~~(~j2~-_8~7~C~__
B
WATYE&24*
02726
02 880
DURG *-3*
07890
* INPUT/OUTPUT ROUTINESt
02726 26 02761 03061 02 900 LTPAR TF
EGX,PINFMT*
C2738 44 03026 03376 02 910
BNF LOOK ,lTPARX*
02750 33 03376 ccoee 02 920
CF
lTPARX*
02761
02 930 BOX
OS
t**
02762 25 03168 03165 02 94C
Te
~ARK&l
,MARK-2*
______.9_ 2=-7~7-,--4___4_4-,-----=-0-,,-3_5--=-0--,-6--=-0-=-3-=-1_,_5_9_~0_2_9_5_0_
BNF
REA 0 CK, MAR K 1 *
C2786 49 03026 cooeo 02 960
B
lOOK*
027S8 16 03167 000-5 02 970 RACD
TF~
MARK,S,10*
02810 26 03061 C2197 02 9BO
Tf
PINFMT,*-13*
02B22 49 02858 ceoco 02 990
H
__*_f,~.3~6_*~____~~=-~______________
C2834 31 03165 C3226 03 ooe RATY
TR
~~RK-2
,PCST&32*
0284f 26 C3061 C2833 03 OlC
TF
PINFMT,*-13*
02U58 15 03159 C0007 03 020
Tn~
~ARKl,7*
02870 49 03002 OCOCO 03 03C
B
lCOK-24*
02882 16 C3167 8CO-4 03 040 ~ACC
TFM MARK,4,10*
02894 26 03061 O?88_~~1___
C_3 osa
TF
PINF~T,*-13*
02~C6
49 02978 ceoco 03 06C
G
*£72*
,RTPAR&20t
___P29 1 8
3 1 C 3 16 5 C :3 5 9 4
C 3 07 C
WA T Y S C T R
MAR K - 2
C2930
26 (3061 (2917 03 080
TF
PINFMT
,*-13*
C2942 4'102978 C(:;OOC ClagG
:3
*£36*
02954 31 03165 03226 03 100 WATYE TR
MARK-2
,POST&32*
02'-)66
2h 03061 O:~953 03 Jl_Q._____._ _T~ __ PINF~_T,*-_1_3_t_______________
02978
15 03159 eeoc? 03 l~C
TeM MARKl,9,11*
C 2~9~9-",C,----......,,1:....:::6,--· C 3 12 '-3 -:11 0 3
03 1 30
___ T F M . N [ X T , I rJ 0 U_T_*_ __
030C2 16 C3316 CL19~ 03 140
TF~
LTPARX,POST,811*
03014 31 00061 CIB80 03 11:)0
TI{
FAC£l
_-=-,_F_l_E_R_E_C_-_2_*_ _ _ _ _ _ _ __
03 160
_ _ _ _ _ _ _ _ _ _ _ _ _.....;=03 17C
* ROUTINE THAT DECIPHERS FORMAT SPECIFICATIONSf.
C3026 16 03359 OCOL~ 03 160 LCCK
TF~
STCWX,34 t l011*
___~G:....::'3:: . . .:0-'. .;3,,-8~_,_1=-=--1_0-=-·
.
=--3-=-0-=-6=1_-~C-=-O-=-0_'_5__-=-O_.:.:.3___=1_'_9_=C'_______
Af'=-~_~*~E~2~3=-:,-'"'-::-t-:--:-_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ __
C305C 26 03250 COCCO 03 200
TF
BRNCHE6*
03U61.
03 210
PINF~T OS
,**
C3062 44 C3244 03250 03 220
ANF D~NCH,BRNCHE6*
03 230
* IF NO FLAG,NUPERIC SPEC. OTHER ~ISE % I D X H*
BNF *&34,MARK1*
03074 44 03108 03159 03 240
BNF TRAC,lASTX*
44 03252 03374 03 250
0308t:
Sf
RTPARX,42*
03098 32 C3375 00042 03 26l
0311C 44 03378 03167 03 270 WRITE RNF CARO,MARK*
TFM
INOUT"lO*
03122 16 C5103 000-0 03 280
03 290
DC
1,~,**
03133
1
OOO~O
00442
COOOO
760
770
78b
790
800
810
--0----
*
/0/
'
..-.- ..-
.--.----..... _---_.__.._--_.
-----_._----.-.------_.--
0-
o
LCCT~
CP
P/L
PG LN
LABEL
~~EM
OPERANDS AND REMARKS
PAGE
03128
03134
C3146
---=--=~~0315t
03141
03158
03161
03159
0 3 11 78 O
03
2
03194
032C6
03 30e N[XT
OS
,WRITEElst
44 031.58 C3168-c~f--3fo--~iEAO-- ----B~~F---*&24------- ,MARK&I4= -----------------34 -CO-N C-JC2
C3 320
RCTY 00005
,25689,
P IS 10
----------1
U3 330
DC
l,@,*-lt
03 340 FIXFLG OS
,*-10t
3~ 05103 000CO
C3 35C
WA
INOUTt
03 36C ~ARK
OS
,*-2,INPUT/OUTPUT OEVICE*
03 310 ~ARKI
OS
,*-10,INPUT OR OUTPUT*
1 5 0 3 16 8 C() 0 COO 3 33 C eRe r
T[1-=t-'1:-,--::M-::,A-::R-::K::-:&-::I:----:-::::-::,:,-*::--_ _ _ _ _ _ _ _ __
44 03266 C3159 03 39C
PNF ACCEPT,~ARKl*
16 03128 -51C3 03 400 POST
TF~
NEXT,INOUTt
44 C3026 03375 03 410
BNF LCCK,RTPARX*
_0~3~2~1~8~~3~3~0_3~3~7~5~~0-_-~J~0_~0_3_4_2_0__
CF
RTPARX
,10
03229
1
03 430
DC
1,@,*t
03230 44 02174 03374
03 440
fJrJF
LTPAR&48
,LASTXt
03242
42 00000 CCOOO 03 450
BL
03244
03 460
OCRG *-9*
03~44
4R 00000 CCOOO 03 410
BRNCH B
"It
03251
03 480
OCRG *-4*
03251
1
03 490
DC
l,@*
_ _--'=-03252 44 03914 03166 03 500 TRAC
B!\F LAST.MARK-l*
03264 42 aonoo OCOOO 03 51C
Be
t
03266
03 S20
DCRG *-9*
03266 44 03026 03167 03 530 ACCEPT BNF LOOK,MARK*
03218 47 C3026 004CO 03 540
BNC4 lOOK*
03290 49 03134 00000 03 550
B
REAOt
03298
03 560
DORG *-3*
03298 44 03506 03159 03 570 SLASH BNF READCK,MARKl*
,11·4:03310
15 03181 0000- 03 580
TO~
CRCO&11
,
03322
14 03128 -5103 03 590
CM
NEXT,INOUT*
03334 47 03110 C1200 03 600
BNE WRITE*
03346 44 03318 03167 03 610
BNF -&32,MAKK*
03358
34 00000 00102 03 620 FLAGS ReTY 4=
03310 4<1 03194 00000 03 b.30
U
PCST*
03318
03 640
OORG *-3*
03378 26 03396 03128 03 650 CARD
TF
*&18,NEXT*
03390
16 OCOOO 000-0 03 660
TFM
,,10*
03402
11 03396 000-2 03 A70
AM
*-6,2,104=
,INOUT&160t
03414 14 03396 -52b3 03 680
CM
*-18
03426 47 03~90 01300 03 690
RL
*-36*
03438
11 03473 000-1 03 700
A~
*&35,1,10*
03450 31 05256 00914 03 710
TR
INOUT&153 ,ERO&2*
03462
15 05261 -coco 03 120
TOM
INOUTt15B,,7*
03474 25 05259 03472
03 730
TO
INOUT&156,*-2*
03486 25 05251 03411
03 740
TV
INCUT&154,*-15*
03498
4q 031~8 CLOOO
03 750
R
PEAOt24t
C3')C6
03 760
DLRG *-3*
035C6 44 03158 C3167 03 77C REAOCK 3~F REAOt24
,MARK*
03518 26 03548 C3061 03 780
Tf
*&30,PINFMT*
03530
11 03548 -00C5
03 790
A~
*EI8,S*
__~~C~·=3~5~4~2~~1~4~(~10~U~~O~O~-~3=2~q=e__=0=3~8~O~C_
C~
,SlASH*
03~~4
41 03134 012CO 03 810
ShE qEAD*
03566
49 03358 (CCCO 03 820
~
SlASH&60t
C3574
03 830
aCRG *-3*
C3574
26 C3061 02761
03 A40 ____ J3J~~~ __Pl~FI"iT'tBQ~______________
*
o
o
7
/02
~~--' ",.~--.,.;....- ...."........... -~ ...... -,<.~, .......... ".-.....".... '~.' .. '"'''''.'"".• ,''
~\
il
()
-----_. __ ._-----_ .... _-----._----- ------------
0
LOCTt\
CP
P/l
Q
04070
04082
04C94
041C6
46
14
46
46
04746
C3246
04898
04570
01200
CCORM
01200
C1100
04118
04130
04142
04154
04166
04178
04190
042C2
04214
04226
04238
04250
26
12
44
16
14
47
32
16
26
22
12
46
03996 00052
04262
04214
't4
26
11
26
12
47
15
44
_ _ ~428t;
0
04298
04310
04322
04334
04346
04358
04310
04382
04394
0440l:
04418
04426
0442f
04438
04450
0445E
04458
04410
04482
04494
04506
04514
04514
04526
0453B
04550
04562
0457C
0457C
04582
04594
04606
~04618
33
44
26
31
1'5
49
03996 OOONO
0416~ oe060
03361 ceOKO
C3246 OOORN
04966 01300
03362 COOOO
03985 000-0
03889 C3248
03889 03250
C3889 000-6
03654 01100
04310 C3364
04304 03128
03128 000-2
OOGOO 03361
03985 000-1
04514 01300
OOC52 OOOOP
04426 03364
C0053 OOOCO
04458 03363
03361 OC053
00053 00054
00062 00000
04214 OCOCO
44 04370 00053
15 00052 OOOON
49 04358 OCOOO
44 C4382 C3365
11
46
16
49
03996
04382
03361
04214
000-1
01100
OCOPO
00000
44 04662 03363
33 03363 OOOCO
16 03361 000-3
26 03985 03250
49 04262 OCOCO
32 00051 CCOCO
26 04612 03128
11 03128 000-2
26 ooooe 0(;052
31 C0051 CC053
---------- - - . - - - - - - - - - - - - -
MNEM OPERANDS AND REMARKS
PAGE
PG LN
LABEL
04
04
C4
04
04
04
04
04
04
C4
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
C4
04
04
04
04
04
04
04
04
04
04
04
C4
04
04
04
C4
04
04
04
ITYPE*
,94
,1011*
BRNCH&2
OTYPE*
BH
ADUT*
* STORE SIGN FOR E OR F,SAVE EXPONENT:t
,FAC-8*
TF
SAVE
,50
,10*
SM
SAVE
,FACt
BNF *&24
TFM SIGN,20,10:.f:
BRNCH&2,95,1011*
CM
BL
FTYPE*
ETYPE
SF
ETYPEX*
TFM EXP,,10*
TF
COUNT,BRNCH&4*
COUNT,BRNCH&6*
S
COUNT,6,10*
SM
BP
TIE
XTYPE*
* ROUTINE TO STORE DIGITS IN OUTPUT BAND,*
STOW
BNF *&48,OTYPEX*
TF
*&30,NEXT*
A~
NEXT,2,10*
TF
,SIGN*
SM
EXP,1,10*
BN
HOHO*
,1
,11*
TDM FAC-8
.BNF N50,DTYPEX*
N50X
CF
FAC-1:t
BNF B ~ITYPEX*
TF
SIGN
,FAC-1*
,FAC-6:t
FAC-1
TR
TDM FAC&2*
B
STOW&12*
OORG *-3*
,FAC-1*
N50
BNF N50X&12
TOM FAC-8
,11*
~5
B
N50X*
DORG *-3*
BNF N50X&24,FTYPEX*
B
* INSERT ZEROS AFTER DEC. IF EXP SMAll*
SAVE,I,104:
AM
8P
N50X&24*
TFM SIGN,10,10*
B
STOW&12*
OORG *-3*
ISETYP,ITYPEX*
HDHO
BNF
CF
ITYPEX*
TFM SIGN.,3,104:
TF
EXP,BRNCH&6*
B
STOW4:
OORG .-34:
FAC-94:
AOUT
SF
TF
,NEXT*
*£30
,104:
,2
AM
NEXT
,FAC-84:
TF
,FAC-7:t
TR
FAC-9
410
420
430
440
450
460
470
480
490
500
510
520
530
540
550
560
510
'580
590
600
610
620
630
640
650
660
670
680
690
100
710
120
730
140
150
180
190
800
810
820
830
840
SSO
860
810
880
890
900
910
920
930
940
04 950
G4 960
04 970
BE"
CM
BE
/04
9
-
~
-
---_ ....._----_..._._._ ...- ...•. -
• _ ••
"
••• _._ ••••• _ . _ . '--._. _____ ••
_._~_._
......... _. _ _
.~.
______
~
....." ' .........
~
............
~~~
_ _ ............... _ •••
,~.,
•• , ...... _ ..... _ ••••• "'" .... ,..... J .... .......... nL
~
II
1'1
--------------------------
LOCTN
04630
04642
04654
04662
CP P/L
Q
12 03248 000-1
41 04570 C1200
49 03026 00000
04662
44 03026 03362
04674
04686
04698
04110
04722
04734
31
16
16
26
11
16
00057
04853
03248
04140
03128
00000
03993
-0055
000-3
03128
000-2
oeOM5
04146
04758
04770
04782
04794
04806
04818
04830
04842
04854
04866
04878
04890
04898
04898
04910
04922
04934
0494[:
04958
04966
04966
04978
04990
05002
05014
05026
05038
05050
05062
05074
05082
16
44
16
31
16
43
31
12
45
26
12
22
49
03363
04782
03361
00053
03985
04854
00053
03985
04806
03889
03F89
03889
04250
0-000
oe060
OOOKO
OC057
oeO-4
ee053
00054
COO-1
00054
C3248
OCO-l
C3985
OCOOO
33
26
26
43
31
49
03364
03985
00062
04262
00053
04262
coooo
05082
050·94
051C2
05103
05315
16 03250 000-8
49 04190 00000
05316
05328
26 00078 01815
16 06354 -C010
03248
00060
03247
OC059
OOOCO
26 03985 03996
44
16
26
12
22
22
47
32
49
05002
03985
03889
03889
C3889
03889
05082
03365
04250
03996
OCo-o
03248
000-2
03250
03985
01300
00000
ceooo
1
212
PG LN
04 980
04 990
05 000
0'5 010
0'5 020
0.5 030
05 040.
05 050
05 060
05 070
05 080
05 090
05 100
05 110
05 120
05 130
05 140
05 150
05 160
05 170
05 180
05 190
05 200
05 210
05 220
05 230
05 240
05 250
05 260
05 210
05 280
05 290
05 300
05 310
05 320
05 330
or; 340
0'5 350
05 360
05 370
05 380
0'5 390
05 400
05 410
0'5 420
05 430
05 440
05 450
05 460
05 470
05 480
05 490
05 500
0'5 515
05 525
05 535
PAGE 1 0 0 MNEM OPERANDS AND REMARKS
,101=
,.1
BRNCH&4
SM
BNE AGUT1=
lOOKi:
B
DORG *-3*
*EXIT TO ISETYP AFTER PASS1 OF I TVPE,:t=
*AND 2ND PASS E,F,n TYPE:t=
ISETYP BNF lOOK,ETYPEX*
* TACK ON EXPONENT*
FAC-3,SAVE-3:t=
TR
,FAC-5f
TFM A&ll
. TFM BRNCH&4,3,10:t=
TF
*&30,NEXT4=
AM
NEXT,2,104=
TFM ,45,10*
* NOW ENTER I TYPE TO FILE AWAY EXPONENT:t
Q IS 1000 T
,8,
,0000
ITYPE TFM SIGN&2
BNF *&24,FAC*
TFM SIGN,2C.,lO:t
TR
FAC-7
,FAC-3*
TFM EXP,4,10*
BO
,FAC-7*
*&48
TR
FAC-1
,FAC-6*
EXP,1,104=
SM
,FAC-6t
BNR *-36
A
TF
COUNT,BRNCHt4*
Sf';
COUNT,I,10*
COUNT,EXP*
S
B
TIE*
OORG *-3*
OTYPE CF
DTYPEX*
EXP,BRNCH&4*
TF
,FACt
TF
FAC&2
eo STOW, BRNC.i&3*
TR
FAC-1
,FAC-I*
STOW4=
B
DORG *-3*
EXP,SAVE:t
FTYPE TF
BNF *&24,SAVE*
TFM EXP,,10*
TF
COUNT,BRNCH&4*
SJ~
COUNT,2,10*
COUNT,BRNCH&6*
S
CCUNT,EXP*
S
BN
ERROR*
SF
fTYPEX*
B
TIE*
OORG *-3*
* CHANGE TO E TYPE*
eRROR TFM BRNCHt6,8,10t
B
ETVPE*
OORG *-3*
INGUT DAC 1,@*
OS
212*
* ROUTINES FeR INPUT OF NUMERICAL DATA·*
TFAC
, FZEREC-T*
INPUT TF
,TFAC-81=
TFM OIGIT&6
LABEL
0-
/0:2
0-'
'''Ittte'!!"!''d't
itt .. '#ttriM#
f"Y't
- - - " * - - - - - - - - - - + - - - - - _..
-*'_._._---------
-
0
0
LOCTN
CP
0534C
05352
05364
05376
C538S
C54CC
16 05925
16 0-060
14 03246
47 05704
47 05564
16 05502
05412
05424
05436
05448
05460
05477
05484
0'5496
055C8
05520
05532
05544
05552
05552
05564
05516
0'5588
05600
05612
0'5624
05636
05648
05660
05668
31
25
14
31
46
32
12
47
32
26
26
49
00C51
00060
05103
05102
05484
00060
()3248
05412
00051
05537
00009
03014
000'52
051C3
OGOPO
051C4
01300
OCOOG
000-1
01200
31
14
46
16
05102
05103
05552
05502
03248
00051
00060
0005·9
05102
05484
05104
G5668
05680
05692
05704
05716
C5728
14
46
31
14
47
46
31
16
14
16
05"/40
05752
05764
05776
05788
05800
05312
05824
G~836
05848
C586C
05872
05R8C
0~880
0~8S2
0
059C4
05912
16
31
26
33
31
49
P/L
-
Q
aCOtoll
OCOOO
OCORM
013CO
01200
-5412
CCOCO
03936
00060
00000
coo-o
01200
-5612
COO-5
00053
05103
00000
05104
COOOO
---
._-----_._"
LABEL
05 545
05 55')
05 565
C'5 575
EXPlK
05 585
C5 595
05 605
as 615
05 625
05
05
C5
05
05
05
05
05
05
05
05
05
05
05
Oli
05
05
05
05
05
05
or,
47
24
46
31
25
31
43
49
OCO-3
01200
051C4
OOOKO
01300
01100
C5104
CCOl2
OOORR
OOORR
01200
05103
CIIPO
00C57
05103
05104
Oe056
cecco
39 06449 C01CO
16 00060 OR999
49 ()5800 ccoee
---- -'-
PG LN
05
05103
05764
05102
05103
05668
05164
05102
05925
03246
03246
05980
05823
05912
C0056
00060
05102
CSt3S0
058GO
---,
635
645
655
665
675
685
695
705
715
725
735
745
755
765
775
78')
795
805
815
825
835
845
855
865
875
05
05
05 88'5
05 895
05 901)
05 915
as 925
05 935
05 945
05 9SS
or;; 91, 5
05 975
05 985
05 995
06 005
06 015
Of, 025
C6 035
06 045
06 0'15
06 OA~
06 075
CG 085
._--_.-----_._- -
- - ---- +-- -, .
~
MNE~
- ... __ .+---- - - - -
~-
-_.-
_._--------
-----
---------.-~
CPFRANDS J\NO KEMARKS
SETFLGt.1,41,104:
FAC,,3:tCtI,
BRNCHt.2,94,1011t
NUMt
Al
eNE AINt
TFM COM-IS
,*£12*
NUMBERf
TYPE
CONVERT
0
*
,FAC-8t
TR
FAC-9
FAC,INCUT.:t
TO
INOUT,70,10:t=
C~
TR
INDUT-l,INUUTf.l*
BNL *&24*
Sf
FAC*
BRNCHt.4,1,10=t
SM
BNE
*-84*
FAC-9t
SF
TF
*f.17,NUMBER-2*
COM
9,FAC:t=
TF
LCDI(-12-t
B
OGRG *-3*
,INOUTtlt
TR
INDUT-l
,
AIN
INOUT
CM
BE
*-24*
,AINt48*
TFM COM-IS
,5
TFM eRNCH&4
Ti~
FAC-9
,FAC-1*
,INOUTt
FAC
TF
CF
FAC-1*
,INOUT&l·.j:
TR
INDUT-l
B
CCM-36*
O(JRG *-3*
FOR E,F, AND I TYPEt
ROUTINE
*
Cf'I
INDUT,3,10*
TflBMWC:t=
HE
INOUT-l,INOUTf.1*
TR
INDUT,20,lOt
Cl~
NUM
I3L
*-48*
BH
*&36t
TR
INOUT-l,INOUT&l*
SETFLGt.1,32,10:t=
T~M
3RNCHt2,99,1011*
TM.8MWC CM
TFM BRNCHf.2,99,1011*
EFTYPr::tBr~E
*£23.,INOUT:t=
ITYPER C
SH
SETFLG-12,70,10*
TR
FAC-4,FAC-3*
F !\C', I NOUT *
TD
Ti~
INCUT-1,INDUT&14=
CO
FIL,FAC-4*
I TYPER:j:
P
[LRG *-3*
ViATY I NERf-\*
FIL
THvI
FAC,9949,H*
B
I TYPf.r-~*
DCRG *-3*
P,~GE
11
TFr;.
TFt-·
,10*
,10*
- - - " - _ . - - - - - _ .._-----
/00
P/L
LCCTN
OP
05912
05924
C5936
05948
05956
32
32
44
49
00057 00000
00060 oeooo
06084 03363
05520 OOOCO
05956
05968
05980
05992
06004
06016
06028
06040
06052
06064
06076
06084
06084
06096
06108
06120
06132
06144
06156
06164
06164
06176
06188
06196
06196
06208
06220
06232
06244
06252
06252
06264
06276
06288
06300
06312
06324
06336
06348
06360
06372
06384
06392
06392
06404
06416
06428
06440
06447
44
31
45
26
44
22
24
47
33
31
49
06372
05102
06252
06221
06028
03365
06051
06108
03363
05102
05340
03367
05104
05103
05925
03367
03250
05103
012M5
oooeo
05104
OCOOO
32
21
26
46
43
26
49
00059
03365
00010
06196
06164
00078
06220
00000
00060
Q
C3~65
01400
oe071
01873
00000
44 06220 00070
26 00078 01873
49 06208 00000
26
39
32
26
49
00078
06449
00078
00060
05520
01861
00100
00000
00078
14
47
46
32
44
14
46
11
25
44
22
49
05103
06392
06300
03362
05956
06354
06360
06354
00000
05968
03365
05968
OOOPO
01300
01200
00000
03362
COOP8
01200
000-1
05103
03367
03367
14
47
44
15
49
05103
05992
05992
03361
05968
000-3
01200
03367
COOOI
cecco
oeooo
00000
PAGE
MNEM OPERANOS AND REMARKS
PC LN
LABEL
06 095
06 105
06 115
06 125
06 135
06 145
06 155
06 165
06 175
06 185
06 195
06 205
06 215
06 225
06 235
06 245
06 255
06 265
06 215
06 285
06 295
06 305
06 315
06 325
06 335
06 345
06 355
06, 365
06 375
06 385
06 395
06 405
06 415
06 425
06 435
06 445
06 455
06 465
06 47C)
06 485
06 495
06 505
06 515
C6 525
06 535
06 545
06 555
06 565
06 575
06 58'5
06 595
06 605
06 615
06 625
06 635
fAC-3.t
FACt
EXPfD,ITYPEX*
B
COM*
DORG *-3*
* E AND F TYPE ROUTINESt
BNF SE,SEY=t
DT
INOUT-1,INOUT&1*
TR
M
EFTYPE BNR C,INOUT=t
SET&1,SETFLG&14=
TF
DONE
BNF *&24,SEV.t
EX,BRNCH&64=
S
*&23,INOUTt
C
BNE EXPFD&24,45,10*
CF
ITVPEX*
TR
INOUT-l,INOUT&1*
B
EXPLK*
DORG *-3*
FAC-l.t
EXPFD SF
A
EX,fAC*
Tf
TfAC-8
,EX*
BV
FLOV*
,TFAC-1*
BO
*&32
,FIEREC-9t
TFAC
Tf
B
SET*
OORG *-3*
,TFAC-8*
BNF SET
,FIEREC-9*
TF
TfAC
B
-&20*
OORG *-3*
Tf
,FNINES-2*
TFAC
FLOV
WATY INERMt
SF
SET
TFAC*
FAC
,TFAC*
TF
COM* .
B
DORG *-3*
eM INOUT,70,lO*
C
BL
OE*
BE
*&24*
SF
OTBX*
BNF DT,DTBX*
OTB
,TFAC
,10*
CM
DIGIT&6
BE
*&36*
AM
DIGIT&6,l.10*
DIGIT TO
,INQUT*
BNF M,SEV*
EX,SEVt
SE
S
B
M*
OORG --3*
CM
INOUT,3,10*
DE
BNE DONE*
BNF OONE,SEVt
TOM SEY.l*
,B
M*
OORG *-4*
SF
SETfLG Sf
ONF
107
12
0
0
0
-------_._----_._-----_.---
---------------------_ .._-------- ._-------_ ..__.-
0
LCCTN
CP
P/L
Q
.
----------
----------- -- .---------------.--
PG LN
06 645
_
033'58
03359
03361
03362
03362
03363
03364
03365
03365
03367
03373
03374
03315
03376
0644<3
00078
05190
0519C
052C2
05714
05226
C523e
ocooe
06
C6
C6
C6
06
06
06
C6
G6
06
06
06
06
C6
06
5
06
06
25
25
25
25
4<3
02190
02214
02266
02278
COOOO
oe4CO
CC400
00400
004CO
CCOCO
06
65')
665
675
685
695
701)
715
725
735
745
755
765
775
185
795
805
815
825
835
845
C6
06
06 855
06 865
06 87')
LABEL
* VARIOUS
HTYPEX
STOWX
SIGN
ETYPEX
DTBX
ITYPEX
OTYPEX
FTYPEX
EX
SEY
NUMBX
lASTX
RTPARX
LTPARX
INERM
TfAC
PAGE
MNEM OPERANDS AND REMARKS
OS
OS
OS
OS
OS
OS
OS
OS
OS
OS
OS
OS
OS
FLAGS AND BINS:f;
,FLAGS:t:
,FlAGStl:t:
,FlAGSt3:t:
,flAGSt4:t:
,fLAGSt4*
,fLAGSt5*
,FlAGSt6t
, FlAGSt1'*
,flAGSt7*
,fLAGSt9*
,FlAGSt15*
,FlAGSt16*
,FlAGStI7*
,flAGSt18*
OS
OAC 5
OS
OCRG INOUT&.e7*
TO
FAXBt2
FAXB&26
TO
TO
FAXBt78
FAXB&90
TO
B
OENO
13
,ERIN.*
,18*
,400*
,400*
,400*
,400*
*
*
0
~----~----------------------
/08
_._----- -----'-'-<'--
~."-
..
~,,~-,.,,."
.. ,
...
"'.-...~----~.-' -'--"-~-'-"""-
..---
--............-....."'".-."...""... ......
~
,.'"
...
. - -.........
,
~,.-<
..... - .•
~-
~:
I
----- -_ .. - ..
00000*
05210
00480
00380
05755
04930
04800
00750
02930
03470
06455
03650
05705
04160
03380
06585
04390
06535
06185
06155
06495
06695
05270
01230
02670
02720
00730
00570
0~460
00710
01790
04520
06735
04280
06275
05545
01770
00175
00420
00660
02190
02160
02020
01990
-.~-
..--.----- -
.--
---- ._.--
------
..
---.------~----------.-
AD
PDQ FORTRAN SlJBROUTINES
11/63 FREE FORM
A
____ 9~l0
05070 05140 05160 05160 05180 OJ190 05190
05310 05310 05~55 05615 05615 05625 05665
05795 05805 05815 05995 05995 06005 06025
06275 06285 06425
00130 00140 00150 00160 00180 00220 00230
FAD
00300 00300 00370 00410 00420 00470 02380
00190 00770 00280 0.0290 00320 00430 00450
FAD1
00490
FA02
02160 02230 06<125 06835 06845 06855
FAXB
FAXBN
01990 02000 02050 02120
FAXI
FAXIN
~.-------.--
004400 04420 0/-t500
05300 05370 0539,0
05240 05370 05330
02110 02140 02200
-005340 05360 05400
00370
00630
00980
01330
01620
02'160
046C:;0
04970
05210
05695
06065
00390
00660
01020
01400
01690
02570
04670
04910
05290
05715
0609'5
OO~OO
00[;70
01030
01420
01700
02760
04690
05060
0:'290
05795
O(';lO"
00240 00250 00290
02400 02410 02430
02'580
IO~
0-
Tm .
. ---.- _..
0
01160
01130
01330
06055
00560
0238C
01930
03620
02540
0639'1
00890
01010
01040
00130
05340
01420
01540
01510
01610
01460
01400
04870
04110
03980
06195
05490
0
0
HeHO
HR
-_ .. - --
.-.~---------
.~.
C4640
04030
HTYPE
INERM
INOUT
06055
03130
04120
05805
06005
06535
04330
04410
02850
03250
06405
03280 0331)0 O14()0 03590
04130 04130 0562" 05635
05825 05B25 05865 05885
0601~ 06015 06165 06165
06C)P5 06815
03730
05745
0592'1
06245
03740
057C;r;;
0597'"i
0645'1
029AO 03030 03410 03530 03540 04180 05000 05040
() t; 725
INPUT
ITYPE
LAST
tASTX
LOGI0
LeG11
lOG2
LOOK
lcep
LTAB
LTfJAR
Q3370
03300
fijARKl
NEXT
05895
06755
04140
04670
01840
QQ82C
03400
0297C
0300C
NUP-1
NUfo1BX
02910
04150
02190
03440
06545
02860
C3380
02950
03130
Olj090
05575
03870
NI10
OLt 660
NSOX
04740 047RO 04800 04dJO
0384C
01620
.-
FXM
FXS
05525
05130
04220
06765
01830
0191C
0192C
03180
0401C
01180
0290e
06165
03360
0331C
_.----_._-_. _.. -._- -- -- .
FOV
01130 C1170 Cl190 O12?O 01240 01270
01140 02010
02080 ------- ------_.- ._"---------FDVR .. _------_._-------_._-012RO
FDVI
06025
FIL
00510
FILL
FIX
FIXER 02380
FLAGS 06655·06665 06675 06685 06695 06705 Of71') 0672') 0673'5 067'-"5
06755 06765 06775 06785
FLOAT
06305
FlOV
00900 00910 01040 01300 01340 02100 02130 02,:?3G 02750
FMP
00930 00950
FMP1
009YG 01310 01350
FMP2
00150 00210 00230 00"390 00530 00')80 00690 02'>40
FSB
FTYPE 04510
FXA
FXO
01510 01'110
FXDR
01550
FX01
M
MAf{K
036BO
05045
05885
06175
03710
01)64'5
05895
06215
03120
0'5745
05925
06245
031)00
03440 (13SB 0 04230
0221C
U6S65 OA62&:;
02940 O~940 02970 03000 03040 0307U 03100 03270 03310
03500 0-1530 03610 03170 03910
03020 03120 032l~0 03390 03570 03900 04030 04050 04330
03400 03f)9O 03~!)0 040,",0 04U70 04600 04610 04940 04'~50
0'5100
04240
ONE
CVFlM
POST
C0790
03000 031CC 03140 03630 03900
RACD
RATY
READ
R1PAR
RVSGT\
G35'50 037~G 03770 03HiO
02860 0307C
/ /0
- -- -.-----.-.. --.-..-...
-.~
.
~,
--"-....
.....
_--_....
,-
-,....................-.......
""--
.... ......,,,.,,........................"
,i
0431C
06555
06415
06745
06675
04050
03570
02700
0259C
04590
06665
04080
06805
04460 04470
SAVE
Sf: _____ 0615 2._
06185 06335
SET
06155 06195
SEY
04320 04490
SIGN
SKIP
03970 04010
SLASH 03800 03820
02590
SMM
STOP
02640
STOW
04170 04720
STOWX 03180 03970
03950 04040
TF
05.525 05535
TFAC
04570
04140
03500
02750
02470
02420
00620
0304C
0262C
03100
0327C
04130
0395C
0353()
00110
06715
06175
06685
03340
0180C
01810
06725
01820
06655
05040
05975
06705
06785
04240
03210
TIE
TIEH
TRAC
TRACE
TRFlC
TRFXC
UNFLM
WACO
WATY
WATYE
wRITE
XR
XTYPE
ACCEPT
DIVDIG
OTYPEX
EFTYPE
ETYPEX·
FIXFlG
FLTONE
FNINES
FTYPEX
FIEREC
HTYPEX
ISETYP
ITYPER
ITYPEX
lTPARX
NUMBER
PINFMT
Q311Q
READCK
RTPARX
SETFLG
SETONE
TM3MWC
WATYSC
ZERFAC
·06775
0610'5
0231C
05945
03070
00630
04820 05060 05340 05350
06355
06545 06555 06605 06615
04620 04690 04840 04890 05130 05150
03920
04850 04910 05300 05320
04170
0629'5 06315 06325 06355 06365 06395 06415 06425
06505
05250 05430
04090
03250
02780 02810
02820
028',0
00590
02590 02630 02640 02650 02710 02710 02720
02870
03300 03600
04050
04570
03390
04590
05965
04520
04320
02070
00770
04800
00630
03960
04870
06035
04680
02910
04220
02820
03980
Q2950
.03260
04660 05270
0
05040
02310
06395
05420
02160 03150 05525 06325 06365
04010
06075
04870
02920
04360
02840
03990
·03570
03410
05545 05935
0203(;
05875
04880 06115 06235
03140
05705
02900 02980 03010 03050 03080 03110 03180 03840
04020 04040 04110
03420 03850
05985 06185
./
00460 00920 01250
----------------------------~O
III
-
-----.------.... ------.- ......-
..... -----....••.--~-..
_._-_._.- - - -
***** LISTING OF THE FREE FORM SUBROUTINES
*****
LO--09200~00340000oocf023900105001001600006-001249000000
-00000
~lO-0490001205744580046594545004656S954006264425956646355620071712116730* -00001
L0002GI0050026000470021425000950000026000660026931000000020126000900027415-00002
25004000046146C052400900150C4010000tt
1-1-0500-0536-00003
260248100406t2C2481-50()04300604004~0380203100400380211300400*1-1-0536-0596-00004
490062803105106020363105190021303602380005004301540024443202*1-1-0596-0656-00005
3800000026024830238121024G3023811402381000-14600884012 001600*1-1-0656-071b-00006
747-046~22007410248]43007Hr000003602380005004500148024454900*1-1-0116-0716-00001
628032009960000026024470047015024480000022024410248326024530*1-1-0176-0836-00008
244815024530000931023800246021023860248149012400430091600465*1-1-0836-0896-00009
----4-3009 160046349 C0 14 A 0 2602453 C0 4 7 1260244802453 1502448000003102 *1-1-0 8 96-09 5 6- 00 010
38002468210238602481330099',0000049012400M4007800099636023800*1-1-0956-1016-00011
-----0-500450 1076024492f024530244811024'53-0001310238000400490 11800tl-1-10 16-1016-00012
450113202445~20238000000210040602384210248102384490062804301*1-1-1016-1136-00013
180024411601167-2380310?4P.2000004501272024822102448024812102*1-1-1136-1196-00014
453024H124024530041147012400110U150045000001430144BOO4503802*1-1-1196-1256-00015
-- ---380004004900996044013320248215013210000 1440 13200248815013210* 1-1-1256-1316-00016
Q0022102488024814401392024e315013810000144013800249315013810*1-1-1316-1316-00011
00022102493024812601410011613100000024823302381000001101167-*1-1-1316-1436-00018
001249011560440099600450260152602453260151402448260150702453*1-1-1436-1496-00019
2501531000003100000023R01~UOUOO(l00004900996031000U0021941500tl-1-1496-1556-00020
09QOOC00430189600450JI0040202167160244100-**
1-1-1556-1599-00021
11602448-00001602453-00601601659-00001601654-238025000000000*1-1-1599-1659-00022
____ illl0 1654-000 1110 16 '59-000 1140 1654-244041016480 1300 110 113100-0*1-1-1659-1119-00023
11602459-04993302455000003802380004001102448-00601102453-006*1-1-1719-1719-00024
01401659-040141016360130036023800050038023800040041018040090*1-1-1179-1839-00025
034000000010239022950010048000000000036000000050049000000440*1-1-1839-1899-00026
191600450490510603602380005004101916009002200406004111500407*1-1-1899-1959-00021
OOCO**
.
1-1-1959-1964-00028
033004020000034000000010231.)0233500100380040200100390235900100*1-1-1964-2024-00029
4901840-5106360519800500260517205266260516505211260518405271*1-1-2024-2084-00030
2505189000003100000051981~OOt*
1-1-2084-2113-00031
-01523105190001644905106**
1-1-2113-2138-00032
@@@@@@@@@@@~@@@@~ii~~@@@@@@@@@@@@@@@@@@@@@@@~@@@@@@@~~@**
1-1-2138-2194-00033
26-5105051031100006-00021400006-5311410000001300410000000000*1-1-2194-2254-00034
34000000CI02360000000500490000800000-0-**
1-1-2254-2294-00035
N75956434'562624955410043565457534563450**
1-1-2294-2334-00036
N6654559534157005646000tt
1-1-2334-2358-00037
-05156624963495655620**
1-1-2358-2380-00038
M905000**
1-1-2460-2468-00039
M9050320**
1~1-2468-2477-00040
1600000005004900000*
-1-0096-011'5-00041
36001000050036001120050036002440050036003160050036000000050000000000000000-00042
000000000000102030400020406080003060902100408021610050015102006021814200*0-00043
104112820080614223009081126300000000005060708090012141618151811242120242*0-00044
822363520353045403632484455324946536043465462154453627180123456189123456*0-00045
789-23456189-J3456789-JK456789-JKl56189-JKlM6189-JKlMN789-JKLMN089-JKlMN*O-00046
M1000COOOOOC49-05COOP9-JKLMNOPQtOOOOll0038800019M90000OOOOOOM9000360000000-00041
01
0
-1000
260006019969J505200COOOMMQ05056UOOOO*
0-1-5000-5036-01001
260C06019989J505200000023300099000001400052000M1M10555601300*0-1-5032-5092-01002
_ _J60517500-42t<.105175000524L 01 0620517 33200053000001600019-0000*0-1-5092-5152-01003
K3056020006026000AOOOOOO~4052U0000993200060000004J000600561~*O-1-5152-5212-01004
33000600C00015000410000-210006000060220006001907330006000000*0-1-5212-5212-01005
210COf00006C2200060019J7250009900060M3D556800047320004800000*0-1-5212-5332-01006
23000S7000~7~600040000~8JCC5403-56481600070J5149230004000070*0-1-5332-5392-01001
260007000000220001000090J20~403-000AM40538000083230006000010*0-1-5392-5452-01008
-d30556800C784600948C12C026C'0073000992')OOf)740188216000520QUNOt-O-I-5452-5512-01009
/12
\
~\
4301028000531200052000-131 COO 530001:)41>190551200000*
0-1-5512-5560-":"01010
4MOI0520520C260006001851490102800000*
0-1-5556-5592-01011
-000 lS9154<)43092K 50000-000000-J5707963204596-3 71-=P96 396';1-='0*-1-1- 5587-5643-01 '-; 2
M67311*
1-1-5643-5649-0
-50014:
-5039*
-0650
4:
-1016
02
0
-2000
2800060199491400055N3112M6CS4R0013001400052000M2470228401100*0-1-5000-5060-02001
320005300000260009801882J60S11400J4GK20S11400052210000000060*0-1-5060-5120-02002
160005200-501100U52000-1220009101893M605132013UOM40522400099*0-1-5120-5180-~2003
320005200000110005200J01330009100000M90523600000*
0-1-5180-S228-02004
21000910189332000510000026U006301904J60532700003J605315-1948*O-I-5224-5284-0200~
J605310000RIM9053PSOOOOO4:
0-1-5284-5308-02006
2200091019482100Q63000A3M30530400082J205327000-1J20S315000-9*0-1-5304-5364-02007
J205310000-1310008200083320008200000M5n~32800nq32600048000864:0-1-5364-5424-02008
2300062000482100062000901100061000-533000~30000049010~2000004:0-1-5424-5484-02009
4401062000994900~1200000*
0-1-5480-5504-02010
-5007*
-0500
*
-2011
-2012
03
0
-3000
2600050199291400050-000-M705500011001200042000N0230189300042*0-1-5000-5060-03001
260006S000993200043000002800097000501400091000NOM6051~201300*0-1-5060-5120-03002
210009100097220006501948MQ0509600000*
0-1-~120-5156-03003
J605194000RIJ605223000R8J605235-19391400000R9990M60524401300*0-1-5152-5212-03004
2100099000002200065GOOOOM90518800000*
0-1-5212-5248-03005
JI05194000-1J20S223000-1J205235-0009M6051B801400210006500098*0-1-5244-5304-03006
2200065019031600052000N425000990006~33C006500000460094801200*0-1-5304-5364-03007
250006601882M305432C005431000540005525000650091012000~2000-1*0-1-5364-5424-03008
M9053760000C*
0-1-5424-5436-03009
1100062000-53300053000n04301028000531200052000-131000~300054*0-1-5432-5492-03010
,490102800000*
460106201200340000000102l90553900100410000000000:J:
MS~953S50*
33000~000000M90503600000*
-0568
04
0-1-'1492-5fJ(j4-0 31\1.
0-1-5500-554B-03~1-1-5538-5548-03013
0-1-5548-5572-03014
-5007*
-3015
-3016
a
-40UO
*
31000440184621000711~909460094801200M705304013001300063000NO*O-I-5000-5060-04001
110009800K552500080018821500072QOOO~lA0006300-00M30514400098*0-1-5060-S120-04002
2600013C007215C006200000J605162000052100U0000053M30520000062*0-1-5120-5180-04003
1200C53000-2M90515600000*
0-1-5180-5204-04004
K00521805162220000000053JIO~162000-1310004300044330006000000*0-1-5200-5260-04005
320006100000M50515600072260005200091490105200000*
340000000102l90534300100330007100000410000000000*
N56258590*
M905C4800COO*
0-1-5260-5308-04006
0-1-5304-5352-04007
1-1-5342-5352-0400B
0-1-5352-5364-04009
-501940
-401n
1=
-401l
-0360
C
-5000
05
0-1-5000-5024-05001
260006019889490105200000*
-5007*
-,)002
-0020
*
-5003
06
0
-6000
2800070198692600060018731400062000NOM705084011001400062000N7*O-I-5000-S060-06001
M70509201100260006000070490102800000*
0-1-5060-5096-06002
J605146-0002KI0514~00062K0051510~146JI05151-0010260000OOOOOO*O-1-S092-5152-06003
490102800000*
-0160
0-1-5152-5164-06004
-6005
-5007*
*
//3
-60-
01
-
- _.
__._--_._.__ _._--_
.
0
.._ ..
-7000
28000~0198491<.505601000991400052000M34101028013001400052000Nl*0-1-500o-5060-07001
o
----"1051040 130-0260I34s-6i-a-sI2-0(ff0
47C
480
490
500
510
OC
00
00
00
00
CO
00
00
00
00
00 520
00 530
LABEL
*
*
*
*
*
*
*
*
*
*
MNE~
----
--- -
--
---
-----------_.---
-------
PDQ FCRTRAN SUPROUTINES
t
J.
..
HeLMES, THE COOPER-BESSEMER CORP.
"*
401*
,011223344*
9
TF
lOt
FAD-l
FAD-It
FAO
FAD-It
*
ADCT2-36
FAC-3
FAOl-36*
*E48*
FSB-1
FAC
FAD-l
FAO-9
FAD-9
ENOD
FAOIE11
SF
FAD1~7*
A
LO
BNF
TF
Sf
TD""
LC
Bt\f
SF
FAOIEl1
FAO-l
*E36
*t18
S
BL
ADCTI
11/63 FIXED FMT----_ AO-*,
-
F. H. MASKIELl, PENNSYLVANIA fRANSFORME
MCGRAW EDISON CORP.*
t
=t
FLGATING ADD AND SUBTRACT*
CM
FAD 1
~.
lO-
D. A. JARDINE, DU PONT OF CANADA LTO.=t
D(JRG
CIVOIG DC
OS
TF
Fse
SF
BNF
CF
NOP
TOM
FAD
C
BE
BNL
TF
TF
TF
AOCT2
PAGE
OPERANDS AND REMARKS
'*
FACtI
fAC
*&24
F.ACE 1
DS
TF
TFf-"
TOM
A
TF
TO
TF
BE
CF
FSB-1
FAC-f:
FAO-<;
FAC
*E23
99
fADl&ll
IERFAC*
FAe
OS
BC
FAD2
BO
E~OO-4B
TR
fAC&l
FAC-7
FSB-l
Tr~
Si'i..
,FSB-l
,,
,,
REVERSE SIGN
,5
,,
ROUNDING DIG
,,
LARGER OPERA
, *-1
SUBTRACT*
,FAD-9*
,FAC
,FAD..;.l=t
,FSB-lt
,FAC-8
,8
,
, , COMPUTE
,1011*
, , EXIT 0,
RIGH
Hlf
,ADCT2*
,FAD-9t
,FAD-l*
,99*
,fAD1&11*
,c:;t
,FAC*
,99t
,FAD
,**
,FAC-8
,0
,0
,FAO-1
,FAOlt6:t:
,5*
,,
,10,
,11*
,21,
SAVE EXPONEN
EXPAND FIE
ADO WITH S
,*
,ADCTl*
,FAD-l
,**
,FAC-8
,FAC-7
,FILLt
,FAC-6:t
,I
,5t
,,
,,
,10,
lIZ
BRANCH FOR C
NORMALIZING
- - - - - - - - - - - - -- - - - - -
-----_._----------- -------
0
leeTf\
OC90C
00911
OCQ10
00912
00919
00924
OC~36
O
OCIJ38
00939
00948
OC960
00968
00968
CC98C
OC992
01004
01016
01028
01040
01052
0106C
0106C
01062
01062
01074
C1086
01098
011ce
01101
01110
01126
01128
01140
C1152
01164
01176
01188
Q12GC
01212
01224
01236
01248
01256
01256
01268
C12BC
01292
01304
01316
G1328
0
-
-
-------_._-------_.---_ .. - --_._._------,---
CP PIL
t~
46 00852 01300
1
34 POPOP e0102
1
39 00939 001CO
41 00000 COOOO
5
26 COO60 C1813
49 01052 cecco
11
26
11
26
46
44
32
49
00060
00060
00419
00052
01C62
01052
00060
01e60
42 OOCOO
coo-tj
CGo,)q
CCO-1
0041<:)
01400
C0099
000(;0
OCOOO
cecco
26 0006C C1861
34 00000 00102
39 01101 oelCO
41 ooooe ceoco
-5
49 01028
32
32
23
46
43
11
43
32
12
26
49
5
C0053
01120
CC06C
00948
01256
C0093
01268
00085
00052
00060
01292
00092
C0052
00060
00052
::\~
00053
46 GIC16
49 00912
11
12
26
21
.... oJ
oeooo
COOOO
ccooo
01127
01200
00084
-C005
OC084
cecco
COON1
00092
cooeo
-C005
CCONO
OC091
01119
ocuco
O13(~O
CCOOC
- -_. -------
PG
CO
00
00
-----------
IN
540
LABEL
CO b10
620
f:,30
640
650
660
670
680
690
700
710
720
GO 730
co 74C
00 7.50
00 760
00 770
CO 780
00
00
00
00
00
00
00
CO
00
00
00
FILL
ERO
-- --
._- ._--- -
----------_._-
MNE~
OPERANDS AND REMARKS
*-48
,:t:
[RO*
4:
t
/18
_.
.,_._-
---~~------
-.-----..
...---.- ......-....
-- -------------_._------
__ 0 _ _ _ _ - _ - -
-------------------------_..
0
LCCTN
01816
01B28
01840
01842
CP
- - - -_ _ _ - _ _
PIL
0 _____- -
Q
44 01040 000(,0
33 00060 CCOCO
42 00000 OCOOO
OC060
19930
19950
0
0
01851
01863
OIRe2
01893
01901
01912
01915
01921
01923
01Q30
01931
01939
01948
01958
10
12
1<3
11
14
5
3
6
2
1
1
8
9
10
4
01962
01Q64 16 01999 0-000
01916 27 01999 01963
01988 41 00000 ocooe
02000 14 01999 0-0002012 46 02284 01200
0202lt 46 0208e 01100
02036 33 01999 ccoeo
02048 16 01058 -2080
02060 26 01345 01851
02012 lt9 01346 00000
02080
0208C 26 01121 00060
02092 16 01058 -2104
02104 12 01999 000-1
02116 46 01128 01100
02128 . 16 01058 -1060
02140 42 OCOOO CCOOC
02152 26 02187 01873
02:6lt 22 02187 02151
02176 41 OOCOO CCOCO
02188 26 19929 00060
022ce 16 C1058 -2220
PG
01
01
C1
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
CZ
0"....
02
02
_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _
LN
650
660
610
680
690
100
110
120
130
140
150
160
110
180
190
800
810
820
830
840
850
860
810
88C
890
900
910
920
930
940
950
960
910
980
990
000
010
020
030
040
050
060
070
LABEL
..*
*
*
RVSGN
*
*
*
*
FAC
LTAB
ETAS
FlTONE
FNINES
FlEREC
LOG10
ONE
LOGll
lOG2
FIXER
.
.
*
*
FAXIN
FAXI
080
090
100
110
120
130
140
150
160
110
180
190
200
MNEM OPERANDS AND REMARKS
*
*
NEGATION
ROUTINE~
BNF ENDD-12,FAC*
FACt
CF
BB
DORG *-9*
*
**
SYMBOLS AND CONSTANTS*
*
OS
,60*
OS
,19930*
OS
,19950*
DC
10,5110000000*
DC
12,999999999999*
DC
19,.*
DC
11,2302585093*
DC
14,10000000000000*
DC
5,99995*
DC
3,0*
DC
6,999500*
DC
2,0*
DC
1,9950331*
DC
1,0*
DC
8,95310180*
DC
9,693141181*
DC
10,5810000000*
*
*
EXPONENTIATION ROUTINES*
*
OS
4*
TFM FAXI-l,O,8,
A**%-ND*
S
FAXI-l,*-13*
NOP
*
CM
--1,0,811,
A**N*
BE
SETONE*
I3P
-&56*
CF
TFM
TF
B
OORG
TF
TFM
FAXI-1*
ENDO&6,*&32"SET RETURN AOORESS*
FDVR-1,FlTONE*
FOVRt
*-3:1:
FMP-l,FACi:
ENOD&6,*&12"SET RETURN AODRESS*
FAXI-l,I,10*
BP
TFM
BB
FAXB
4
4:
SM
FAXBN
PAGE
TF
S
NOP
TF
TFM
F~P*
ENDD&6, BS" RESTORE COMMON EXIT*
*
FAXB-l,flEREC-9*
-&23,*-13*
*
lTAB-1,FAC*
ENOO&6,"&20, ,SET RETURN AODRESS*
/20
._---- - - - -----
lOCTN
OP
02188
02200
02212
02220
02220
02232
02244
02252
02252
02264
02276
02284
02284
02296
02298
26 19929 00060
16 01058 -2220
49 19'930 00000
02298
_____ 02310
02322
02334
02346
02357
02358
,02366
02366
02318
02389
02390
02392
02392
02401t
02416
02428
02440
02452
02464
02411
02476
02488
02500
02512
02524
02529
02536
02538
02539
02550
02562
P/L
Q
26 01121 02187
16 01058 -2252
49 01128 00000
16 01058 -1060
26 19949 00060
49 199NO 00000
26 00060 01851
"2 00000 00000
26
15
16
't4
32
00·lt79
00695
Ol058
00492
-0419
01958
00000
-2366
00060
R05o-
M9 00M92 00000
16 01058. -1060
32 -0051 N140Q
H2.00000 00000
16
16
14
33
49
16
34
39
44
26
38
48
42
-0419
00056
00060
00051
00780
02.482
00000
1
00000
02524
02470
02467
00000
4
00000
000N8
-0000
0-0000000
00000
OK539
00102
00100
02419
02451
00100
00000
00000
6
21 02464 0~463
16 02482 -2529
---------
PG LN
LABEL
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
FAX8
190
200
210
220
230
240
250
260
210
280
290
300
310
320
330
340
350
360
310
380
385
390
400
410
420
430
440
450
460
410
480
490
500
510
520
530
540
550
560
510
580
590
600
610
620
630
640
650
660
610
680
690
100
110
120
-----
---
...
_---------------
_._---_._--
MNEM OPERANDS AND REMARKS
PAGE
5
TF
LTAB-l.FACt
TFM ENDD&6,e&20"SET RETURN ADDRESSt
LTABt
B
DORG e-3*
TF
FMP-1,FAX8-lt
TFM ENDD&6,e&20"SET RETURN ADDRESS*
8
FMP*
DORG e-3*
TFM ENDD&6, 88" RESTORE COMMON EXIT.
TF
ETA8-1.FAC*
8
ETAB.,S*
DORG e-3*
SElONE TF
FAC.FLTONEt
BB
,0*
DORG e-9:1=
e
*
e
e
FIX A FLOATING POINT NUMBERt
e
*
FIX
Tf
FAD-1,FIXER.
TDM ADCT2-36 ,Ot
TFM ENDD&6,ea~"SET RETURN ADDRESS*
,FACt
BNf FAD&12
,90500
SF
FAD-1
,2111*
TRFXC DS
,*t
FAD&12
8
,04*
DORG .-3*
TfM ENDD&6, 88" RESTORE COMMON EXIT*
,51408
SF
FAC-3
,2111*
TRFLC DS
88
,0*
DORG .-9*
D-
,
*
,
,
,
•
•
•
•
FLOAT
STOP
*
*
FLOAT A fiXED POINT NUMBERt
*
TF" FSB-l,58,210t
TfM FAC-Itt
CM
FAC,O,811*
CF
FAC-3*
-8
FAD1&12*
,SMM
TFM WATY&6
RCTY
i,·-Itt
DC
1
WATY *
,WATY&3t
8NF .&36
WATY-6
TF
,STOP-l*
WNTY WATY-9*
,8*
*
WATY
H
EMM
SMM
END
..
0-
OAt
88
DORG
DAC
8T
TFM
.
'.-9t
"*
6
WATY-12
WATY&.6
,
,END.,
--6*
,STOP a*
,WATY-13*
,EMM
,1*
121
0-'
- - _ . _ - _.._.
__.-
. - ' - - " .. ' . - - . '. . . . . . . . . _-_.-
._.
__.•_
..•.. _.. - .........•..
_.-
._-- .. _•. -
.•...
4C) _____02586
l~CC~T~N--~C~P~~P~/~L~~~Q~--~P~G~L~N~-l~A~B~E~L~~M=N~EM_._O~P~E~·R~A~N~{~)S~~A~N~D~R~E~M~A~R~K~S~__~P~A_G~E~··___6_______
26 02604 02585 02 750 TRACE TF
*g18
,*-1*
_ _ _0-=-2=-~:......q-=-8=----.:2=-(_~.
o
o
00000 COO 60 C 2 760
T F, FA C 1:
02610 41 02620 00442 02 770
'-BNC4----;-&10
,42*
02622 15 02585 COOCO 02 780
TD~
TRACE-l
,*
--~::::-=-:==-==--~--=.:=.-=-.=..:::---=-::::...::::.--=--=--~.-=-~-------=-=~----:~...:..=-:=---.:=---:~-----------.- .. ,
02633
1
02 190
DC
1
02634 34 OOCOO eC102 02 800 •
RelY *
02646 38 02581 C01CO 02 810
WNTY TRACE-5*
02658 16 03061 -2384 02 820
TfM PINFMT
,TRFlC-5*
02610 44 02694 00057 02 830
BNF *&24
,FAC-3t
02682 16 C3061 -2352 02 840
TfM PINFMT
,TRFXC-5*
02694 16 03913 -0060 02 850
TF~
lAST-1,FAC$
02706 31 03165 03618 02 860
TR
MARK-2
,RTPAR&44*
02118 49 02918 00000 02 870
B
WATYE&24*
02126
02 seo
DCRG *-3*
02 890
* INPUT/CUTPUT ROUTINES*
02126 26 02761 03061 02 900 lTPAR TF
BOX,PINFMT*
02738 44 03026 03376 02 910
BNF LOOK ,LTPARX~
02750 33 03376 CCOOO 02 920
CF
LTPARX:t
02761
02 930 BOX
OS
,**
02762 25 C3168 C3165 02 940
TO
MARK&1
,MARK-2*
02774 44 03506 03159 02 95C
BNF REAOCK,~ARK1*
_ _~C2~1~8~6~_4~9~C~3~0~2~6~0~O~0~0~0~~0~2~9~6~0~~~~~B~~~l~O~O~K~*~~~__________________. _________
02798 16 03167 000-5 02 970 RACD
TFM MARK,S,IO*
02B1C 26 03061 C2791 02 9ac
TF
PINFMT,*-13*
02822 49 02858 OCOOO 02 990
B
*£36*
02834 31 03165 03226 03 ooe RATY
TR
MARK-2
,POST&32*
02846 26 03061 02833 03 U1C
TF
PINFMT,*-13*
02858 1~ C3159 00007 03 02e
TDM MARKl,7$
C2810 49 03002 CCOCO 03 03C
B
lOOK-24*
02882 16 03167 000-4 03 040 WACO
TFM MARK,4,10*
02894 26 03061 02881 03 o~o
TF
PINFMT,*-13*
02906 49 02918 OOOCO 03 060
8
*&72*
02918 31 03165 03594 03 070 WATYSC TR
MARK-2
,RTPAR&20*
_ _C=2",,-9~3==--0~--:2=f.:::.....,_0=3==--0~6=:...;1~C:::....:2:=....9:::....:1:::....7-=--.--.:0:::...:3==---.:0::...:8::....0=--_____T:...::F_--=.P_:I:....:.N.:..:F.....:.~...:...:,T:......-.-__......!,~*_--=1:.:3~$:......-.____________
02942 49 02978 COOCO C3 e90
B
*&36*
02954 31 03165 03226 03 100 WATYE TR
MARK-2
,POST&32*
02966 26 03061 C2953 03 110
TF
PINFMT,*-13*
02978 15 03159 GeDOR 03 120
TOM MARK1,9,11*
02990 16 03128 -5103 03 130
TfM NEXT,lNOUT*
03CC2 16 03376 CLlS~ 03 140
TFM LTPARX,POST,811*
03014 31 00C61 C1880 03 150
TR
fAC&1
,FIEREC-2*
03 160
** ROUTINE THAT DECIPHERS FOR~AT SPECIFICATIONS*
03 170
TFM STDWX,34,1011*
03026 16 03359 COOlM 03 18C LOCK
AM
*&23,5*
03038 11 03061 -0005 03 190
TF
BRNCH&6*
03050 26 03250 00000 03 200
03 210 PINFMT OS
,**
03061
~NF
3RNCH,fRNCH&6*
03062 44 03244 03250 03 220
03 230
* IF NO FLAG,NUMERIC SPEC. OTHER WISE % I D X H*
_ _......:::0::...:!3::...::C:=...;7'--4-'--_4-=-4.:-.....:0::....::3:......:1::.....::0:......:8::-...:0::..=3:......:1::....;~......:::.9=----......:::O::....::3=-----=2"-.4~O'-----__----=e~!1\;.:..1F_--=*:-=&:..=3:.. . ;4:..!:'. .:. .M:..:A:....:,R:...::K~l:....:.*
,.'
_ _ _ _ _ _ _ _ _ _ _.____.__._
03086 44 032S2 C3374 03 250
BNF TRAC,lASTX$
____~C~3:......:0:=...;9:......:8~~3~2~C::....::3::..=3~7~5~0:......:0:......:0'--4~2~......:::O::....::3~2~6:......:0'_____________=s~F__~K~T...:...P...:...A~RX.,4~?~-*_________________________
03110 44 03378 03167 03 270 WRITE BNF CARD,MARK*
03122 16 05103 000-0 03 280
TFM INOUT,~lQ*
03133
1
03 290
DC
1,@,**
03128
03 300 ~N=E~X~T__.~D~S__~,"=;R;.:..\~IT~E-=-&~1~8*~_.________________________ _
/22
---.--
---
-.----
lOCTN
03134
03146
031S6
03147
03158
03167
03159
03170
03182
031<)4
03206
03218
03229
03230
03242
03244
03244
03251
03251
03252
03264
03266
03266
03278
03290
03298
·032<)8
03310
03322
03334
03346
03358
03310
03318
03378
03390
03402
03414
03426
03438
03450
03462
03474
03486
03496
03506
03506
03518
03!.l30
03542
03554
03566
03574
03514
03586
CP
P/l
Q
44 03158 03168
34 -OO-N O-JC2
1
39 05103 00000
15
44
16
44
33
03168
03266
03128.
03026
03375
1
44 02714
42 CCOOO
00000
03159
-5103
C3375
O--JO
03374
oeoco
4R 00000 COOOO
1
44 03914 03166
42 oeooo OGOCO
44 C3026 C3161
47 03026 00400
49 03134 oeooo
C3159
44
15
14
41
44
34
49
03506
03181
03128
03110
03318
00000
03194
COOO-5103
01200
03167
00102
COOOO
26
16
11
14
47
11
31
15
25
25
49
03396
00000
03396
03396
03390
03473
05256
05261
05259
05257
03158
03128
000-0
000-2
-5263
01300
000-1
00914
-0000
03472
03471
00000
44
26
11
14
41
49
03158
03548
03548
00000
03134
03358
03167
03061
-C005
-3298
01200
ococe
26 03061 02761
32 03375 OO-JO
PG IN
03
03
03
03
03
03
03
03
03
03
03
03
03
03
C3
03
03
03
03
03
03
03
03
03
03
03
03
03
C3
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
310
320
330
340
350
360
370
380
390
400
410
420
430
440
450
460
470
480
490
500
510
520
530
540
550
560
570
580
590
600
610
620
630
640
650
660
610
680
690
700
110
720
730
740
750
160
770
780
790
800
810
8ZC
830
840
8'50
LABEL
MNEM OPERANDS AND REMARKS
PAGE
,MARK&I*
BNF *&24
,25689,
ReTY 00005
DC
I,G,.-I*
FIXFlG OS
,·-10*
WA
INOUTt
,*-2,INPUT/OUTPUT DEVICE*
MARK
OS
,.-IO,INPUT OR OUTPUT*
MARKI OS
CRCO
TOM HARK&l
.*
BNF ACCEPT,MARK1*
POST
TFM NEXT,INOUT*
BNF lOOK,RTPARX*
,10
,8910*
RTPARX
CF
DC
1,@,**
BNF LTPAR&48 ,LASTX*
READ
,
B6
7
0
P IS 10'
t
OORG *-9*
BRNCH B
,,1*
DORG *-4*
DC
1,@*
BNF' LAST,HARK-1t
TRAC
BB
*
oORG .-9*
ACCEPT BNF LOOK,MARK*
BNC4 LOOK*
REAOt
B
DORG .-3*
SLASH BNF READCK,MARK1* '
TDM CReotll
,11*
I
CM
NEXT,INour*
BNE WRITEt
BNF *t32,MARK*
FLAGS ReTY *
B
POST*
DORG *-3*
CARD
TF
*t18,NEXT*
TFM ,,10*
AM
*-6,2,10*
.. -18
,INOUT&160*
C~
Bl
*-36*
. A~
*&35,1,10*
TR
INOUT&153 ,EROt2*
TOM INOUT&158,,1*
TO
INOUTt156,*-2*
TO
INOUT&154,*-lS*
B
REAOt24*
OORG *-3*
READCK BNF REAOt24
,MARI<*
TF
*&30,PINFHT*
AM
*&18,5*
,SlASH:t
C~
BNE REAOf:
B
SlASH&60*
OORG .-3*
RTPAR TF
PINFMT,BDX*
,10
RTPARX
SF
,910*
J 2.3
0
0
~.J
1
-.--~-
---~.---------
__ _-_._-_._-"
----_.
0
0
..
P/L
LCCTN
CP
03:;97
03598
C3610
03621
03622
03634
03t46
03654
1
44 03(22 C3373
32 03374 CCOJO
1
44 03194 C3159
25, 03181 03165
49 G3322 CCOOO
C3654
03666
03678
03690
03702
03714
03726
03738
03750
03762
03774
03786
03798
03810
03P22
03830
03830
03842
03854
03866
03878
03889
03890
03902
16
33
44
11
26
26
44
11
03914
C3926
C3938
03950
03962
03974
C39€5
03986
26
32
33
44
33
32
03Q37
03314
03313
03948
03250
03247
03913
COOOO
00042
03250
OCOOO
00000
32
C3~49
COOCO
03997
0
_._-----"--_ .. _--_.
44
26
44
26
11
26
49
26
26
31
12
4t.
Q
03821
03358
03774
03061
03725
03889
03774
03C61
03830
03821
C3354
03816
C3128
COOOO
03866
-3677
000-0
03359
000-2
03061
COOCO
03358
COO-2
03159
03061
03159
03128
COO-2
oecco
coooo
03B48 03061
00000
05102
03889
03726
05103
C5104
OCO-1
011CO
44 04262 03359
49 03026 00000
1
03996
03998
04010
31 03359 03147
44 05316 C31c;9
04022
C4C34
26 04045 03937
26 GC060 0(;009
04C46
04C5P
16 04853 -OO~6
14 03246 CCORR
__ - - - - - - - - - - - - - - - - .-
PG LN
03
03
03
03
03
C3
03
03
03
03
03
03
03
03
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
04
860
870
880
890
900
910
920
930
940
950
960
970
980
990
000
010
020
030
040
05C
060
070
080
090
100
110
120
130
140
150
160
170
180
190
200
210
220
230
240
250
260
210
280
290
300
31C
320
330
340
350
360
370
'380
390
400
LABEL
PAGE
MNEM OPERANDS AND REMARKS
DC
BNF
SF
l,@,**
*&24,NUMBX*
,10
LASTX
DC
1,~,**
,10*
POST,MARKl*
CRCD&11
,MARK-2*
SLASH&24:t
B
DGRG *-34:
* COMBINED HTYPE AND XTYPE*
XTYPE TFM TF&1I,*&23*
CF
HTYPEX"lO*
BNF SK.IP,STOWX*
PINFMT,2,10*
HTYPE AM
*t23,PINFMT:t
TF
COUNT:t
TF
BNF SKIP,HTYPEX:t
lOOP
AM
PINFHT,2,10*
BNF HR,MARK1*
TFtll,PINFMT*
TF
BNF XR,MARKI*
SKIP
TF
*&30,NEXT*
AM
NEXT,2,IO*
:1=
TF
Tf
B
TIEH*
DORG *-3*
,*&18, PINFMT*
HR
Tf
Tf
,INOUT*
INOUT-1,INOUTtl*
TR
XR
SM
COUNT,I,lO*
TIEH
BP
LOOP-t
COUNT DS
,**
BNF STOW,STOWX*
B
LOOK*
*ALL LIST INSTRUCTIONS BTM TO NUMBER*
*UNLESS LAST IN LIST,*
* THEN BTH TO LAST*
NUMBER-1 ,*-1*
TF
LAST
SF
LASTX*
NUMBER CF
NUMBX,42*
-BNF *-2,BRNCH&6*
CF
BRNCH&6*
BRNCH&3:1=
SF
EXP
OS
,**
BRNCH&S:J:
SF
DC
1.,0),**
OS
SAVE
,*-1*
T~
SIGN-2,FIXFLG*
BNF
INPUT,MARK1*
-THE FOLLOWING ROUTINES PREPARE*
*NUMERIC DATA FOR OUTPUT-t
*&23,NUHBER-1:1=
TF
TF
fAC,9*
* OUTPUT D,E,F, OR I TYPE NUMERIC*
,FAC-4:t
TFM A&ll
DEFf
BRNCHt2,99,1011:l=
CM
BNF
TO
L2 ':L
8
..
--
._-
~--.~
--- ----._---
.------------------. -
- - - - - - - ._--- ----_.--------------_.-. -- -_.
LOCTN
(V
C4C70
04082
04094
46
14
46
46
0410l:
04118
04130
04142
04154
0416t
04178
041c;O
04202
04214
C4226
04238
04250
04262
04214
04286
04298
0431C
04322
04334
04346
04358
04370
04382
04394
04406
04418
04426
04426
04438
04450
04458
04458
04470
04482
04494
04506
04514
04514
04526
04538
04'550
041162
04570
04570
04582
04594
04606
04618
PIL
Q
pc; LN
04 410
04 420
04 430
04 440
04 450
26 03996 00052 04 460
12 C3996 CCONC 04 470
44 04166 CootO 04 480
16 03361 OOOKO 04 490
14 03246 CCORN 04 500
41 04966 C1300 04 510
')""1
.... L
03362 OCOCO 04 520
16 03985 000-0 04 530
26 03889 03248 04 540
22 03889 03250 04 5')0
12 C3U89 000-6 04 560
46 03654 C11CO 04 570
04 580
44 04310 C3364 04 590
26 04304 03128 04 600
11 03128 000-2 04 610
26 OOCOO 03161 04 620
12 03985 000-1 04 630
47 04514 013CO 04 640
1') 00052 ocucp 04 650
44 04426 03364 04 660
33 00C53 00000 04 670
44 044'58 03363 04 680
21, 03361 oe053
04 690
31 OC053 00054 04 700
15. 00062 CCOCO 04 71C
49 04214 CCOOC 04,720
04 130
44 04370 OOC53 04 740
It:) 00052 OOOON 04 750
49 04358 ceoco 04 780
04 790
44 04382 03365 04 800
04 810
11 03996 000-1 04 820
46 04382 01100 04 830
16 03361 OOOPO / 04 840
49 04274 COOOO 04 850
04 860
44 04662 '03363 04 870
33 03363 ococe C4 880.
It 03361 000-3 04 89C
26 03985 03250 04 900
49 04262 COOOO 04 910
C4 920
32 00051 COOOO 04 930
2t 04612 03128 04 940
11 03128 OGO-2 04 9r;o
21, 00000 00052
04 960
31 COOSl CCC53 C4 97C
04146
03746
04898
C4510
01200
CCORti
01200
011CO
LABEL
..--."'"....." , "....................""....".
... ..
-_ •. --------- -_..------"-_ ... ---_.. _-
.._----- .-
__._----_
.. __..
_---
PAGE
MNEM OPERANDS AND REMARKS
BE
Cf-l
~,~~~
gO-
ITYPE:t:
,9!t
y1011*
OTYPE=t
61-1
AOUT*
* STORE SIGN FOR E OR F,SAVE EXPONENTt
,FAC-8t
SAVE
TF
,50
,lOt
SAVE
SM
,FACi:
BNF *£24
TFM SIGN,20,10=t
eM BRNCH&2,95,1011*
FTYPE=t
BL
ETYPEXt
ETYPE SF
TFM EXP y ,10*
CCUNT,BRNCH&4*
TF
COUNT,BRNCH&6.f=
S
COUNT,6,10*
SM
BP
TIE
XTYPE*
* ROUTINE TO STORE DIGITS IN OUTPUT 8ANO*
BNF *&48,OTYPEX*
STOW
TF
*&.30,NEXT*
AM
NEXT, 2,10*
TF
,SIGNt
EXP,1,10=t
S~
BN
HOHO*
,lIt
,7
TOM FAC-8
BNF N50,DTYPEX*
NC)OX
FAC-7=t
CF
8NF B ,ITYPEX*
,FAC-7t
TF
SIGN
,FAC-6.f=
FAC-7
TR
TDM
FAC&2*
STOW&.12=t
B
DCRG *-3*
Bt\F N50X&12
,FAC-7*
N50
,lIt
,5
TOM FAC-8
N50Xt
B
OORG *-3*
(3
BNF N50X&.24,FTYPEX*
ZEROS AFTER DEC. IF EXP SMALl*
INSERT
*
A~~
SAVE,1,10*
8RNCH~?
BE
BP
0--
N50X~24*
TFM
SIGN,70,10*
STOW&12*
OGRG *-)-*
ISETYP,ITYPEX.f=
BNF
ITYPEX:t
CF
TFM SIGN,3,10*
EXP,BRNCH&6*
TF
:3
STOW*
DCRG *-3*
SF
FAC-9*
,NEXTt
TF
*&30
,2
AM
N~:XT
,FAC-8t
TI
fAC-9
,FAC-l'*
Tf<
B
HOHO
AGUT
,10*
{25
0--
'~----'-
---
o
-
o
--------------------- - .. --
-~--------------.----.-
_. - ----
GP
C463C
04642
04654
046€:2
12 03248 CCC-1
47 04570 C12CO
49 03026 COOCO
046l:2
44 03026 03362
04614
04686
04698
04710
04722
04734
31
16
It
26
11
16
00051
04853
03748
04740
03128
00000
C3993
-0055
OCO-3
03128
000-2
COOM5
04146
0475,8
04710
04782
04794
16
44
It
31
16
43
31
12
45
26
12
22
49
03363
04782
03361
0005'3
03985
04854
00053
03985
04806
03889
0388Q
03889
0425,0
O-OCO
OC060
GeOKO
00051
000-4
C0053
00054
COO-l
00054
03248
000-1
C398'1
CCOCO
33
26
26
43
31
49
03364
03985
00062
04262
COU53
04262
00000
C3248
00060
03247
00059
00000
____ ~4aC6
04818
04330
04842
04854
04866
04878
C4B9C
P/L
---"-- --._..
LOCTN
Q
04898
04898
04910
04922
04Q34
04946
04958
04966
04966
04978
0499C
05002
C5014
05026
05038
05050
05062
01)014
05082
o
.. ------
--
26 0398') 03996
05002 C3996
44
16
26
12
22
22
47
32
49
03985
03889
03889
03889
03889
05082
03365
04250
OCo-o
03248
000-2
03250
03985
C1300
oeoco
COOOO
05082
C5C94
05102
01)103
05315
It 03250 COO-8
49 04190 ceooo
0':;)31t
26 00060 01873
1
212
-
--- -
--------------."-----
----- - ._---
.
PG LN
C4 9EO
04 990
05 - 000
05 010
05 020
05 030
05 04C
OJ} 050
0'1 060
05 070
05 080
05 090
05 100
Or::; 110
O~ 120
05 130
05 140
05 150
05 160
05 170
05 18C
0') 190
05 200
05 210
01) 220
05 230
05 240
05 250
C5 260
05 270
05 280
05 290
05 300
05 310
05 320
05 330
05 340
05 350
05 360
05 370
05 380
OS 390
05 400
05 410
or; 420
0'5 430
0'1 440
05 450
05 460
05 470
05 480
05 490
05 500
05 510
05
.-_.--,--._-_."
"------
5,20
LABEL
----
--
-
-
-.-
-
-
-
...•
--
.-
._--
"-
--- ----------
BRNCH~4
.,1
-.. -".--- . . .
-_ ... _-_ ..
PAGE
MNEM OPERANUS AND REMARKS
S,.1
ENE
.
.,104=
ADUTt
10
- - - - . - - - - --
-
f}
lCOK.:i:
OORG *-3*
*EXIT TU ISETYP AFTER PASSI UF I TYPE,*
*AND 2ND PASS E.,F,C TYPE*
ISETYP BNF LCOK.,ETYPEX*
* TACK ON EXPONENT=t=
FAC-3,SAVE-3:f:
TR
TFt-' Atll
,FAC-5*
TFM BRNCH&4,3,10*
TF
*t30,NEXT*
NEXT,2,lOt
AM
TFM
,45,10*
* NOW ENTER I TYPE TO FIl[ AWAY EXPONENT*
Q IS 1000 T
,8,
,0000
TFM SIGNt2
ITYPE
BNF ilt24,FACt
TFM SIGN,20,10=1=
TR
FAC-7
,FAC-3*
TFM EXP.,4,10t
Be
,FAC-1*
*£48
TR
FAC-7
,FAC-6*
SM
EXP,1,10*
BNR *-36
.,FAC-6*
A
TF
COUNT,BRNCH&4t
S~
CCUNT,I,10t
S
COUNT,EXP*
B
TIE*
DORG ·-3*
OTYPE CF
OTYPEX*
EXP,BRNCH&4t
TF
,FACt
TF
FAC&2
BO
STOW.,BRNCH&3*
,FAC-li:
TR
FAC-7
B
STOW*
DURG *-3=1=
FTYPE
TF
EXP,SAVE*
BNF *t24,SAVE*
TFM EXP,,10*
COUNT,BRNCH&4t
TF
r:OUNT,2,10t
SM
S
COUNT,BRNCH&6*
S
COUNT,EXP*
BN
ERROR*
FTYPEXt
SF
B
TIE*
OfJRG *-3*
* CHANG:: TO E TYPEt
:3RNCH&6, 8, lOt
ERROR
TF~
--- --B
ETYPE*
DORG *-3*
DAC
INCUT
1.,@*
OS
212*
FIXED FCRf32
05644
05656
05668
P/L
Q
03L50 000-6
03250
00051
00060
00059
05102
03248
05388
0'5504
03248
00053
05103
00000
05104
000-1
01200
00000
0'582~
05836
05
015
05
05
05
05
05
0'5
05
05
05
05
,94
BRNCH&2
NUM*
DNUM=I=
•
*
BRNCH&6
.6
BRNCH&6
,BRNCH&4*
S
,fAC-7:f:
TR
fAC-9
,INOUT:f:
fAC
Tf
Cf
fAC-I*
,INOUT&I*
TR
INOUT-l
,1
SM
BRNCH&4
BNE *-60=1=
B
*&44=1=
OORG .-3*
TR
fAC-9
,FAC-7*
TFM FAC
FAC-l=1=
Cf
,1
BRNCH&6
SM
BNE *-48*
B
COM*
OORG .. -3*
• D TYPE
*
TR
FAC-9
,FAC-8*
ONUM
,INOUT:f:
TO
FAC
,70
CM
INOUT
BNN -*&24*
FAC:f:
SF
TR
INOUT-1
,INOUT&I*
,1
BRNCH&1t
SM
BNE DNUM*
FAC-9:f:
COM
SF
TF
.NUM8ER-l*
*&18
TF
,FAC*
B
LOOK-12*
DORG *-3*
.,99
BRNCH&2
CM
NUM
BNE EFTYPE*
,INFX1=1=
TfM BX&6
B
EFTVPEt24*
OORG .. -3*
FAC-5
INFXl TR
,FAC-4*
,INOUT:f:
FAC
TO
.,fAC-4:t
SD
lGFX
EXPA-12:f:
B
OORG *-3*
,CH4:
INFX2 80
FIL
SF
FAC-3*
B
SETSF=t
OORG .-3=1=
TOM CH
LGFX
,9*
B
TR=I=
OORG *-3*
,9999
TFM FAC
FIL
B
INOVP&12*
DORG ·-3*
as
31
16
33
12
41
49
00051 00053
00060 000-0
OCO~9 00000
03250 OCO-l
05468 01200
05632 OOOCO
31
25
14
46
32
31
12
47
32
26
26
49
00051
00060
05103
05596
00060
05102
03248
05536
00051
05662
00000
03014
00052
05103
OOOPO
01300
OCOOO
05104
000-1
01200
00000
03937
00060
00000
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
14
41
16
49
03246
05836
06010
05860
OOORR
05
05
01200
-5720
OCOOO
31
25
43
49
00055
00060
05196
06036
00056
05103
00056
OCOOO
0~616
05616
05688
05100
05112
05720
05720
05732
05144
05756
C5164
05164
05716
05188
01)796
0'5196
05808
05816
05816
LABEL
43 05816 06129
32 00057 00000
49 06246 COOOO
15 06129 CCOC9
49 06060 ocoeo
16 00060 OR999
49 06490 00000
530
540
550
560
510
580
590
600
610
620
630
640
650
660
610
680
690
700
710
120
730
740
150
760
710
780
790
800
810
820
830
840
850
860
870
880
890
900
910
920
930
940
950
960
910
980
990
000
010
020
05
05
05
05
05
05
OS
05
05
05
05
06
06
06
06 o~o
06 040
06 050
06 060
06 070
PAGE
MNEM OPERANDS AND REMARKS
PG LN
Cl'4
BL
BE
A TYPE
TFM
,
11
.-~
~
~
_
.
_
.
c
_
~
...
----
0
.1011*
,10*
,10*
,10*
,10=1=
,10*
()
,10=1=
.,1011*
,8*
/27
0
-'--~-"--
- - - - - _ .__.__.. _ - -
0
0
L()CTN
05836
05848
C5860
05872
05B84
05896
05908
C592C
05932
05944
05956
05968
05980
05992
06004
06012
06012
06C24
06036
06048
06060
06072
06084
06096
06108
06120
06129
06130
06130
06142
06154
06166
06118
06186
06186
06198
06210
ot222
CJ
06234
06245
06246
06256
06258
06266
06266
06278
06290
06302
06310
06310
06322
06330
06330
06342
06350
06350
CP
P/L
Q
16
16
16
16
16
31
15
14
46
14
46
14
47
46
49
06010
06018
05998
06247
06131
06254
06048
05103
06266
05103
06426
05103
06330
00000
00000
OU012
-0053
00060
0-041
0-021
06414
OCOOJ
000-3
01200
ceOKO
01200
OOOPO
01300
01200
00000
25 00000 05103
11 06018 000-1
16 05998 -6004
11 00052 000-1
31 05102 05104
12 03248 000-1
41 05920 01200
44 05164 06007
43 06130 00053
49 05632 00000
21
21
44
44
49
00052
00052
06210
06186
06198
06256
06129
06048
C6254
21
22
11
41
-46
00052
00052
00052
06510
06418
06245
03250
OCOOO
OOONO
01300
01400
32 00060 00000
49 05632 00000
44
16
1'5
49
06290
05998
06048
06060
05995
-6310
00004
OOOCO
12 06129 000-1
49 06060 00000
44 06350 05995
49 06060 OOOOC
11 06245 000-1
PG IN
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
C6
06
080
090
100
110
120
130
140
150
160
110
180
190
200
210
220
230
240
250
260
210
280
290
300
310
320
330
340
350
360
370
380
390
400
410
420
430
440
450
460
410
480
490
500
510
520
530
540
LABEL MNEM OPERANDS AND REMARKS
,DIGIT
tFTYPE TFM BX&6
TFM 0IGIT&6
,FAC-l*
,TR
TFM AX&6
,41
TFM SETSF&l
,21
TFM EXPSG&l
,MJN-12..
TR
EXl-2
,I
TOM EXPA
,3
INOUT
CM
lP
BE
DEC*
,20
INOUT
CM
MIN~
BE
,70
CM
INOUT
Bl
BlKPl*
AX
BE
*
BX
B
*
OORG *-3*
,JNOUT=t
DIGIT TO
,I
AM
*-6
,ISX ..
TFM AX&6
,I
AM
FAC-8
EXPA
,INOU1~lt
TR
TR
INOUT-l
,I
BRNCH&4
SM
BNE lP*
INFX2
BNF
,BX'3.
,FAC-lt
BO
-&22
B
COM*
CH
OS
,--2*
OORG --1*
FAC-8
EXPSG A
,EXl*
,CHt
A
FAC-8
,EXPAt
BNF -&56
,EXI-2t:
BNF *&20
B
*&20*
OORG
,DDt:
FAC-8
A
FAC-8
,BRNC.H'6t:
S
,50
AM
FAc-a
BN
INUNF*
I NOVP:.f:
BV
OS
,*.
00
FAC:t:
SETSF SF
,.-1* OS
EXl
B
COM*
PAGE
,8*
,8t
,8*
.11 ..
.10..
.10*
.10.
.IM
.10..
,10"
·-3*
DORG
DEC
~50
560
510
580
590
600
610
620
630
,8'
8lKPl
,10.
--3~
BNF
-&24
TFM AX&6
TDM EXPA
B
TR*
DORG --3*
CH
SM
B
TR*
OORG
BNF *&20
B
TR*
DGRG *-3*
AM
DO
--3*
,AX'3.
,-&32*
,,4*
,1
,10*
,AX&3*
,1
,10*
128
12
_._------------------ --- --
.----------~----------------
-
------
LOClN
06362
06374
86382
06382
06394
06406
06411
06418
06426
06426
, 06438
06450
06458
06458
0647C
06478
06478
06490
06502
0651C
_____
06510
06522
0653C
03358
03359
03361
03362
03362
03363
C3364
03365
03365
03367
03373
03374
03315
03376
06531
OC07E
0519C
05190
052C2
05214
05226
05238
occce
CP
P/l
Q
16 06010 00382
49 06060 00000
31 06254 C6255
25 06256 05103
32 06255 oo-co
1
49 06060 ceoco
44 06458 C599')
16 06247 COOl2
49 06060 COOOO
15 06131 ceOC2
49 06362 ccooo
26 00060 01861
39 06531 OC1CO
49 06246 COOCO
26 00060 01873
49 06490 COOCO
5
PC IN
06
06
06
06
06
06
ot.
06
ot.
06
06
06
,06
06
06
06
06
06
06
06
06
06
06
06
06
C6
06
06
06
06
06
06
06
06
06
06
07
07
07
07
07
25
25
25
25
49
02190
02214
02266
02278
C04CO
00400
00400
CC400
oecoo ccooe
07
07
07
07
07
01
640
6&:;0
660
670
680
690
700
71C
720
730
740
750
760
170
780
790
800
810
820
830
840
850
860
810
880
890
900
910
920
930
940
950
960
970
980
990
DOC
010
020
030
040
050
060
070
ORO
090
100
LABEL
MNE~
OPERANOS AND REMARKS
lFM
BXE6
TR*
*-3:1:
EX1-2
EX1
EX1-1
1
lR*
*-3*
*&32
SElSF&l
TR*
.-3*
EXPSG&l
PLKPl&32:1:
*-3*
FAC
B
OORG
B2
TR
Te
SF
DC
B
MIN
oORG
BNF
TFM
B
oORG
TOM
B
INOVP
DORG
TF
WATY
,B2
PAGE
,E*
11
0-
,EX1-1::t=
,INOUlt
,
,
,9:1:
6;,**
, AXt3::t=
,32
,10*
,2*
,FNINES-2*
INER~*
B
SElSF*
oGRG *-3*
FAC
,FIEREC-9*
INUNF IF
B
INOVP&12*
oCRG *-3*
* VARIOUS FLAGS AND BINS*
HTYPEX OS
,FlAGS*
,FlAGSEl:t
STCWX DS
,OS
,FlAGSE3t
SIGN
ETYPEX OS
,FlAGSE4*
OS
,FlAGSE:4t
Dlex
ITYPEX OS
,FlAGS&5*
,FlAGSf.6:t
CTYPEX OS
FTYPEX OS
,FlAGSt7*
,FlAGS&7:t
OS
EX
OS
,FlAGSt94:
SEY
,FlAGSf.l'5=t
NU~BX
OS
,FlAGSE:16*
lASTX OS
,FLAGSf.17=t
RTPARX OS
lTPARX OS
,FlAGSt18*
,ERIN@:t
OAe I)
INERfti'
OS
TFAC
,78*
OORG H .. OUT&d7:t
,400:1:
FAXBt2
Te
FAXBE26
Te
,400*
FAXBf.18
TO
,400*
FAXB&90
TD
,400*
B
DEND
*
t
/2 ?
-0-"
Ci
00000C52JO
00480
00380
04930
06210
04800
00150
06600
02930
03410
06220
06670
03650
06340
05830
04160
0
03380
06470
06520
04390
06240
05150
06920
05210
01230
02610
02120
00130
00510
05460
00170
01190
04520
06960
04280
06210
06360
06490
01710
0
-
PDQ FORTRAN SUr,ROUTlN:::S
A
______ 0 't]__~!J
ADCT1 00450
ADeT2 0017'5
AOUT
04440
AX
06100
B
04680
02140
fiB
BLKPL 06200
BOX
02900
BRNCH 03200
04540
Or:;460
06430
05900
BX
06640
B2
CARD
03270
05980
CH
COM
0'5720
COUNT 04000
05390
CReo
03580
06420
00
06160
DEC
OEFI
DIGIT 06080
01}550
DNUM
_
_._-
-----_._---
-----,-_ .. _-_. _.. _-------
...
11/63 FIXEO FMT
.0~C7C
. ' - - - . ---_._---_._----
----_. - - •. _--- .._-_ ..•
".
.
AD
____ ·------"------_---.0·_-
---- •..-- ..• _-_ .. -. -- ------
00270 0238t:j
04990
06260 06520 06530 06600 06730
02270 02450
06780
03d40
03220 037._20 042')0 04260 04270 04290 04400 04420 0'+500
04,)r;o 04QOO 04980 05080 05220 05280 05300 O~310 05390
05~30 05570 05580 05580 05630 05700 05810 05880 06290
06080 06260 06310 06640
06020 C6310 06:-70
06330 06500
04140 04540 04-=;')0 04560 0C)220 05230 05240 05370
05400
03910
0663C
05~BO
060g0
0'1820
OT8X
DTYPE
OVRNO
E~M
END
ENOD
ERO
ERROR
ER9
ETAB
ETYPE
EX
EXP
EXPA
EXPSG
EXl
F.\C
00175
FAD
00420
FAOl
04430
01170
02120
02130
00260
02240
01070
05410
00700
02280
05470
00'100 00640 00830 01060 01690 02060 02110 02140 02200
02270 02390 024'50
03110
04530
05960
06120
06130
00180
00420
00670
01040
01460
02100
02830
04100
05070
05310
C5690
05950
06440
00130
00300
04630
06140
06710
06360
00210
00470
00690
01050
01480
02190
02850
04700
05140
05310
05750
0'5990
06480
00140
00300
01200 01630
02290
04900 0'5170 05200 05240 05280 05340 05360 05400
06380 06'540
06390
00220
00490
00120
01130
01510
02280
03150
04710
05160
05520
05750
060~O
06800
00150
00310
001-.10 0027(j 00281)
06670 06670 06630 0669C
00240
00500
00770
01140
01520
02310
04-370
04140
05160
05590
05760
06090
0-,840
00160
00410
00290
00340
00510
00390
01160
015-60
02400
04390
04750
05180
003'50
00520
00910
01180
01580
02460
04460
04930
05190
05590 05600
051'JO 05830
06270 06320
003'50
00520
00970
01210
01610
02550
04480
04960
05190
05610
05850
06360
00370
00630
00980
01330.
01620
02560
04650
04910
05210
05670
00390
00660
01020
01400
01690
02510
04670
04910
05290
05670
05930 05930
06310 06420
00400
00610
01030
01420
01700
02160
046~O
05060
05290
05680
05940
06430
OOlBO 00220 00230 00240 00250 00290
00420 00410 02380 02 /tOO 02410 024"30
00320 00430 00450 02580
/30
---1
_.. __ .._. __._._._----......... -
-.,----.~.~
..
-~.~
-" -
... ...
... .. .....
,
".~"
~~-----
................
~
....-,-,.-"",,., ...._""'"... ,
i
'I
I
00660
02190
02160
02020
01990
01160
01130
01330
06050
00560
02380
01930
03620
FAD2
FAXB
FAXBN
FAXI
FAXIN
FDV
FOVR
FDV1
FIL
FILL
FIX
FIXER
FLAGS
02540
00890
01010
01040
00130
05340
01420
01540
01510
01610
01460
01400
0487C
04110
03980
07020
05930
05980
05490
FLOAT
Ft-'P
FMPI
06800
01)520
06840'
05130
04220
06990
Q602Q
01830
Q1910
01920
INOVP
INPUT
INUNF
ITYPE
LAST
LASTX
LGFX
'LOGIO
LOGll
LOG2
LeOK
LOOP
LP
LTAB
LTPAR
Q31~Q
04010
06150
01180
0290C
03360
03310
06130
03300
05880
Q698C
0474C
04670
F~P2
FSB
FTYPE
FXA
FXD
FXUR
FX01
FXM
FXS
HOHO
HR
HTYPE
INERM
INFXl
INFX2
INOUT
MARK
~ARKI
MIN
NEXT
NUM
NUM8X
N50
N50X
00490
02160 02230 07050 01060 01070 01080
01990 02000 020S0 02120
,0
01130 01170 01190 01220 01240 01270
01140 02070 02080
01230
05980
00510
02380
06880 06890 06900 06910 06920 06930 06940 06950 06960 06910
06980 06990 07000 01010
00900
00930
00990
00150
04510
00910 01040 01300 01340 02100 02130 02230 02250
00950
01310 01350
00210 00230 00390 00530 00680 00690 02540
01510 01570
01550
04640
04030
06810
05900
06310
03130
04120
05940
06060
04330
06450
04410
02850
03250
05950
02910
04150
06300
02190
03440
02860
03380
02950
06130
03130
C5090
0'5540
03870
04660
04740
03280
04130
06150
06460
03350 03400 03590 03680 03710 03120 03730 03740
04130 05600 05620 05620 05760 05110 05800 05800
06170 06190 06240 06280 06280 06680 07040
06850
(}
03500
03440 03880 04230
02960 03030 03410 03530 03540 04180 05000 05040 05860
02210
02940
03500
03020
06180
03400
05100
02940 02970 03000 03040 03070 03100 03210 03310
03530 03610 03710 03910
03120 03240 03390 03570 03900 04030 04050 04330
03590 03650 04060 04010 04600 04610 04940 04950
04240
04780 04800 04B30
/3L
0
_._-----_. -_.-
0
0
o
ONE
0'1 F Lfo1~_p 0 7 '!g _____ ____________
POST
03000 0310C 03140 03630 03900
01840
00820
03400
02970
03000
03310
03840
01690
04310
06480
06970
06900
04050
03570
027CO
02590
04590
06890
04080
01030
04570
0414G
06280
03500
02150
02410
02420
00620
03040
02620
03100
03270
04130
03950
03530
00110
06940
0608C
06910
03340
01800
01810
06950
01820
06880
05040
06930
07010
04240
03210
STOP
STOW
STOWX
TF
TfAC
TIE
TIEH
TR
TRAC
TRACE
TRFlC
TRFXC
UNFlM
WACO
WATY
WATVE
WRITE
XR
XTYPE
ACCEPT
DIVOIG
OTYPEX
EFTYPE
ETYPEX
FIXFlG
FlTONE
FNINES
FTYPEX
FZEREC
HTYPEX
ISETYP
ITYPEX
lTPARX
NUMBER
PINFM.T
03110
01000
02310
03070
00630
REAOCK
RTPARX
SETONE
WATYSC
ZERFAC
PAce
RATY
READ
RTPAR
RVSGN
SAVE
SETSF
SEY
SIGN
SKIP
SLASH
SpI,M
03550 037'50 03770 03810
02860 03070
0446C 0447t) 04820 05060 05340 05350
06000 06110 06740 06820
04320 04490 04620 04690 04840 04890 05130 05150
03970 04010
0380C 03820 03920
02590
02640
04170 04720 04850 04910 05300 05320
03180 03970 04170
03950 04040
05250 05430
0409C
06030 06100 06550 06580 06610 06650 06110 06750
03250
02780 02810
02820
02840
00590
02590 02n30 02640 02650 02710 02710 02120
02870
03300 03600
04050
04510
03390
04590
05890
04520
04320
0207C
00710
04800
00630
03960
04870
04680
02910
04220
02820
03980
02950
03260
02030
04660 05270
05910
05040
02310
06800
05420
02160 03150 051)20 06840
04010
04810
02920
04360
02840
03990
03570
03410
04880
03140
05840
02900 02980 03010 03050 03080 03110 03180 03840
04020 04040 04110
03420 03850
00460 00920 01250
/32.
~~~-~----~-~.-~-~.-~~-."~'~
\
,I
II
I
~...•........... ,.,
.. -.... ".
..
""'''-'-'~~~''-'--'''-'-''''~'''''''''--''.'-''---~'''''~"'~-."'''''''''' "~,.,
- - - _ . __._-_._- . - - - . - - . - - - - - - - " - . - "
....
. "."'... .. .... ....
,, ,','''',,'~
~~~
,-~~~~-----
"".,,~,,
***** LISTING OF TH~ ~IXEO FORMAT SUB~OUTINES
*****
---~---------"-,,.----~--- - - - _...
"-----~--.--"-""-------.-----------~-~~~LO--09200500340000COOI0239COI05COIGC1600006-001249000000
LO-04900012057445800464967454400465463006264425956646355620071712176710* -00
""".,,
L0002010050026000470027425C0095COG0026000660026931000()0002012600090002741~-OOO,
25004000046746005240090015004010000**
1-1-0~00-0536-00003
2602481004061202481-5000430060400450380203100400380211300400*1-1-0536-0596-006b4-490062803105106020363105190021303~02380C050C4301540024443202*1-1-0596-0656-000u5
38000C002602483023eI210248302381~402381000-14600884012001600*1-1-0656-0716-00006
747-04652200747024834300780C0000360238000S004500748024454900*1-1-0116-0776-00007
628032009960000026024410047015024480000022024470248326024530*1-1-0716-0836-P0008
244815024530000931023900246021023B60248149012400430091600465*1-1-0836-0896-0000)
430091600463490074802602453004712602448024531502448000003102*1-1-0896-0956-00010
38002468210238602481330099600C004Q01240CM4001800099636023800*1-1-0956-1016-00011
0500450107602449260i4530244BI102453-000131023800040049011800*1-1-1016-1076-00012
450113202445320238000000210040602384210248102384490062804301*1-1-1016-1136-00013
18C024411f01167-23803102482000004501272024822102448024812102*1-1-1136-1196-00014
453C2481240245300411~7D1240UI1001500450000014301448004503802*1-1-1196~1256-00015
380004004900996044013320248215013210000144013200248815013210*1-1-1256-1316-00016
000221024880248144013920248315013810000144013800249315013810*1-1-1316-1376-00017
00022102493024812601410011673100000024823302381000001101161-*1-1-1376-1436~00018
001249011560440099600450260152602453260151402448260150702453*1-1-1436-1496-00019
250153100000310000002380150U00000000490099603100000021941500*1-1-1496-1556-00020
C99000004301896004503100402v21A71A0244100-**
1-1-1556-1599-00021
11602448-00001602453-00601681659-00001601654-238025000000000*1-1-1599-1659-00022
01101654-00011101659-00011401654-2440470164801300110173100-0*1-1-1659-1719-00023
11602459-04993302455000003~02380004001102448-00601102453-006*1-1-1719-1719-00024
01401659-04014101636U130036023800050038023800040047018040090*1-1-1719-1839-00025
034000000010239022950010048000000000036000000050049000000440*1-1-1839-1899-0002~
191600450490510603602380005004701916009002200406004111500407*1-1-1899-1959-00027
0000**
1-1-1959-1964-00028
.330040200a00340000COOI02390233500100380040200100390235900100*1-1-1964-2024-001
4901840-5106360519B00500260S11205266260516505271260518405271*1-1-2024-2084-000 ~
25051890000031000C00519815CO*±
1-1-2084-2113-00031
-01523105190001644905106**
1-1-2113-2138-00032
@Qliil@@@Ql@@Jl@@@@@@@@@@;V@@@@a)al@@@cil@@@;i@a;@@i.V@itl(jj@,~@;Il(U@@@@@@:l:**
1-1-2138- 2194-00033
26-5105051031100006-00021400006-5311470000001300410000000000*1-1-2194-2254-00034
340000000102360000000500490000800000-0-**
1-1-2254-2294-00035
N15956434562624955470043565457~34S634~0**
1-1-2294-2334-00036
N6654559534157005646000**
1-1-2334-2358-00037
-05756624963495655620**
1-1-2358-2380-00038
M905000**
1-1-2460-2468-C0039
M9050320**
1-1-2468-2417-00040
L600000005004900000*
-1-0096-0115-00041
36001C0005003600172C050036C0244005003600316005003AOOOO00050000000000000000-00042
000000000000102C304000204060800C3060902100408021610050015102006021814200*0-00043
704112820C8061422300908112A30000000000506070B090012141618151811242720242*0-00044
82236352035304540 3A 3248.445 5 3249465 3604846'546275445 3f,21180 123456789123456*0-00045
789-23456789-J3456789-JK456789-JKL56789-JKLM6789-JKLMN789-JKL~N089-JKLMN*O-C0046
MI000000000049-05000P9-JKL~NOPQ*OGOOLI0038BOOOI9M90000OOOOOO~9000360000000-00047
01
C
-1000
0-1-5000-5036-01001
2600C6019989J5052C000002330C099000001400052000M7M70555601300*0-1-5032-5092-01002
J6051150C-42KI05175C00524LJI06205113320005300C001600079-0000*0-1-5092-5152-01003
K3056020006C26000AOOOOOOM405200,000993200060000004JOOO6005615*0-1-5152-5212-01004
3300060COOOOlt)000470000-2100060000A0220006001901330006000000*0-1-5212-5212-01005
26Q006019969J5052000000~M9050S60000C*
2100C60000602200060019072500099000~OM30556800047320004800000*O-1-~272-5332-01006
2300057000572600C4000088JOCS4C3-56481600070J514·9230004000070*0-1-5332-5392-01007
2600070000002200070C0090J2D~403-0008M4053DOCOCA3230006C00070*O~1-5392-5452-01008
__
M305 568000784600948012002 (,GOO 73000992 4)000740 18H216000'3! OOONO*O-I-5452-5512-0 10
/33
()
4301 028000 '5312000~2000-131 oco'306o-5~ ii90551200-6i5oi- ---- ----o-I-~-i)-Cj-f2~5-5-60-0 1010 !
4M0105205200260006001d51490102800000t
0-1-5556-5592-01011
-000 1591 r;49436-9iK5-oo-6-606-o-D6o--X5-~f6:7 96-32--64-59637i ·::'-P-cf6896S:::'O*--- ---1-1- 55R1- 5643-0 1 0 12
M61311~
1-1-5643-5649-01013
-,)007*
-1014
-50391:
-1015
-0650
-loIt;--02
0
-2000
2800060199491400055N3112M605480013001400052000M2410228401100*0-1-5000-5060-02001
3200053000C0260009901882J60511400J40K20511400052210000000060*0-1-5060-5120-02002
160005200-501100052000-1220009101893M60513201300M40522400099*0-1-5120-5180-02003
320005200000110005200J01330009100000MQ0523600COO*
0-1-5180-5228~02004
210009101893320005100000260006301904J60532100003J605315-1948*0-1-5224-5284-02005
J605310000R1M90538800000*
0-1-5284-5308-02006
220009101948210006300063M3U530400082J205)27000-1J205315000-9*0-1-5304-5364-02007
*'
J205310000-13100082000833L00082000COM~05328000~3260004800086*0-1-5364-5424-02008
23000620004821000~20009011000~lOOO-5330005300000490105200000*0-1-5424-5484-02009
440106200099490091200000*
0-1-5480-5504-02010
-5001*
-2011
-0500
-2012
03
\)
-3000
260005019929140C050-000-M705500011001200042000N0230189300042*0-1-5000-5060-03001
26000650009932C004300C002R00097C00501400091000NOM60515201300*0-1-5060-5120-03002
210009100091220006501948M90509600000*
0-1-5120-5156-03D03
*
J605194000RIJ605223000R8J605235-19391400000R9990M60524401300*0-1-5152-~212-03004
o
210009900000220006500000M90518800000*
0-1-5212-5248-03005
JI05194000-1J205223000-1J205235-0009M60518801400210006500098*0-1-5244-5304-03006
220006S019031600052000N425C009900065330006500C00460094801200*0-1-5304-5364-03007
250006601882M305432000543100054000552500065009101200052000-1*0-1-5364-5424-0300B
M90531606000*
0-1-5424-5436-03009
1100062000-53300053000004301028000531200052000-1310005300054*0-1-5432-5492-03010
,490102800000*
0-1-5492-5504-03011
"460106201200340000000102L90553900100410000000000*
0-1-5500-5548-03012
:
M55953550*
1-1-5538-5548-03013
I
330005000000~90503600000*
0-1-5548-5512-03014
-5001*
-3015
-0568
-3016
;
04
0
-4000
!
310004401846210007119909460C94801200M705304013001300063000NO*0-1-5000-5060-04001
110009800K55250008001882150C07200005160006300-00M30514400098*0-1-5060-5120-04002
i
260001300012150006200000J6U516200005210000000053M30520000062*0-1-5120-5180-04003
1200C530CC-2M90515600000t
0-1-5180-5204-04004
.
K0052180516222000C000053JI05162000-1310004300044330006000000*0-1-5200-5260-04005
3200C6100000M5051560007226000520009149010~200000*
0-1-5260-5308-04006
340000000102L90534300100330007100000410000000000*
0-1-~304-5352-04007
N56258590*
1-1-5342-5352-04008
M90504flOOOOO~
0-1-5352-5364-04009
-5019*
-4010
-0360
-4011
o
-5000
05
0-1-5000-5024-05001
280006019889490105200000*
-5007*
-5002
-0020
4: -5003
'
06
n
-6000 ---.--2800010198692600060018731400062COONOM105084011001400062000N7tO-i-5000-5060-06001
M70509201100260006000010490102800000*
0-1-5060-5096-06002
J605146-0002KI0514600062KC051~105146JI05151-0010260000000000*0-1-5092-5152-06003
,
490102800000*
0-1-5152-5164-06004
-5001*
-6005
-0160' -6006
*
I
- *
I
I
o
*
13'1
I
07
0
-7000 ~-.
2800060198~9K505601000991400052000M3410102801~001400052000Nl+0-1-500o-S060-07001
M70510~0130026013450185120010590566849013~600000*
0-1-5060-5108-070020
..
180008~000-OJ60517000J42K20517000052Ml0517605168320005300000.o-1-S101t-5164-01003
2100000000602600068000991~00057-0000M60552401200J60521lOOOJltO-1-5164-5224-01004
J005511-5695J205211000-1JI05511000JlI400085-0000Ml0523601300+0-1-5224-5284-01005
2l00065052113200086000001100081000J0260005000094280009100064+0-1-5284-5344-01006
2K0008105211290009000050260001900090230007600076260005000092+0-1-5344-5404-07007
1300048J9786200006405695220006400094230006400050200006405688+0-1-5404-5464-07008
220006400092Z30006400079260006401876210006400000210006500091*0-1-5464-5524-07009
250006901882M405596010591601058-10603301059000002K0006405679+0-1-5524-5584-01010
3300064000001500099000001600052000N1430102800053310005300054*0-1-5584-5644-07011
1200052000-1MR0562005104.
o-l-561t4-~66a=07012
J51079632679R9999Cl996l333253P8539816340P3281510119.
1-1-5668-5718-01013
0141409422201012596439N40~1950027M6364160900l805063171It
1-1-5118-5113-07014
K9145819448J9739555985-9966865249-0000000000+
1-1-5773-5817-07015
~5007.
-0818
-1016
•
-1017
k5000
-11223344000000050026004790041932004790000044004800041933004*1-1-0401-01t61-25001
790000041000000000015006950000524000520047146001320120046005.1-1-0461-0521-25002
1
64013002600~190006026000600041926004790041922004710005214004+1-1-0521-0581-25003
1100o-Q41010520130026001790073132007750000021007790041128004*1-1-0581-0641-25004
190047944006840009926006180017932000000000015000610000528000.1-1-0641-0701-25085
60000604400732000993200001004802600419000521600052000-0150OUI-I-0101-076 1-25006
"'1000o-21-0060-047926008030071~25000990000026007790083946009.1-1-0161-0821-25007
---'-4-=80120033000800047943009680005243010040005331000610091031000.1-1-0821-0881-25008
53000541200419000-146008520130M34POPOP..
1-1-0881-0920-25009
0102;39009390010041044653560..
1-1-0920-0948-25010
260006001873490105201100060000-52600060000591100419000-12600+1-1-0948-1008-25011
052004194601062014004401052000993200060000004901060042260006+1-1-1008-1068-25012
00186134000000010239011010010041N64653560++
1-1-1068-1110-25013
490102800000000000320005300000320112000000230006001127460094*1-1-1110-1110-25014
0
8012004301256000841100093-0005430126800084320008500000120005.1~1-1170-123O-25015
2000N1260006000092490129201100092~00051200052000N02600060000*1-1-1230-1290-25016
912100052011193300053000004601016013004900912000000000002601.1-1-1290-1350-25017
3810Q0602600060013454100000000003200053000002501~61013742800+1-1-1350-1410-25018
091000604301.3801374~901062032013740000025000920040029000910*1~1-1410-1410-25019
138146009480120025000990009122000520137343015540008332000&\0.1-1-1410-1530-25020
00001601119000N0490128002600060000901601119000N1490129200000.1-1-1530-1590-25021
220006001589490162600000210006001613460163801~00420000230006*1-1-1590-1650-25022
001643-3200096000002600060000994200002601721000602600060016a5*1~1-165ChI71O-25023
4100000000001401721o-00-4601781t01200280009900060290009601721*1-1-1710-1770-25024
2600060000954225000990006016000600R99949010P4044010400006033*1-1-1770-1830-25025
000600000042NI10000000R99999999999-00000000000000000+.
1-1-1830-1883-25026
-2302585093JOOOOOOOOOOOOOR9995-00R99500-0R950331-R5310180093+1-1-1883-1943-25027
147181N8100000000000016019990-000220199901963410000000000140*1-1-1943-2003-25028
19990-00-4602284012004602080011003301999000001601058-2080260*1-1-2003-2063-25029
134501851490134602601127000601601058-21041201999000-14601128*1-1-2063-2123-25030
011001601058-10604200000000002602187018732202187021514100000*1-1-2123-2183-2503.
000002619929000601601058-2220491993002601127021871601058-225.1-1-2183-2243-25032
2490112801601058-106026199490006049199N00260006001851M226004*1-1-2243-2303-25033
19019581500695000001601058-236644004920006032-0479R050-"900M*I-1-2303-2363-25034
9201601058-106032-0057NI40QM216-0419000N81600056-00001400060+1-1-2363-2423-25035
00-00-3300051700000490018000000 16024820K5393400000+.
1-1-2422-2472-25036
01023900000001004402524024792602410024513802467001001t800M555+1-1-2472-2532-25031
440.*
1-1-2532-2536-25038
4202635651000**
1-1-2536-2550-25039
2102464024631602482-2529490255000000260260402585260000000060.1-1-255O-261o-250~O
47026200044215025850000**
. 1-1-261o-2631t-25041
/55
0
1
--·u
3400000001023802581001001603061-23844402694000511603061-2352~1-1-2634-2694~25042
1603913-0060310316503~18490297802602161030614403026033163303*1-1-2694-2154-25043
--- 316000002 503f6S-0 3165-44-03"5()6U-31 '594-9(f302600000 1603161000-5 2 603* 1-1- 2154-2814-25044
06102797490285800C003103165032262603061028331503159000074903*1-1-2814-2814-25045
0020CGOC1603167000-42603061028814902978000003103165035942603*1-1-2814-2934-25046
061029174902978000003103165032262603061029531503159000OR1603*1-1-2934-2994-25041
128-S10316033760l19M3100061018801603359000lMII03061-00052603*1-1-2994-3054-25048
250000004403244032504403108031594403252033743203375000424403*1-1-3054-3114-25049
37b03161160510300C-t*
1-1-3114-3134-25050
44031580316834-00-NO-J*=t1-1-3134-3151-25051
23905103000001503168000004403266031591603128-510344030260331*1-1-3157-3211-25052
533033750--J**
1-1-3211-3230-25053
440271403314424ROOOOO**
1-1-3230-3252-25054
0
440391403166424403026031~14103026004004903134044035060315915*1-1~3252-3312-25055
031810000-1403128-510341031100120044033780316134000000010249*1-1-3312-3372-25056
0319402603396031281600000000-01103396000-21403396-5263410339*1-1-3312-3432-25051
0013001103413000-13105256009141505261-0000250525903472250525*1-1-3432-3492-25058
103411490315804403158031f72603~48030611103548-00051400000-32*1-1-3492-3552-25059
9847031340120C490335802603C6102161320337500-J**
1-1-3552-3598-25060
4403622033133203374000J**
1-1-3598-3622-25061
440319403159250318103l65490332201603821-36113303358000-04403*1-1-3622-3682-25062
17403359110306100C-22~03125030612603889000004403114033581103*1-1-3682-3742-25063
061000-24403830031592t03821030614403854031592603816031281103*1-1-3142-3802-25064
128000-22600000000004903866026038480306126000000510331051020*1-1-3802-3862-25065
51041203889COO-146037260110044042620335949030260000026039310*1-1-3862-3922-25066
__-=3~9133203314C000033033130004244039480325033032500000032032410*1-1-3922-3982-25067
000032032490000**
1-1-3982-3998-25068
310335903147440~316031592604045039372600060000091604853-0056*1-1-3998-4058-25069
1403246000RR4604146012001403246000RM460489801200460451001100*1-1-4058-4118-25010
2603996000521203996000N04404166000601603361000K01403246000RN*I-1-4118-4178-25011
4104966013003203362000001603985000-0260388903248220388903250*1-1-4118-4238-25072
1203889000-64603654011004404310033642604304031281103128000-2*1-1-4238-4298-25013
. 2600000033611203985000-147045140130015000520000P440442603364*1-1-4298-4358-25014
330005300000440445803363260336100053310005300054150006200000*1-1-4358-4418-25075
4904214044043700005315000520000N4904358044043820336511039960*1-1-4418-4418-25016
00-146C438201i001603361000P049042740440466203363330336300000*1-1-4418-4538-25071
1603361000-3260398503250490426203200051000002604612031281103*1-1-4538-4598-25078
O
128000-226000000005231000~10005312e324800o-14704570012004903*1-1-4598-4658-25019
02604403026033623100051039931604853-00551603248000-326041400*1-1-4658-4118-25080
31281103128000-21600000000M516033630-00044041820006016033610*1-1-4718-4178-25081
OOK03100053000511603985000-443048540005331000530005412039850*1-1-4178-4838-25082
00-14504806000542603889032481203889000-122038890398549042500*1-1-4838-4898-25083
33033640000026039850324826000620006043042620324131000530005q*1~1-4898-4958-25084
490426202603985J39964405002039961603985000-02603889032481203*1-1-4958-5018-25085
889000-222038890325022038B9039854105082013003203365000004904*1-1-5018-5018-25086
25001603250000-849041900-**
- 1-1-5018-5104-25081
2600060018731403246000RM4705616013004605536012001603250000-6*1-1-5316-5316-25088
220325003248310005100053260006005103330005900000310510205104*1-1-5316-5436-25089
1203248000-1410538801200490550403100051000531600060000-03300*1-1-5436-5496-25090
059000001203250000-14105468012004905632031000510005225000600*1-1-5496-5556-25091
510314C5103000P046055960130032000600000031051020510412032480*1-1-5556-5616-25092
CC-14105536C120032000510000026056620393726000000006049030140*1-1-5616-5616-25093
1403246000RR470S836012001606010-5120490586003100055000562500*1-1-5676-5736-25094
060051034305196000564906036043058160612932000510000049062460*1-1-5136-5796-25095
150612900009490606001A000600R999490649001606010000121606018-*1-1-5796-5856-25096
00531605998COC6J16062470-04116061310-02131062540641415060480*1-1-5856-5916-25091
OOOJ1~05103COO-34606266012C01405103000K046064260120014051030*1-1-5916-5916-25098
o
OCP0410633001300460000001200490000002500000051031106018000-1*1-1-5916-6036-25099
16059Q8-6004110005200C-1310510205104120324800Q-1470592001200*1-1-6036-6096-25100
44057640600743C61300005349056320002100052062,)621000520612944*1-1-6096-6156-25101
_
/3fo
I-
062100604844061860625449061980210005 206-2-4 5-Z2000-S2-0S2 50Ti ObOStT-l"':-6 (56-6216- 2s1 0 2
2000NC470651001300460647801400320006000000490563204406Z90059tl-1-6216~6276-25103
95 1605998- 631015060486000449060600120612 90o-o=T4 <) 0 6 0 600440635 t 1 ~ 1-6 276- 6 3 3 6-2 5 . 4
005995490606001106245000-11606010003824906060031062540625525*1-1-6336-6396-2
06256C5103320625500-0**
1-1-6396-6418-251 6
490606004406458059951606247000124906060015061310000249063620*1-1-6418-6478-25107
26000600186139065310010049062460260006001~7349064900M5594955*1-1-6478-6538-25108
0**
1-1-6538-6540-25109
2502190U0400250221400400250226600400250227800400490000000000*0-1-5190-5250-25110
49066000390004100100410000000000490660005356414400444163410*
-25111.
~------------------------~o-,
137
.
-~--.--~---.-----
0-
.-------.------.--.~-
C'
LCCTN
OP
P/L
Q
PG LN
LABEL
Ml\EM OPERANOS
-- _._._---._----------_. ---.
AND REMARKS
PAGE
1
,}
004C2
00402
00414
00426
00438
00450
00459
OC462
00474
0048~
()
"
00498
00510
00522
00534
00546
00558
00510
00582
00594
___
006et:
00618
00630
00642
00654
OC666
CC674
00674
00685
00686
OC694
OC694
00106
00718
OC130
00742
00754
00766
00778
OC79C
00802
00B10
C08l0
00822
OC834
00846
00854
OC854
OC866
00818
00890
'OC902
00<114
00926
OC938
00 000
00 010
16 11523 000-0
16 08427 R9999
16 16135 -6600
26 11:593 16135
15 00459 OLCOO
16
24
47
34
39
15
26
47
37
16
26
12
14
47
26
43
43
49
11387
16135
00534
OCOOO
16563
00459
00702
00694
17225
00641
00680
00641
00641
00462
00470
00674
00674
00582
CCC-l
C8427
01100
00102
C01CO
COOOJ
11487
00400
00')00
J7369
OOA41
COO-2
J7225
01300
ccooe
Cu470
00469
COOCO
16 00000 -0000
2
49 00130 00000
34
37
46
46
34
38
34
oeooo
17225
00694
00802
COOOO
16131
00000
39 17225
15 00731
49 00810
e0102
00100
C0400
C0100
00102
COICO
00101
COlaO
00006
CCOOO
16
43
31
lt9
10864
C0854
17224
00822
J6164
17225
17226
00000
17225
00926
C0901
00926
00901
00462
17225
41 01314
01200
17227
012-0
17229
C1200
OOOPG
14
47
24
47
24
46
14
CCO~3
C1300
CO
GO
00
00
00
00
00
00
00
OC
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
020
030
040
01:;0
060
070
080
090
100
110
130
l4C
150
160
110
180
1QO
200
21C
220
230
240
250
260
270
280
285
290
CO 300
00 310
00 320
00 330
00 340
00 350
00 352
00 354
00 380
00 38~
00 390
00 395
CO 400
00 510
00 520
00 530
CO 540
00 55C
00 560
CO 570
00 58G
00 \)90
CO 600
00 610
CC 620
••
PDQ FORTRAN PROCESSOR CLC2 10/63::t
DCRG 4024:
INITL TFM OMM1,O,lC:t
TFM S,.,CNT,99999:t
,66004:
TFM l
lOAD,L4:
TF
rPM SIl::G I Nt
BE
ern, 10,10*
CN
Bl
HLANKSf.12*
'*
--_.. ------------ _._-
---
---
*
'*
/38
----
·..
---------- ..
--.-~
LOCTN
OP
P/L
Q
00950
00962
00974
00986
00998
01010
01022
01034
01046
01058
0106<;
01070
01082
01094
01106
01118
01130
01142
01150
01150
01162
01174
01186
01195
01197
01198
01210
01222
01234
01246
01258
01266
01266
01278
01290
01302
01314
01326
01338
0,1350
01362
01374
01386
013<;8
01410
01422
01430
01430
01442
01454
01466
01478
01490
01'502
0151e
11
26
44
15
26
26
26
26
26
32
09248
00984
01022
00701
01020
01069
01039
00004
01063
00005
-0962
08346
00004
16
26
26
16
31
45
49
01180
16290
16141
01192
16151
01150
01302
-0089
16135
08427
-0088
17224
16752
14
46
26
33
000-0
01200
16152
OCOOO
14
46
11
11
31
49
16752
01246
-0000
-OCOO
2
2
01180
01266
01180
01192
16151
01130
-0099
01200
000-2
000-2
16153
00000
32
24
46
27
31
26
14
31
.46
21
45
26
31
4q
00088
00099
02768
14820
16751
01571
16752
16751
01566
01571
01338
01416
00000
01430
COOOO
16155
01200
14819
17224
04983
000-0
16153
C1200
08195
16752
01512
01194
COOOO
16153
16151
16752
01586
16751
01510
49 11514
11224
16753
OOOL3
01200
16153
16156
00000
31
31
14
47
31
45
oeaop
08346
00004
08346
16135
08346
00000
ooooe
-
PG LN
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
630
640
650
660
670
680
690
700
710
120
730
740
7'50
760
770
780
790
800
810
820
830
840
850
852
854
860
870
880
890
900
910
920
930
940
950
960
970
980
990
000
010
020
030
040
050
052
054
060
070
080
090
100
110
120
130
LABEL
PAGE
MNEM OPERANDS AND REMARKS
BTM
TF
BNF
TOM
TF
TF
TF
TF
TF
SF
OS
SLOT
FRMATI TFM
TF
TF
TFM
TR
BNR
B
DORG
CM
BE
FRMAT2 TF
CF
DC
AVOID DC
CM
2
r
(0
CFXN,*&12,7*
*&22,SMTLUl&lO*
-&48,4*
DOSWCH,7,11*
-&22,SMTLUl&IO*
SLOT,4*
*&11,SMTLUI&10*
4,L*
*&11,SMTLUI&10*
5*
,-*
FRMAT2&6,89*
BRINST&6,L*
LOOER,SMCNT.
FRMAT2&18,88*
PHI-l,CHI-l*
.'20,PHI*
BLANKS*
.-3*
PHI"IO*
FRMAT2&72*
,PHI,2*
,,2.
,31
2
2
fRMAT2&6,99*
BE
-&56*
FRMAT2&6,2,lO*
AM
FRMAT2&18,2,10*
AM
TR
PHI-l,PHltl*
FRMAT1&60*
B
DORG --3*
SF
88*
C
99,FRMSCT&lO*
BE
FORMAT*
BLANKS BT
BGO,BGo-I*
TR
PHI-l,CHI-I*
BlNKl&ll,ELEVEN~ll*
TF
CM
PHI,,10*
-TR
PHI-l,PHI&l*
BE
BLNKl*
BLNKI&II,INCREM*
A
BlNK2 i3NR *-48,PHI*
TF
-tI8,BlNK1&6*
TR
,AVOID-3*
B
*&8*
DORG --3*
SOECOO TR
PHI&I,CHI-l*
TR
PHI-l,PHItl*
eM PHI,33.10*
fiNE
ISITF-12*
PHI-l,PHI&I*
STDCD2 TR
BNR -t20,PHlt04*
B
ASCAN*
OORG --3*
,
,.-2*
at·.·
/39
..
0
o.
-------- ---
-0
LOCTN
CP
P/L
I~
14
46
14
47
49
16152
11514
16152
01418
05198
CCOK4
01200
OOOK3
01200
00000
0
01510
01522
01'534
01.546
01558
01566
01566
01578
01586
01586
01598
01610
01622
01631t
01646
01658
01610
01682
01694
01106
01118
0173C
01742
01154
01766
01174
01714
01186
01198
01810
01822
01831t
01842
01842
01854
01866
0181Q
01890
01902
01914
01926
01938
01950
01962
01974
01986
01998
02010
02022
02034
0204t
02054
02054
02066
C2C74
0
31 J1224 11226
49 01386 00000
PG LN
01
01
01
01
01
01
01
01
01
01
01
140
150
160
110
180
190
200
210
220
230
240
250
260
210
280
290
300
310
320
330
332
334
336
338
340
342
350
360
310
380
390
400
410
420
430
440
450
460
470
480
490
500
45
14
41
11
14
46
14
46
14
46
14
41
14
46
15
49
01442
11225
01634
11426
11225
04500
17225
05622
17225
04436
11225
01714
11235
06050
15991
00462
167'56
eOOM6
01200
OP170
COOM9
01200
14
41
14
41
46
49
11225
01842
11233
06640
04468
01116
OOOM.3
C1200
COON6
01300
01200
COOOO
14
41
14
46
14
46
17225
01A90
17229
06210
17225
07076
17225
02126
02262
11225
02318
17225
11646
17231
06250
02054
15991
00462
000N9
01200
00003
01200
00002
01200
00ON7
01200
01100
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
01
OOO~l
01 510
01200
01
01
01
01
01
01
01
01
01
01
01
01
lit
46
46
14
46
14
41
14
46
41
15
49
OOO~7
01200
000 .. 4
01200
COOM2
01200
COON1
01200
00004
COOOO
OOOtJ\5
01200
OUON7
012GO
01300
OOOCI
COOOO
45 06410 11233
49 07240 00000
01
520
530
540
550
554
558
562
566
570
514
580
590
LABEL
PAGE
MNEM OPERANDS AND REMARKS
PHI,24,104:
A5CAN:t:
eM PHI,23,10*
BNE 51OC02*
8
00*
OORG *-3*
CHI-l,CHltl,2*
TR
B
BLNK2*
DORG *-3*
BNR SDECOO&12,PHlt4*
CM
CHI,46,10*
BNE *&244:
BTM ERROR,1110,8*
CM
CHI,49,10*
1Ft
BE
CM
CHI,47,10*
BE
GOTO*
CHI,1t4,10*
CM
BE
OIM*
CM
CHI,42,10*
BNE *&56*
,51
CM
CHI&10
BE
BEGPRO*
TOM TRACE&1
,4*
B
BEGIN*
DORG *-34:
CM
CI1I,43,10*
BNE *&56*
,56
CM
CHI&8
BL
CONTIN*
BE
COMM:t
B
CONTRL*
OORG *-3*
CM
CHI,59,10*
SNE
*&36*
CM
CHI&4,63,10*
BE
XETURN*
CM
CHI,62,10*
STOP:f:
BE
CHI,51,10:f:
CM
BE
OUTCHK*
BH
I NCHK:t
CM
CHI,41,10*
ACCEPT:t
BE
CM
CHI,45,10:f:
BNE -ER1*
,57
CM
CHI&6
BE
ENDPRO:t
Bl
*&32*
TOM TRACEtl
,1*
B
BEGIN*
OORG *-3*
,CHI&S:t
BNR EXPROC
B
END*
OORG *-3*
CM
BE
BlNKl
ISITF
,10*
,10*
,10*
LLIO
3
--_._-_._--
------------.------
lOCTN
CP
02074
02086
020<)4
02094
02106
02118
02126
02126
02138
02150
02162
02174
02186
02198
02210
02222
02230
02230
02242
02254
02262
C2262
02274
02266
02298
02310
02318
Q2318
02330
02342
02354
02366
02378
02386
02386
02398
02410
02422
02434
0244t
02458
02470
0248-2
02493
02494
02506
02S18
02530
02538
02538
02550
02562
02574
02586
02598
43 02094 17235
49 11646 00000
P/l
Q
-----------.----~-------
PG LN
01
Cl
01
16 01428 -2606 01
31 17224 17236 01
49 01314 OCOOO 01
01
14 17227 OGON9 01
46 02230 01200 01
47 07056 C1100 01
31 17224 17234 01
14 17225 00003 01
47 02210 01200 01
31 17224 11232 01
16 12916 -2882 01
49 02398 CCOCO 01
01
31 17224 11234 01
16 12916 -2954 01
49 02398 COOOO 01
01
14 17225 00003 01
31 17224 17232 01
41 02366 012eo 01
16 12916 -2918 01
49 02398 00000 01
01
31 17224 17236 01
14 17225 ce003 01
41 02386 01200 01
31 17224 17232 01
16 12916 -2798 01
49 02398 ceooo 01
01
16 12916 -2834' 01
16 12<)11 oeOK7 01
14 17225 00009 01
46 02446 01100 01
17 11426 OP173 01
11 09248 -2458 01
26 02480 03426 01
16 12921 -0006 01
16 12925 o-oeo 01
01
1
21 13996 13995 01
26 12916 02128 01
45 02538 17227 01
49 06640 OCOOO 02
02
14 17225 0001<3 02
31 17222 11224 02
47 02518 01200 02
45 02618 11227 02
16 00808 -2074 02
4<) 00546 00000 02
- - - - - - - - . -_.------
591
592
593
594
595
596
597
600
610
620
630
640
650
660
670
680
690
700
710
720
730
740
750
760
770
780
790
800
810
820
830
840
850
860
870
880
890
900
910
----------
LABEL
MNEM OPERANDS AND REMARKS
CONIO
BO
*&20
B
ERl*
OORG *-3t
TFM
TR
B
OGRG
OUTCHK CM
BE
BNH
TR
CM
BNE
TR
TFM
B
PRINT
OORG
TR
TFM
B
OORG
INCHK
CM
TR
BNE
TFM
B
OORG
ACCEPT TR
CM
BNE
TR
RDCD
TFM
B
101
DORG
TFM
TFM
CM
BH
BT~
BTM
TF
TFM
TFM
DC
920
930
940
950
960
970
980
990
000
010
020
030
040
050
060
064
-------------------------
BT
TF
102
BNR
B
OORG
CM
TR
BNE
BNR
TFM
B
PAGE
4~
,CHI&10*
SDECOD-2 ,102&8:3*
CHI-l
,CHI&ll*
BlANKS&12*
*-3*
CHI&2,59,10*
PRINT:t
PAUSE*
CHI-1,CHI&9*
CHI,63,10*
*&24*
CHI-1,CHIt1*
INS T2 &6, w,ACDt
101t
*-3*
CHI-l,CHIt9*
INST2t6,WATY:f:
101*
*-3*
CHI,63,10*
CHI-1,CHlt7*
RDCD*
INST2&6
,WATYSC*
101*
*-3*
CHI-1,CHIt11:t
CHI,63,10t
*t44:t
CHI-1,CHlt7*
INST2t6,RACD1:
101*
*-3*
INST2&6,RATV:t
INST2t1,27,10*
CHI,69,10*
*&24*
ERROR,7173,8:t
CFXN,*&12:t
*&22,SMCNT-1*
INST2&11,6*
INST2t15,,8*
1,@,**
PUT2,PUT2-1*
INST2&6,IOINST&6:f:
IU2t20,CHlt2*
TESTDO:t
*-3*
CtH ,23, 10*
CHI-3,CHI-1*
102*
,CHlt2*
*&44
BRCt6
,CONI0*
BEGIN&84*
0-
ILII
0-
-----
-- -------_._-_._._._---._-
.
0
0
LOCTN
02606
02606
02618
02630
02642
02654
02666
02618
02690
02102
02714
02722
02722
02735
02168
02180
02192
02804
02816
02828
02840
02852
02864
02876
02888
02900
02G12
02924
02936
02944
02944
02956
02968
C298e
02992
03004
03016
03028
0
03040
03052
03060
03060
03012
03084
03096
03108
G3120
03132
03144
031'56
03168
C3180
C3192
03204
03216
---_.-
P/L
Q
16
15
17
26
31
01428
00698
09414
02665
12917
02690
12916
13996
10864
02518
-1430
00000
-2642
10864
00000
17227
-3914
13995
J7 03938
17
31 17224
26 02797
11 00004
26 02821
15 00005
11 16290
27 14832
1~ 03061
16 03546
31 16749
16 03491
31 11224
45 02944
16 0080·8
49 00546
-2734
14
46
14
46
14
47
16
16
16
49
11225
02900
11225
G2900
11225
03060
03551
03510
03061
03528
000K3
012CO
000-0
01200
OOOK4
01200
-2726
-L900
OCOI'-\1
CCOCO
17
41
14
47
14
46
25
16
14
It6
14
47
46
14
11426
03658
11225
03962
11225
04098
03541
03479
17225
03216
11225
03962
03276
11225
OP171
01100
OOOfJO
PG LN
02 070
16
27
12
49
.
-- ... ----
-_._ .. --.
-----------------~
- - - - - - - - - - - - - - - - - - - - , - - - - - - - - _.. _---------- ----------- ---_. __ .. _._--.._----
CP
~5
--
-COOg
ceoco
16151
C8346
CCO-6
08346
OOOOK
-GOO6
14831
CCOJ7
J6758
04425
oeooo
17226
17225
-3910
OCOCO
OllCO
00009
C11ce
17225
oo-co
000«11
el2ec
01JO~4
0130G
012CO
OOOM9
02
02
02
02
02
02
02
02
02
02
02
02
C2
02
02
02
02
02
02
02
02
02
02
02
02
02
C2
02
02
02
02
02
02
02
02
02
02
C2
02
02
02
02
02
02
02
02
02
02
02
02
02
075
08C
090
100
110
120
130
140
150
160
170
lRO
190
200
210
220
230
240
2'50
260
270
2R.O
290
300
310
320
330
340
350
360
370
380
390
400
410
420
430
440
450
460
470
480
490
500
510
520
530
540
'550
56C
57C
02 ')80
O? 590
02 60C
LABEL
MNEM OPERANDS AND REMARKS
PAGE
'3
DCRG *-3"*
TFto'!
SOECOO-2
,SOECOO*
SBSWCH*
I1TM CSORN,*E12*
TF
*&23,PUTETB&6*
TR
INST2E7*
BNR *t24,CHIt2*
TFM
INST2tf::,COMPLTt
~T
PUT2,PUT2-1:f:
SM
PUTETB&6,9*
B
102t
OORG *-3*
IOINST BTM SWC,LSUBS-1,074=
17,LOAD SUBROUTINES@*
OAC
LSUBS
FORMAT TR
Ct-il-l,PHI-l*
TF
*t11,SMTLUl&10*
.~~
4,6,10*
TF
*&17,SMTlUltlO*
TDM 5,2,11*
A~
8RINSTt6,6*
BT
BGOt12,BGOtll*
TF~
SwlP&1,17,10-t
TFM TRANS&18,PHlt6:t
TR
PHI-3,F~TSP-IO*
,lOt
,80
TFM WIDTH
FSCAN TR
Cf-JI-l,CHI&l*
B~R
*t32,CHI*
TF~
BRCt6
,CONFMT*
B
BEGIN&84*
OORG *-3*
CM
CHI,23,10*
BE
FSCAN*
CM
CHI"lO*
BE
FSCANt
CHI,24,10:f:
CM
BNE SwlP:t=
TFM TRANSt23,lTPAR-t
TFf-' TRNSBR~6,FSCAN*
TFM SWlPtl,41,10=t:
B
TRANS*
DORG *-3*
BTM ERROR,7111,8:t=
SWLP
BNH PUNCT*
C~
CHI,40,10*
BNH CHCHIt12-t
CHI,f19,10,*
CN
BH
HOLL*
TO
TRANSt19,CHI*
TFM EFIND,,9:*
Cf-1
,41
CHI
.10*
DE
TIER*
CPI:
CHI,44,10t
BL
CHCHI&12*
TD~
BE
TIERt
CM
Cl-'I,49,10t
IL/Z
.. _._----_.-
----
------
------
..
-~
.-
------
.~~--
-_._-_._..._----,_....
--- - - - - - - - --
--.
--------_._---
lOCTN
OP
P/L
Q
03228
03240
03252
03264
03276
03288
03300
03312
03324
03336
03348
03360
03312
03384
03396
03408
03420
03432
03444
03456
03468
03419
034i8C
03492
03504
46
16
14
46
'31
11
11
26
16
44
21
14
41
31
21
14
41
11
32
26
33
01200
000-0
OOOM6
01100
11226
000-0
000-0
17213
000-0
03418
03949
000-3
01200
11226
03949
00009
01100
000-0
00000
11213
CCOOO
33
32
32
16
11
16
21
49
03216
03419
11225
03962
11224
09248
03514
03995
03551
03468
03950
11225
03962
11224
03950
17225
03962
09248
11212
03551
03548
2
03550
03551
03541
03510
03f)46
16758
16151
00000
32
26
22
41
14
46
11
14
41
16
16
49
11212
03549
03491
03646
11213
09448
11426
11225
03114
03551
03510
03'i28
00000
17213
11213
01300
000-0
01100
OP112
OOOKI
01200
-3298
-2888
00000
46
14
41
16
16
49
02900
11225
03962
03551
03510
03528
01100
000-4
01200
-3514
-3182
00000
16
21
31
25
03812
03812
00000
03341
J6152
16751
16289
161'51
03.,516
03528
03540
03552
03564
03514
03574
03'586
03598
03610
03622
03634
03646
03658
03610
03682
03694
03106
03114
03114
03126
03138
03750
03162
03714
03182
03182
03794
0380.6
03818
00000
00000
00000
-2912
000-5
-coco
03539
OCOOO
PG LN
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
61,0
620
630
640
650
660
670
680
690
100
110
120
130
140
150
160
110
180
190
800
810
820
830
840
850
860
810
880
890
900
910
920
930
940
950
960
910
980
990
000
010
020
030
040
050
060
010
080
090
100
110
120
130
140
150
LABEL
MNEM OPERANDS AND REMARKS
BE
TFM
eM
BH
TIER
TR
BTM
BTM
TF
TFM
BNF
BT
CM
BNE
TR
BT
CM
BNH
BTM
SF
TF
PRETRN CF
EFIND OS
CF
SF
SF
TFM
TRANS AM
TFM
A
TRNSBR B
OORG
WIDTST SF
TF
S
TIER:f;
EFINO,,10*
CHI,46,lO*
CHCHI&12*
CHI-1,CHItl*
CFXN,OO,10*
WIOTST,,10*
RPFMT&21 ,SYMt
TRANS&23,OO,IO*
PRETRN,EFINO-l*
,(HCHI-l*
CHCHI
CHI,03.,10*
CHCHI&12t
CHI-l,CHI&l*
,CHCH.I-l*
CHCHI
CHI,69,10*
CHCHI&12*
CFXN,,10*
SYM-l*
TRANS&23,SYMt
TRANS&20*
2,-*
TRANS&22*
TRANS&23*
TRANStI9*
TRNSBR&6,FSCAN&12*
*&18,5,10*
PHI&6*
PHI-l,TRANS&ll*
PAGE
6
0
!.
0
*
--1*
SYM-l*
TRANS&21,SYM*
WIDTH,SYM*
BN
-&36*
CM
SYM.,IO*
BH
CSORN-26*
BTM ERROR,1112,8*
CHI,21,lOt
PUNCT CM
BNE *&44*
TFM TRANSt23,SlASH*
TFM TRNSBR&6,FSCAN-12*
B
TRANS*
DORG --3*
BH
FSCAN*
CM
CHI,04,10*
BNE CHCHI&12*
TFM TRANS&23,RTPAR*
TFM TRNSBR&6,FINISH*
B
TRANS*
DORG *-3*
FINISH TFM "&30,PHI*
A
*t18,PHI-l*
TR
,BRINST&5*
TO
*&23,PHI-l*
1'13
0
------
0
LOCTN
CP
P/L
03830
03842
03854
03866
03878
03890
03902
03910
03910
03922
03930
03930
03942
039'50
03950
03962
03914
03986
03998
0401C
04018
04018
04030
04042
04054
04066
04018
04090
04098
C3491
04098
04110
04122
04134
04146
04158
04110
04182
04194
04206
04218
04230
04238
04238
04250
04262
04214
04282
04282
04294
04306
04318
04330
C4338
0-04338
43
11
26
21
27
16
49
038'54
16751
16758
16758
14556
00808
00462
0
Q
00210
000-1
1613'5
16751
16751
-0810
00000 .
43 03930 17235
49 03962 00000
31 17224 17236
49 029J2 00000
09448
11426
03527
17212
03997
02912
17225
OP171
-4042
00000
17213
00000
03491
03646
03510
03527
03991
46 03528
49 02912
03995
01300
-4018
-2912
000-1
01100
00000
45
17
16
32
26
49
22
47
16
16
12
17
27
14
46
14
47
17
16
16
31
16
4c)
09248 000-0
03C)50
17225
04238
11225
03974
03514
03551
04329
17224
03510
03528
03949
00001
01200
OLOMS
01200
000-0
-3690
-4350
17226
-4282
00000
11 03574 oco-o
16 03551 -3654
16 04329 -4406
49 04218 OOOCO
16
32
2f>
16
49
03539
17212
031)51
03510
03528
000-2
00000
17213
-4350
ceoco
31 17224 17226
PG LN
lABf,:l
HNEH OPERANDS AND REMARKS
160
80
170
180
190
200
210
220
230
240
250
260
270
280
290
300
310
320
330
340
350
360
370
380
390
400
410
420
430
440
450
460
470
480
490
500
510
520
530
540
'550
560
510
580
590
600
610
620
630
640
6'50
660
03 610
03 680
03 690
03 700
AM
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
B
DORG
OS
BTM
BT
CM
*t24,210*
PHI-l,l,10*
PHI&6,l:t
PHI&6,PHI-l:t
PUTPHI,PHI-l*
BRCt6
,BRCta*
BEGINt
*-3*
,CHI&10:t
*&20
Ct-ICHI&12*
*-3*
CHI-l
,CHI&II*
FSCAN&12
,5*
*-3*
CSORN-26 ,CHIt
,1111
ERROR
,8*
TRANS-l
,RPTl*
SYH-l*
.-1
,SYM*
FSCAN&12:t
*-3:t
,RPFMT&21:t
WIDTH
PUNCT-12*
TRNSBR&6 ,RPT2j:
,FSCAN&12:t
TRANS-1
RPFMT&23 ,1
,10*
TRANS*
fSCAN&12:t
.-3*
,EFINO&12:t
CFXN,,10*
CHCHI
,CHCHI-l*
CHI,61,10*
BE
"&10~*
TF
A
BT
TFM
B
OORG
CONFMT BO
B
CHCHI
RPFMT
OORG
TR
B
OORG
BNR
BTM
TFM
SF
TF
8
OORG
RPT2
S
RPTI
TFM
TFM
BN
SM
BH
WIDTH
HOlL
PAGE
eM
BNE
BTM
TFM
TFM
-TR
TFM
,
CHI,~8,10:t
RPFMT:t
WIDTST
t
TRANS&23,HTYPE*
,10*
HOll1&11,HCONT2~
CHI-1,CHI&1*
TRNSBR&6,HCONT1*
TRANS,*
B
OORG "-3*
8TM WIDTST
,10*
t
TFM TRANS&23 ,XTYPEt
TF~
HOllI&ll ,HCONT4&244:
B
*-56=&:
OORG *-3*
HCONTI TFM TRANS&11,2,10*
SF
SYM-l*
TF
TRANS&23,SYM*
HOlLl TFM TRNSBR&6,HCONT2:t
8
TRANS*
DORG *-3*
HCONT3 TR
CHI-l,CHItl*
I LfLl
7
- -
---
----- . _ - - - - - - - - - - -
- - - - - - - _ . - -----_._--- ._---
LCCTN
04350
04~62
04374
04382
04382
04394
044C6
04418
04425
04435
04436
04448
04460
04468
04468
04480
04492
04500
04500
04512
04524
04536
04548
04560
04568
04568
04580
04592
04604
04616
04628
04640
04653
04672
04684
04696
04708
04720
04732
04744
04756
04768
0478C
04792
048CO
048CO
04812
C4824
04836
04848
04860
04868
04868
04880
04R92
04904
-
..----------
-- -_._----- --
-_.-
Q
,OP P/L
16 C3570 -4382
26 C3551 17225
49 03528 OCOOO
.- - ' -
PG LN
03
03
03
03
12 17213 000-1 03
46 04338 CI1CO
03
16 03539 000-5 03
49 02900 CCOOO 03
C3
11
03
15 00699 OC004 03
31 17224 1724Z 03
49 09602 COOOO 03
03
31 17224 17236 03
15 00699 OCOOM 03
49 09602 COOOO 03
03
31 17224 17230 03
16 16972 COOM9 03
16 11523 000""9 03
15 00697 COOOI 03
32 00702 OCOOO 03
49 11526 ceooo 03
03
33 17212 CCOOO 03
33 17210 ocoeo 03
33 17208 ceoco 03
33 17206 COOOO 03
24 17213 04661 04
46 04672 01200 04
17 11426 0-076 04
04
10
31 00000 05177 04
14 17237 OCOG9 04
47 04156 OllCO 04
25 00009 17237 04
31 17224 17240 04
14 17225 0()OO9 04
46 04768 01100 04
17 11426 0-077 04
16 05936 -00C5 04
16 05067 OOOKO 04
49 04984 cooeo 04
04
26 04823 10864 04
31 12901 oooeo 04
26 12900 16283 04
31 12910 16324 04
44 041368 12907 04
49 04880 oooee 04
04
27 13976 13975 04
44 04904 12908 04
27 13996 13995 04
43 04948 129C8 04
710
720
730
740
750
760
770
780
790
800
810
820
830
840
850
860
870
880
890<
900
910
920
930
940
9'50
96C
970
9Be
99C
000
010
020
040
050
060
070
080
090
100
110
120
130
140
150
160
110
130
190
20e
210
--
----.-.------ ..
-- _. - - --.------.-
--_ ...
---
_.
_._- _.-
._. _. --- ._---- _.
_...
-_ .... -------..
------.--~-~-
----
-
PAGE
LABEL ,..NEM OPERANCS AND REMARJlS
HCCNT2 TF" TRNSBR£6,HCONT44:
IF
TRANS&23,CHIt
B
TRANS*
OORG *-3*
SYM,l,10t
HCONT4 SI,i
BP
HCONT3t
TFM TRANS&11, 5·,10:1:
B
FSCAN*
DORG *-4t
11,74900000@t
FMTSP DC
DMSWCH,4t
TO~
DIM
CHI-1,CHI&17t
TR
B
CSt
OORG *-3*
TR
CHI-1
,CHI&11*
COMM
,4
TOM OMSWCH
,11*
CSt
B
OORG it-3*
TR
CHI-1,CHI&5:1:
IF
TFM PI-iI&220,49,10*
TFM 0~M1,49,10t
TDM FSTSW,lt
SF
IFSWCH*
B
ASCAN&12*
DtJRG ·-3*
CF
SYM-1*
CF
SYM-3*
SYM-5t
CF
CF
SYM-7*
SYM,SENSE&.8=t
C
BE
IFSS=t
,76
ER6
BTM ERROR
,8*
SENSE OAC 10,SENSEt
,IFSSRC=t
TR
OUT
IFSS
eM
CHI&12,69,10*
BNH *&60t
TO
OU1&9
,CHI&12*
TI~
CHI-1,CHI&15*
CM
CHI,69,10*
BH
*624=1=
,71
BTM ERROR
ER1
,8*
TFM KK&6
,OUT&.5*
TFM THAT&11,20,10*
B
ElEVEN612*
OCRG ·-3*
TF
*&23,PUTETB&6*
TEN
T~
INST161=t
INST1&6,TFFAC:.I:
TF
INS12,RVINSTt
TR
Bi~F
*&20,INST1£13t
E(}
0-
*~20*
220
B
230
240
2!)0
260
210
DCRG *-3:1:
PUT1,PUT1-.lt
8T
8NF *624,INST1&.144=
BT
PUT2,PUT2-1*
Rr~
u
*&44,INST1&14*
LL/5
0-
- _.
__ __._---- .
-'--'-
---
-_ .. _----_._-------
-------------_._--------_.
0
LOCTN
OP
04~16
31 00000 05088
21 00006 16135
49 04960 coooe
04928
04940
04948
04948
04960
04912
04984
04996
05008
05020
05032
05044
050'56
05068
05080
05088
05088
CSl0e
05112
05124
05132
05132
05144
05156
0
0516~
05116
0'5116
05111
05188
05191
0'5198
05210
05222
05234
05246
052'i8
0526C;
05210
05282
05294
05306
0'5318
0533C
05342
05354
05366
05378
C5390
05402
05414
05426
05438
05450
0
_____ ..Q 546 2
P/L
Q
PG LN
04
04
04
04
31 00000 05132 04
04
16 05936 -0041
31 J1224 11226 04
11 05918 -4996 04
04
14 05936 -0041
41 05032 012CO 04
16 05936 -0005 04
11 05936 OCOJ2 04
45 04912 11221 04
11 14522 OCOM4 04
16 05067 OOOtJ4 04
49 00462 COOOO 04
04
43 -0024 00053 04
49 00000 00000 04
44 00000 C0060_ 04
49 00000 00000 04
04
14 00060 0-000 04
46 00000 01200 04
46 00000 01100 04
49 00000 00000 04
04
04
1
04
1
04
11
04
9
31 11224 17228 04
11 09248 -5222 04
26 05239 03346 04
12 00004 00OL6 04
14 11225 OOOK3 04
47 05282 01200 04
04
1
11 11426 0-018 04
11 09414 -5294 Olt
04
1<6 00011 05305
26 00006 C8421 04
26 05605 08421 04
16 056'20 C-001 04
16 05444 -5605 04
31 17224 11226 04
14 17225 CCOPO 04
04
46 05402 01300
17 09414 -5426 04
17 09248 CCO-O 04
26 08421 11213 04
11 05444 -0005 04
26 oeooo C8421 04
45 C5354 17221 04
04
26 COOll C5610
------------
280
290
300
310
320
330
340
350
360
310
380
390
400
410
420
430
440
450
460
410
480
490
500
510
520
530
540
5')0
560
'510
580
590
600
610
620
630
640
6'50
660
610
680
690
100
110
120
130
140
7';;0
760
77C
780
790
800
810
82C
LABEL
~NEM
PAGE
OPERANDS AND RtMARKS
OUT
OUTE6
*£20*
DCRG *-3*
Tf{
OUT
T;:~
'A
B
9
,IFRCFlt
,L*
,IFRCFX*
,OUTE41*
CHI-l,CHIEl,2*
ELEVEN TR
BTM STATNO,*&12*
KK&6
C~
,OUT&41*
DNE
*&24*
,OUT&5*
TFM KK&6
KI<&6,12,10*
AM
BNR ELEVEN,CHI&2=t
BTM PUTX,44,10*
THAT
TfM *-1,44,10*
B
BcGIN*
DORG it-3*
24,FAC-1,2=1=
IFRCFl BO
B
*
i3NF
,FAC*
B
*
DORG *-3*
IFRCfX CM
FAC,,8*
=t
BE
TFM
KK&6
BH
*4:
B
OORG *-3*
1,@.f.
DC
IFSSRC DC
1,4*
11,60000000000=1=
DC
9,49000000@*
DC
TR
CHI-1,CHI&3=1=
00
3TM CFXN,*&12*
*&11,SMTlUl~10:f;
TF
S~
4,36,10*
CHI,23,10:f;
CM
8NE
*E24*
DC
l,m,*:f
BTM ERROR,78,8*
BfM CSORN,*~12=1=
,*E11
TF
OUTt:l1
(JUTt6
,SMCNT=t
TF
TF
OSAOO ,SMCNT=t
TFM 'DSAOOE.15,1,8*
KAY&6,DSADO:f;
TF~
TK
CHI-l,CHItl*
Ell
CHI,70,10.:t
C~
t3Nl *&24*
8TM
CSORN,*E.36*
i3TM
SFXN"lO*
Sfo':CNT, SYM':f
TF
Ai.j,
*&1'H,5*
,SMCNT-t
KAY
TF
8;\JR
cLL,CHI&2:t
,OSADOf.5:t
Tf
OUTt~11
,0*
_____________________--'-L/ to
--.----.---------
.-
-----"-~---
..... ----
_._------_._ .._-_._ .. -_.._.__ ._ .. .......
_
~--
-.----"------.-.,,-.--,,.----~-........,..--~.---
... '-.....--.. --------_.... .
..)
---'-------------.---.-
LCCTN
CP
P/L
Q
05474
05486
05498
05510
05522
05534
05546
05558
05570
05582
05594
05601
05605
05610
05615
05620
05621
05622
05634
05f,4f,
44
15
11
26
26
11
45
31
11
26
49
05498
00000
14522
05610
05551
05557
11408
00000
05564
08421
00462
00008
CCOOJ
CCOJ2
16135
05564
OCOJ9
OOOCO
05601
-C020
16582
00000
-0000
-0000
-COOO
-0000
31
14
46
31
17
26
17
49
00005
00005
00005
COO05
1
11224
11225
05114
00000
09248
00005
14522
00462
16
31
15
31
11
11
11
43
21
21
21
31
17
15
26
27
49
17
26
26
44
26
49
05936
16749
00698
11224
0591S
16151
05936
05738
16187
16194
16806
17224
09474
00698
16158
14556
00462
09248
00000
05964
05986
05984
00000
J6823
06984
00001
11226
-5714
000-4
OCO-4
17224
16135
16135
16135
17228
-5870
00000
08421
16751
COOOO
-5930
C8426
08346
00005
05917
OOOCO
056~S
05670
05682
05694
05706
05114
05114
05126
05138
05750
05162·
05114
057e6
05798
05810
05822
05834
05846
058'58
05810
05882
05894
05906
05918
05930
05942
05954
05966
05978
05985
05986
05998
06010
06018
06018
11232
COOK4
01200
01041
-5682
08426
000-8
00000
26 06.008 08346
44 06018 00004
49 05966 00000
26 06035 08346
PG LN
LABEL
MNEM OPERANDS AND REMARKS
EMM
BNF
TOM
8TH
TF
TF
AM
BNR
TR
,OUTtS*
*&24
,I
OUT
PUTX,12,IO*
DSAOQ&5,l*
,EMH&6*
"'&35
,19
*&23
NOSPCEf;
,OSAOO-4*
AM
*-6,20*
TF
SMCNT,MEMCAP-l*
B
BEGIN*
DORG ... -4*
DSA 0,0,0,0*
04
04
04
04
04
04
04
04
04
04
04
04
04
830
840
850
860
862
864
866
810
880
890
900
910
920
OSADO
04
04
04
04
04
04
04
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
OS
05
930
940
950
960
970
980
990
000
010
020
030
040
050
060
010
080
090
100
110
120
130
140
150
160
170
180
190
200
210
220
230
240
250
260
270
280
290
300
310
l,i*
CHI-l,CHIt1*
CHI,24,10*
COMPUl*
OUT
,GGG*
CfXN,.tI2*
QUT&S
,SMCNT-l*
PUTX,8,10*
B
BEGIN*
DORG *-3*
COMPUT TFM K!<&6,PHIt71*
TR
PHI-3,GOTORC-3*
TOM SBSWCH,I*
TR
CHI-l,CHltl*
8TH STATNO, ... tI2*
AM
PHI -1,4,10*
AM
KK&6,4,10*
COMPUT&24,CHI~I*
BO
A
PHI&35,l*
A
42&PHI,l*
A
54&PHI,l*
TR
CHI-l,CHIt3*
BTM CSORN,.&12*
TOM SBSWCH,O*
TF
PHI&6,SMCNT*
ST
PUTPHI,PHI-1*
BEGIN*
8
STATNO BTM CfXN,*&12*
KK
TF
,SMCNT-l*
Tf
*&22,SHTlUl&10*
BNF *&32,5*
TF
*&'18,STATNO-14
B
*
OORG .-4*
TF
*&22,S~TlUl&10*
BNF *&20,4*
B
KK&36*
OORG *-3*
TF
*&.11,SMTlUltl0*
as
05
05
05
05
05
05
05
01)
05
05
GOTO
PAGE
10
-~-
0
,11*
,10*
DC
TR
CM
BE
TR
BTM
TF
BTM
0
ILl?
0
-~
-------- ---
----
--
-----------------
LCCTN
06"06
Of606
06614
06/,14
06626
06627
06633
06639
06640
06652
06664
06616
06688
06100
06712
06123
06724
06736
C6748
06160
___
06172
06184
06796
06808
06820
C6832
06844
06856
06868
06880
06892
06904
06916
06928
06940
06947
06947
06958
0t:97C
0(:;983
06986
CP
-------~-------------
P/l
Q
49 -OOOQ COOC.o
26 -OOOK OC001
1
1
6
6
44
31
12
26
31
26
15
11
26
26
11
26
26
26
26
26
26
26
44
15
44
15
11
11
41
49
03890
00000
05564
06699
00040
06718
COOOO
1
06718
06754
CCOOO
C6754
06790
COOOO
00C06
00011
00018
00023
00030
06880
00000
06904
00012
14522
01069
06652
03890
007C1
06947
-C020
05564
00000
06699
CCOOO
-COlO
06718
16349
-OOlC
06754
16349
00044
00059
00044
00054
00049
00001
00002
COO19
COO02
CCOL6
OOOL6
01200
COOOO
1
11
12
13
3
0l;981
1
06996
9
06998
2
12
7
01010
01011
01022
01034
07046
01041
01055
06640
01056
07068
01016
--_. __ ._--
-------_._--_._----
5
12
12
1
8
16 12895 OOOM8
49 07200 00000
PG IN
05
05
05
05
05
05
05
05
05
05
05
05
05
06
Of.
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
870
880
890
900
910
920
930
940
950
960
970
980
990
000
010
020
030
040
05C
060
010
080
090
100
110
120
130
140
150
160
170
18C
190
200
210
220
230
240
250
260
270
280
290
300
310
320
330
340
350
360
370
330
390
420
430
--_. ----- _._--
-----
._-_._----------- ---_._- ----
LABEL
-
---
-- ----.--- --------
- ---_._----------
----
--- ---
-
- .----- - - - - -
PAGE
MNEM OPERANDS AND REMARKS
120
OORG- *-3*
U
R,,26:t
DORG *-3:4=
TF
DC
[XREC
DC
DC
DC
TESTOD BNF
TR
SM
TF
TR.
TF
TOM
DC
2,1.261=
1,@*
1,1*
6,700002:4=
6,OO012@:t
CONFMT-2C ,DOSWCH*
• DORCRD4=
OUT
EMM~6,20*
*&23,EMM&6:t
OUT&40:t *&18,.-1*
*
1,@,**
*-6,10*
TF
*&18,*-18*
TF
,CRAM*
AM
*-6,10*
TF
*&18,*-18*
TF
,CRAM*
,OUTt44:1:
TF
OUT&6
,OUT&S9*
TF
OUT~ll
,OUT&44*
TF
GUT&18
,OUT&54*
TF
OUT&23
TF
OUT&30
,OUT&49*
BNF *&24
,OUT&7*
TUM OUT
,2*
BNF *&24
,OUT&19*
TOM OUT&12
,2*
8TM PUTX,36,10*
,36,10*
AM
SLOT
BNE TESTOO&12*
B
CGNFMT-20*
OCRG *-4:1:
OORtRO DC
1,1*
11,10000000000*
DC
12,140000000000*
DC
13,470000001100~t
DC
DC
3,68*
GOTOHC DC
1,1*
9,300009000*
DC
DC
2,04*
12,320009500000*
DI:
DC
7,1100099*
1),00061*
DC
12,260005900099*
DC
12,260006500000*
DC
Or::
GGG
1,4*
DC
8 ,9000000@*
CONTIN DS
,TESTDO*
,48
INSTl~1
PAUSE TFM
B
ENDX-32*
OORG *-3*
AM
0--
-----~---
-
-~--.
,10*
jll CJ.
O-
--------- ----- ---_.
-.-----".~-----.
0
LCC1N
CP
31 17224 17232
26 12901 07115
4G 07140 oooeo
0
07076
07088
07100
07108
071C8
07116
07116
07128
01140
07152
07164
07176
07188
07200
07212
07224
07232
07232
07239
07239
07240
07252
07264
07276
07284
07284
01296
01308
07316
07316
07328
01340
07352
073f4
07376
07324
07384
07396
07408
07420
07432
01444
07456
07468
07475
01480
07492
07504
07516
07528
07536
07536
C7::l4E
07556
0
PIL
Q
J7 02452
-coco
31
16
17
26
33
45
16
31
27
49
17238
eCOL4
000-0
17213
00000
17225
17224
12895
09248
12905
12902
07200
12905
12906
13976
06640
-ooco
16345
13975
00000
49 02562 oeoeo
31
17
16
49
1
00000
141522
14756
14702
07232
000-8
-7284
CCOCO
16 14756 J4S92
45 07316 16~69
49 07340 COOOO
07340
16669
16600
17213
09473
08280
C0459
CC4CO
1613'5
OOR99
-7384
26 16605
26 1661C
31 16611
31 16661
26 07491
26 07474
46 07904
34 00000
1
26 07901.
44 07556
44 C7~3t
16 07674
49 07632
C8427
08347
16156
16578
16582
16:>82
00100
00102
43
38
26
16
16
4q
oooeo
GOOOO
G7901
C7R98
-789S
OCGOO
16 C7674 -18<12
49 07632 Geooo
075r:;_~~Lu7~J2
-----------._-----"._---
C18'19
LABEL
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
06
C6
06
06
06
06
06
06
06
06
SlOP
06
06
06
06
06
06
450
460
470
480
490
'500
510
520
550
560
570
~80
590
595
600
610
620
630
640
650
660
670
680
690
700
710
720
730
740
750
760
770
780
790
06 800.
06
06
06
06
C6
06
06
06
06
06
06
06
06
06
Cf
C6
C6
C6
07
07
-- _.•. -
.. _------_.
--------------
--------_._ .. _-_._-------------- - - ._-------_._--
PG LN
06
- .__._----- ----------- .__ .-
810
820
830
840
850
870
880
890
900
910
920
930
940
91)0
9f: C
970
980
990
000
010
MNEM OPERANDS AND REMARKS
PAGE
13
CHI-l,CHI&7t
INST1&7,CONTRL-1:t
B
CCNTRL&24*
OORG *-3*
,07*
81M STOPSR
DORG *-31=
CHI-1,CHI£13:.t
CONTRL TR
INST1&1,34,10:.t
TF~
BT~
CFXN,,10*
TF
INST1&11,SYM*
INST1&8:.t
CF
BNR *[.24,CHI*
TFM
INSTl~ll:.t
,CRAM-44=
INSTl&12
TR
PUT1,PUT1-1*
ST
TESTOO:.t
B
OORG *-3*
B
ENDSR:.t
ENOX
OORG *-4*
1,@4=
DC
TR
OUT
,ENOX*
ENe
BTM PUTX,8,10:.t
TFM OUMP&54,*&204=
DUMPt
B
OORG *-3*
TFM DUMP&54,PUTPHI&364=
BNR *&20,IMAGE:.t
B
*&32*
DORG *-3*
80
*t24,SKPPCH*
WNCD IMAGE*
BUFBAS&6,L-t
TF
TFM SYM,999,9:t
CSORN-l,.&20:.t
TF~
SMTLUf.:
B
DORG *-3:.t
TF
3UFBAS&11,SMCNT:.t
TF
8UFBAS&16,SM1LU1&11*
TR
DUFBAS&17,USEDFS4=
BUFBAS&61,MEMCAP-5*
TR
TF
*&59,MEMCAP-l:.t
COl
.&30,MEMCAP-14:
Tf
Bel EXIT:t
ReTY
Of:
1,@,*-4*
TF
DOIT-3*
,OOIT-3:.t
NCTCON
DNF
.,DOIT-r,t
5NF FLPCON
,0011-6:.t
FXPCCN TFM wf\;UMi3&~
8
WADO!{*
TR
TF
,
'*
-------~---
OtJRG
*-3*
-----_.-
!tif\UMS ~,)
,D01T-12:t
WAODFt=t
B
ODRG *-3*
NOTeeN B'-lF NOTACC,DCIT-f):f
FLPCCN
TF~'
------------.--.----.-------~--------~
___----'-30
----- -
P/L
LOCTN
CP
01568
01580
14 01901 COR99
46 01904 01200
16 01674 -7899
49 01632 00000
015f12
07604
01612
01612
01624
01632
07632
07644
01651
01656
01668
01680
01692
07704
07112
07712
07724
01132
07732
01744
011'56
01768
07180
01192
07804
07816
07824
01824
07836
07848
01860
07872
07884
.07901
07902
079C3
07904
079C4
07916
07928
07940
01952
07<164
07976
07988
07995
01996
079<;6
08008
08020
08032
ce044
08056
Q
44 01112 01898
49 01516 00000
38 07410 COlaO
34 00000 OC10J
1
44 01732 C1655
38 COOOO COI00
12 07491 OOOJO
12 07474 COOJO
49 07456 00000
33 07655 00000
49 07632 00000
39 07893
32 07655
26 07190
12 07190
44 07680
26 07814
44 01824
49 07680
00100
00000
01490
000-1
00005
07190
00006
COOOO
07846
07474
00000
07470
01491
07692
6
1
1
07790
00009
00101
00100
OOOKO
08056
07996
00402
07952
00000
02135
00000
00000
1
00459
00300
16596
-0152
00102
00100
CC500
GOOOO
26
26
34
38
12
49
43
46
31
49
34
39
36
49
oeooo
15 16044 CCOOJ
16 16595 -0402
38 16591 00400
38 02729 00400
38 07947 00400
34 00000 eCIC2
PG LN
020
030
040
050
060
070
080
090
100
110
120
130
140
150
160
170
180
190
200
210
220
230
240
250
260
270
280
290
300
310
320
330
340
350
360
370
380
390
400
410
420
430
440
450
410
480
490
500
510
520
53C
540
5'50
560
07 570
01
01
01
01
07
01
01
01
07
07
01
01
01
07
07
01
07
01
07
07
07
01
01
01
07
07
07
01
07
01
07
07
07
07
07
07
01
07
07
01
07
01
07
07
07
07
07
01
07
07
01
07
01
07
LABEL
MNEM OPERANDS AND REMARKS
eM
BE
TFM
B
DORG
NOTACC BNF
B
OORG
WADOR WNlY
SPTY
DC
BNF
WNUMB WNTY
RETURN SM
SM
B
OORG
CF
VAR
B
OORG
WAlY
SF
TF
SM
BNF
TF
BNF
B
OORG
TF
IF
SPTY
WNTY
SM
B
OO.IT
EXIT
OS
DC
DC
OS
BO
Be3
TR
B
PAGE
14
--~
0
00IT-3.999,9*
EXIT*
WNUMB&6,OOIT-S*
WAOOR*
*-3*
VAR,OOIT-6*
FXPCON*
*-3*
001&38*
,,11*
1,~t*-4*
VAR&20,*-I*
*
001&59,10,10*
001&42,10,10*
001&24*
*-3*
WADDR&23*
WADDR*
*-3*
DOIT-ll*
WAOOR&23*
*&34,001&58*
*&22,1,10*
RETURN,5*
*&22,*-2*
*&20,6*
RETURN*
*-3*
*&22,VAR&78*
001&42,9*
*
001&38*
001&59,20.10*
RE'TURN&12*
6*
1,.*
1,41*
,*&1*
MOON7-24,SKPPCH*
lOOP-i:
402,BUFBAS&2:f:
STOPER,152,l*
0
SlOPER ReTY
WATY lSUBS*
RNCD
B
*
De
1, •• *-4*
DGRG *-3*
TOM BUFBAS&50,1,11*
LOOP
TFM BUFBASt1,402*
WNCO lOAD-2*
WNCO lSUBS-6*
WNCO STOPER-5:f:
ReTY :f:
*
*
/5/
0
w·""w·.,'
- - - - - - -_.
0
0
LOCTN
UP
P/L
Q
08068
08080
08092
08104
08116
08128
08140
08152
08164
08116
08188
08195
08200
08212
08224
08235
08236
08248
08260
08272
08280
08280
08292
08304
08312
08312
08324
08336
08348
08360
08312
39
26
26
26
12
14
46
15
26
22
34
16511
08098
00000
CB151
08098
08098
08092
00CC8
05564
16205
KOOOO
COlaO
16588
16349
08091
OCOJO
J7396
01100
OOOCO
08098
16205
20102
15 15991 oe001
39 16551 COIOO
41 Nl00n 00000
15
38
38
49
08225
16350
16430
00402
00008
00400
00400
oeooo
26 08427 16582
26 08346 16581
49 08336 00000
12
12
26
44
44
49
08426
08346
11223
08380
08312
08596
000-1
000-1
00009
17221
17211
COOOO
44
26
15
49
08428
08426
11219
08312
11219
17222
COOOO
R9999
08380
08380
08392
08404
08416
08421
08428
08440
08452
08464
08476
08488
085CO
08'511
08512
08524
oeS36
08548
08560
08"72
08584
08596
cefoe
0
08620
45
45
26
26
44
33
15
31
26
21
43
14
47
11
24
46
47
08596
11408
08469
00009
17223
17222
08346
17213
08~48 17213
17213 00000
11214 COOOO
1
00089 11204
00088 C8421
14868 14867
oef64 0069<)
11225 OCOK4
11332 01200
11426 0-012
11213 11223
C8312 C1400
08312 01200
PG LN
01
07
01
01
01
01
01
01
07
01
07
07
07
07
07
07
01
01
07
07
07
07
01
07
07
07
01
07
01
01
07
01
01
07
07
01
01
07
07
07
01
01
07
08
08
08
08
08
08
08
08
08
5.BO
590
600
610
620
630
640
650
660
610
680
685
681
690
700
705
110
740
750
760
770
780
790
800
810
820
830
840
8150
860
810
88C
890
900
910
920
930
940
950
960
910
980
990
000
010
020
030
·040
050
010
080
090
08 100
08 110
08 120
LABEL
MOON1
MNEM OPERANDS AND REMARKS
WATY
TF
TF
TF
SM
CM
BH
TOM
TF
S
K
INCREM OS
TOM
WATY
NOP
OS
F1
TOM
WNCO
WNCD
B
DORG
SMTlU TF
TF
B
OORG
SMlOOP 5M
SM
SMTlUI TF
BNF
BNF
B
OORG
BNF
Tf
TOM
B
SMCNT
S-MNOT
OS
BNR
MOON3
TF
TF
BNF
CF
TDM
DC
TR
TF
BT
BO
SMTST
BNE
BTM
C
BNR
eM
BV
BNE
EOC*
*&18,FCTEND*
,CRAM*
*&53,*-7*
*-18,10,10*
*-30,lASTtI2:J:
*-48*
a*
EMMt6,HOON7&18*
USEDFS&49,USEDFS&49*
,20102
20000
,2*
,*-4*
TRACE&1
,1*
lSTM*
51000
,2*
,**
*-11,8*
lROUT*,
lROUT2*
INITl*
*-3*
SMCNT,MEMCAP-l*
SMTlUl&10,MEMCAP-2*
SMTlUl*
*-3*
SMCNT-l,I,10*
SMTlUl&10,l,10*
COMP,9*
*&32,COMP-2*
SMlOOP,SYM-2*
5MT5T*
*-3*
SMNOT,COMP-4:J:
5MCNT-l.COMP-l*
COMP-4,O*
5MlOOP,99999,7*
,**
SMT5T,COMP:J:
N05PCE,COHP-l*
*&17,SMTlUlt10:t
9,SYM*
MOON3,SYM*
SYM*
SYH&I*
1,@,41
89,SYM-9*
88,5HCNT*
COMGO,COMGO-l:t
DMM,DMSWCH*
CHI,24,10*
PUTETA-12*
ERROR,72,8*
SYM,COMP*
SMlOOP*
SMLOOP*
,
L52
PAGE
15 '
----
- -_._------_.-_.-
-------_.
lCCTN
'OP
-~-------
P/l
--.-
Q
08632 24 17223 17213
08644 46 08312 014CO
08656 31 17215 lC899
08668 24 08341 16588
08680 47 11308 01100
08692 25 08714 08426
081C4 43 08128 OO2CO
08116 11 08426 000-1
08728 16 08182 J6105
08740 26 08715 08426
0815.2 32 08714 00000
08164 11 08182 -0000
08716 15 16105 00001
0818a 15 08421 00000
08800 16 11225 OOOM6
08812 15 11591 00000
08824 16 09473 -8844
08836 49 11344 COOOO
08844
08844 15 00691 00001
08856 49 12582 CCOCO
08863
08864. 26 09123 08427
08876 14 17225 OOOK4
08888 46 08920 01200
08900 44 09192 00699
08912 49 09124 COOOO
08920
08920 12 08346 000-1
08932 26 08997 C8346
08944 26 09.117 C8346
08956 II 09122 000-1
08968 31 17222 17224
08980 17 09248 000-0
08992 26 19994 17213
09004 31 17222 17224
09016 14 17223 ceO-4
09028 46 09224 01200
09040 26 17223 17213
09052 17 09248 000-0
09064 23 11223 17213
09076 32 00096 CCOCO
09088 31 17222 17224
09100 22 09J22 00099
09112 16 19999 -COCO
09123
09124 45 09156 17221
09136 15 00699 00000
09148 49 00462 COOOO
09156
09156 14 11225 oeCK3
31 11222 17224
09168
09180 46 09204 012eo
09192 11 11426 C-079
09204 45 09602 17227
- - - - - - - _ . _ - - - - - - - - _.
PG IN
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
130
140
150
160
170
180
190
200
210
220
230
240
250
260
270
280
290
300
310
320
330
340
350
351
352
354
356
358
360
310
380
390
400
410
420
430
44C
450
460
470
480
490
500
08 51.0
C8
08
08
08
08
08
08
08
08
08
08
-
-~
_.-
--
----~----
.. - - -
__._-----_.------------- -- --------------
LABEL
C
CO~P,SYMt
BV
SfI,lOGPt
COMP-8 t ETAC-7t
C
S~TlUl&11,FCTENO*
BNH
TO
EO
PUTETA-36*
*&22,SMCNT-l:f:
*&24,200*
SMCNT-l,1,10:t
*&54,USEOfS-51*
*&35,SMCNT-1:t
*&22t
*&18,*
USEOFS-51,1*
SP"CNT,O:t
CH I ,46, 10.*
fXORFl*
CSORN-l,*&20:t
PUTETA*
*-3*
FSTSW,I*
TFSAVE*
*-4*
OIMONT,SMCNT:t
,24
CHI
*&32*
DIMC-32
,DMSWCH*
OIMB&12*
*-3*
SMTlUl&10,l,10*
DIMA&5,SMTlUl&10:t
OIMB&5,SMTlU1&10t
OIMONT-1,l,1G*
CHI-3,CHI-lt
CFXN,O,IC*
19994,SYM*
CHI-3,CHI-l*
CHI-2,4,10*
OIMC*
SYM&10,SYM*
CFXN,,10t
5YM&lO,SYM:t
9f*
CHI-3,CHI-1:t
OIMONT-l,99:t
19999,*
, **
*&32,CHI&2*
Ofl,SWCH*
BEGIN*
*-3t
CHI,23,10*
CHI-3,CHI-l*
*&24*
ERROR,79,8*
CS,CHlt2t-
AM
TFM
TF
SF
AM
TOM
TOM
TFM
TOM
TFM
8
DORG
TOM
B
OORG
TF
CM
BE
BNF
B
DORG
SM
TF
TF
A""
OIMA
PAGE
MNEM OPERANDS AND REMARKS
TR
OMM
--
..
TR
BTM
TF
TR
CM
BE
TF
BIM
M
SF
TR
S
520
530
540
550
560
570
58C
IFM
DIMB
DIMCNT DS
BNR
TOM
590
lR
BE
BTM
BNR
600
610
620
-_ ..
8
DCRG
C~
16C
,10*
0-
---- - - - - - - --
153
~
-0-:
---
----------------_._-,--
_._----------_.
-------------
0
LCCTN
CP
49 09192 00000
0
09216
09224
09224
09236
09248
09260
09212
09284
09296
CS3C8
04'1320
09328
09328
09340
09352
09364
09376
09388
094CO
09412
09424
09436
09448
094'50
0945C
09462
09474
09lt86
09498
09510
09522
09534
09546
09558
09566
09566
09518
09590
09602
09614
09626
09638
09650
09662
09614
09686
09698
09110
09122
09134
09742
04'1142
09754
CS1te
09118
0
22
49
16
16
11
25
31
45
49
14
46
14
46
14
46
26
26
32
44
42
26
49
14
15
46
14
46
14
46
49
14
46
15
16
26
26
31
11
14
46
33
33
33
33
49
14
1~
46
16
P/l
09122
C9112
11209
09290
09290
11210
11222
09328
09316
Q
17213
PG LN
08 630
08 640
08
08
0-000 08
J7209 08
000-1 08
11225 08
11224 08
17225 08
ceoeo 08
08
17225 eoo-o 08
09296 01200 08
17225 00009 08
09272 01100 08
09290 J7213 08
10462 01100 08
09423 09290 08
17213 ccoeo 08
17210 ocooo 08
094'50 09246 08
ceooo 00000 08
oe
09473 09247 08
08280 COOCO 08
11225 COO-3 08
11597 00000 08
09850 012CO 08
17225 CCCPO 08
09850 01300 08
11225 COOtJ€ 08
09~66 01100
08
09602 COOCO 08
08
11225 ceON5 08
09602 C11CO 08
11591 00002 09
09632 J7205 09
11214 114B9 09
17205 17225 09
17222 11224 . 09
09632 000-2 09
17225 OOOMO 09
10530 C1300 09
17212 CCOOO 09
17210 COOOO 09
11208 CCOCO 09
11206 ceoco 09
08280 eGOOO 09
09
Cg
10008 J721C
11597 ceoe2 09
10462 CIICO C<)
17205 C-OCO 09
cooce
LABEL
6'5C
660
610
680
690
100
71C
120
730
140
750
760
770
780
790
800
810
OI~C
CFXN
aze
830
840
850
e60
870
880
890
900
910
920
930
940
9t)O
960
970
980
990
000
010
020
030
040
050
060
070
080
090
100
110
120
130
14(;
1'50
16C
170
B
*-244:O"URG *-3*
DIMONT-l,SYM:.t
S
B
DIMB*
TFM SYM-4,,8*
TFM *&30,SYM-4*
AM
*&18,1,10*
TO
SYM-3,CHI*
TR
CHI - '3, CHI -1*
BNR *&20,CHI:.t
B
*&56*
DORG *-3*
eM CHI"lO*
BE
·-44*
CM
CHI,69,10*
BH
CFXN&24*
CFXN&42,SYM*
CM
BH
EXCESS*
TF
·&23,CFXN&42*
TF
SYM*
SF
SYM-3*
BNF *&14,CFXN-2*
Be
*
DCRG ·-9:.t
CSORN-l,CFXN-1*
TF
B
S~TlU-t
CI-\1, 3,10*
FXORFl=i:
NUMBER:t
CHI,70,10*
NUMBER:t
CHI,48,10:t
BH
*&20*
CSt
B
OORG ·-3*
CHI,55,10*
Ctt.
BH
CS:t
TOM FXORFL,2.:f:
TFM SAlTt:6,SYM-8*
CS
TF
SYM&l,lER09*
SYM-B,CHI:.t
SALT
TF
CHI-3,CHI-l:.t
TR
At/;
SAlT&6,2,lO*
CM
CHI,40,lC*
BNl SYMCHl.
TF
TF,..
300
305
310
320
330
350
360
370
380
390
400
410
420
430
450
4/,0
470
480
490
500
510
520
530
540
550
560
570
580
590
600
610
620
630
640
650
660
670
680
69C
15 700
1') 710
15 72C
15 730
15 740
15 7'10
15 770
1') 780
15 790
15 800
15 810
15 820
1'5 8-30
DC
STCPSR
ENC5R
TRACX
FAXI
FAXIN
CCMPlT
I~ATY
OS
OS
OS
OS
OS
OS
OS
RACO
WACe
WATYSC
WATY
85
SWC
OS
OS
DS
OS
LTPAR
RTPAH
HTYPE
XTYPE
SLASH
EQSW
FSTS~
OS
OS
CS
D~
0>;
OC
'J
0("
_IJ
SESWCH OS
1,0;*
,2452*
,2562*
,2586*
,20004=
,1964*
,3914
,2B34*
,21984=
,2882*
,2918*
,2954
,3938
,2726*
,3574*
,3690*
,3654*
,3298*
,3A&2*
,8At3t
, B~,&4*
,BAf..54=
D~SWCH
OS
FlAG~W
n r.l
,BA~6*
OOSWCH 0:)
IFSWCH
- - - tJ .S
BA& 7*
,B,(\£.3t
t . .J
•
_._-------
----~~
-~~
----
,
,lAST*
,WATYE
, NU~iGE'
,
t
L~G
~.' •••• '~': ••• _ ••• _.~ •• _~ _ _ _ _ •._ _ _ •••• _.,, __ .~ •..••• ,,_...
• . . . . " •• , ••• _ •. ,.. ~., ..... , ,,,, .......,,,,.,.,,,.............,....." ....,.',,,,,, ..., , _.. _
............""' ........ '........................"" •......",....." ................., .... ""~ ...... ~ .... '-.. ~ .. "'"' ....................... ''''~ .. I''.U.~J ..... '''~ ...... ''''' " •• IW,aj":,,,. .,,, .. II ...... '_., ..... ~~....- _ _
:J
-_._-.----
"-'-'--'--'-
.. '--.
-~---.--.-.-----~---.--
lCCTN
UP
Q
6
1
49
1
16145
16156
16205
16206
02298
02392
00060
0048(;
16211
16216
16221
5
5
5
5
5
5
1622~
16231
16236
16241
16246
16251
16256
16261
16266
16271
----16276
0181.6
16283
16284
16291
167.92
16292
16307
16308
16323
16324
16339
16348
16349
16350
16.361
16362
16374
16382
16382
16394
16406
16418
16430
16442
16454
16466
16478
16490
16502
16510
16511
16551
16563
P/l
5
5
5
5
5
5
5
5
7
M9 00000 00000
1
K7 02298 02291
4
K7 02392 02391
4
K1 01816 01815
4
9
1
15 --240 00000
1
36 00080 00500
49 00104 oeooo
44
49
26
26
31
45
36
44
26
31
49
00092
00104
00074
00000
-0160
00056
00160
00032
00146
00000
00104
20
6
8
00161
00000
00164
00174
00175
00160
00500
00160
00164
00165
OOOOC
PG LN
15
15
15
15
15
15
15
15
15
15
15
15
15
15
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
_.16
16
16
16
16
16
16
16
.----_ ... - '_. __ . -
LABEL
860 FRMSCT
810 USEDFS
880
890
900 FIXI
910 FLOATI
920 FAC
930 FAD
940' AFAO
950 AFSB
960 AfMP
970
980 AfDV
990 AFOVR
000 AFXP
010 FAXBN
020 fXA
030 FXS
040 FXM
050
060 FXD
070 FXDR
080 RVSGN
090 TFfAC
110 BRINST
120
130
140 FIX2
150
160 FLOAT2
170
180 RVINST
190
200
210 CRAM
350 LROUT
360
370
380
390
400
410
420
430
440 LROUT2
450
460
470
480
490
500
510
520 EOC
'330 lSTM
540 OVERl
1
--------_._---,.-.. _ - - - - - . , , _ .._.
____________ . _____________._____ __ L __
MNEM OPERANDS AND REMARKS
D"\C
DC
DC
DC
OS
OS
OS
OS
DC
DC
DC
DC
DC
DC
DC
DC
DC
DC
DC
DC
DC
DC
OS
DC
B
DC
DORG
BT
DC
BT
DC
BT
DC
DC
DC
TOM
DC
RNCD
B
DORG
BNF
PAGE
30
0
6,FORMAT*
1,0*
49,0*
1,G)*
5
5
5
5
5
5
5
5
I)
5
5
')
5
5
0
7
,2298*
.2392*
,60*
,480*
,480*
,420*
,1128.
.1128*
,1382*
,1346*
,2188*
,2152*
,1614*
,1590*
,1644*
,1644*
,1722*
,1686*
,1816*
.2600060*
, ,0*
1,.,--4*
*-3*
fIXl,FIX1-1,0*
4,.*
FLOAT1,FLOAT1-1,O*
4,i*
RVSGN,RVSGN-l,Ot
4,.*
9,.*
1,.*
240
,23*
1,.,**
80*
104*
*-3*
92
,161*
B
104*
TF
74
,164*
TF
,174*
,175
160
TR
,2*
BNR 56
,160*
RNCO 160*
BNF
32,160*
TF
146,164*
TR
,165*
104,60000,7*
B
DORG *-3*
OAC 20,PROCESSING COMPLETE.*
OAC 6
,START.*
OAC
8,OVERLAP(i*
~
0
-----l
,
L~Z
0
lid
trertt
Q
the
LOCTN
•••
,.tt
OP
tl
t» .....
P/L
t6t1ttdHd
Q
cocoa
0
0
16583
165e8
It50 04080 04130
04690 04820 04830
05580 05600 05 -, 00
06100 06110 06110
06170 06660 100'10
13370 13380 13390
13510 13510 13530
13580 13600 13610
13730 13730 13740
13810 13930 13950
00130
01620
10150
00400 00780 00790
01000 01030 01060
01160 01230 02200
03170 03180 03190
05120 05130 05170
C1610 09620 09660
01610
02480 03380
13900 13980 14030
04410 04850 05000
13430 13520 13')90
13860 13890 13920
04240 04240 C6600
14610 14610 14/60
01970 01910 02140
13360 14770 14770
10300 10380 10650
01840
01870
01760
02680 03370 03410
0332('
03390
03080
16180 161f:C
11180 114fO 12130
09010 0905u C986C
0400C
C3010
108BO
11770
13280
12A60
10900 10920 11600 11650 11670 11690
11790 11810 12120 12320 12340 12400
14360
12140 12770 12860 12890 12950 14460
042HO 04290 04320
04840 04970 04990
05120
06120
10070 10110 10240
13400 13420 13420
13~30 13540 13550
13610 13620 13660
13740 13760 13170
13960 13960 17360
04330
05360
05990
06130
10250
13450
13550
13700
13180
04360
05370
06090
06140
10230
13460
13560
13710
13790
04380
05480
06090
061';0
10290
13470
13560
13720
13800
04680
05490
06100
06160
10370
13500
13570
13720
13810
00B20
01070
02280
03190
05180
0968C
00840
01070
02290
0.3200
108se
09710
00900
01080
02880
03900
10860
09720
00900
01100
02890
05030
13930
09720
00990
01100 01110
03120 031.30
05040 05080
13940 13940
09730
01000
01140
OC)380
13630
15410
06600
14760
02140
15260
05500
13640
15430
11940
15050
04260
15260
05610 05730 06180 06670 13410
13690 13750 13180 13820 13830
031~O
05110
17660
11940 13030 13030 14570 14~70
15050 15250 15250 15420 15420
04260 13050 13050 13330 13340
1~290 15290
03510
1320C 13300 14380
09810
173
0-
W' ',,','
_-----------------_ _._--_. __ .. 0073C
SLCT
OC68C OflqC
_ _-=:0~1_=_9_=3_=_0______ ~~~t'JT.. _..9....l)S)}0 oe090 00760 01930
01) 170 . o~·21c--(5537()·i5~4io
07900 08030 08180 082UO
01940
S~NGT
07890
_ _. . . ::O:.. . .;1--=1--=8:.. . ::C'---_.. . ::S:.. :. fII.. . .T~l=-=U=---=C::...-f,......::8:....::C:....::~
:·
o=--::O:....::ts:....::'8.:. . :f.:. . :C~~0:...::9~1~2:.....:::...0_
',
09 2 20
08100
SMTST
07870 07940 09940 09970
1113C
SS
lC930 11440
11150
SSA
10870 113fC
1095C
SSB
10890
1525C
SSBCO
1~110 1~330
11650
SSC
11620 13180
12090
SSCA
11660
116005SCAI
11280
12000
SSCB
11680
11420
SSuCI
11230
11110
SSl
11300 11510
11810
SS2
11540
11500
553
11320 13230
11410
SS4
11250
11560
SS5
11340 11930
11830
SSh
11360
06450
STJP
01410
14090
SUJ:\I
13370
C0080 10320 10330 10340
10615
SU8N
02180
_ _-=15100
She
02270 02410 02440
SWLP
02410
16660
SYf-1
02680 02790 0280e 02920
03660 03750 03960 03910
07860 07970 079:30 07990
08460 08480 08480 086'50
09010 09020 09030 09080
0.9200 OQ21lJ C9230 09~'j0
09770 09800 09810 09870
TEr-1p
14530 14'180 14740 14780
14810
11720
TEN
04110
04190 12200 14~90 15030
TFfAC
1609C
THAT
04140
04410
02560 02590 026tO
TI~R
02650
10350 13480
TOP
17660
TRACE 0133J 015CL 07687
15350
TRACX 1'3480
15610
TRA.NS 02280 02420 02450 02530
02870
02890 02930 03010 03030
03510 03600 03640 03660
17290
TRY
11100
TWAGS 1'5130 1516C
15210
00385 1.0765
TYST
00340
07010 01130 01310
VAR
0119C
VARBR 09470 09530
09510
01670
WACO
15610
06960 00990 01050 07190
WAODR
07100
01710
WATY
15690
WIDTH 02300 02940 03370
03450
06950 0698C 07C40
WNUMB
01140
XTYPE 03600
1514C
00150 0902(;
ZERC9
10185
11090 11130 15360 1'1390
lOT
1541C
C1520
ACCePT
01800
01336
BEGPRO
05350
--------_
o
o
o
....
..
.-
04690 04700 04780 04800 0'+B90 0-49')0
0')490 O-~-630··-057T(T··06820 01780 07820
08220 08260 08350 10010 10460 10640
098 1 0 09 :{ 3 0 1.3 090
---------.-- -
02930 02940 02960 03330
03980 03990 04000 04780
08000 08020 08100 09130
08670 ORb80 08700 08790
09090 09100 09110 09140
09350 09400 09440 09480
09860 10540 13070
15190 15300
03340
06560
08420
08820
09110
09540
03650
06780
08460
08830
09190
09150
02690 02~OO 02810 02830 02840 02850
03080 03100 03320 03400 03420 03530
03680 03720 03730 03770
07200 01230
17'1
- ..-
--"
..---~ ..
-"-
0096C
16110
16600
10390
13030
15640
05030
03240
06380
06510
08530
15800
06230
15820
04340
05530
10190
09180
05690
16580
03120
15810
0943C
15910
16160
06980
02200
00740
00840
1586C
09140
10895
06950
06280
036~0
03710
03100
03150
Q~~5Q
04500
Q4560
15830
Q1685
02180
16~4Q
16570
10120
07070
QIQ1Q
I
~
09230
01600
02810
1Q630
10110
I
14330
14350
BLANKS
ooaoo
BRINST
02250 03140 05420 05430 05450 05650 14150 14160
06820 06830 06840 06850 07430 01520 07530 13900 13950
00620
00750
BUF8AS 06110
14030
COLECT 10060
COMMON 12510
1';110
COMPLT 02130
CO~PUT
04960
CONFMT 02330
CONTIN 01380
CONTRL 01400
DIMONT 08350
DMS\~CH
03810
DORCRD 05960
DOSWCH 00660
,ELEVEN 00980
ENDPRO 01554
ERRMSS 10140
EXCESS 08800
EXPROC 01574
FCTENO 07590
FINISH 03090
FLAGSW 10150
12990
FLNUMB 09320
FLOATI 16160
FLOAT2 15160
FLPCON 06940
FORMAT 00950
FR~AT1
00910
FRMAT2' 00740
FRMSCT 00940
FXNUMB 09340
FXCRFL 08280
FXPCON 07080
GOTORC 05040
HCONT1 03560
HCCNT2 03540
HCONT3 03760
HCONT4 03610
IFRCFI,. 04280
IFRCFX 04320
IFSSRC 04050
IFSWCH 00150
INCREM 01020
IOINST O19ao
LROUT2 07750
MEMCAP 04890
NOSPCE 04866
t!OTACC 07010
t:lQTCQN 06930
08910
NU~BER
QlJICI::lK 01490
PRETRN
02100
eUIEIA Q8Q8Q
PUTETB C0400
12ZJO
PUTOMG 11580
PUTOMH 10850
01596,
10230 '10560
12510 13040 14670 14100 14900 14930 14960 15080 15090
0
05100
05950 06210 10110
06460 06470
08390 08510 08650
03860 08050 08354 08550
0'>950
04150 04400
107'50
09160 09760
08160 17040 17110 17190 17250 11270
10680 11410 11430 11530 12480 12620 12670 12130 12930
14330 14410 14890 14980 15020 15100
16160
0
00770 00830 00860 00880 00890
08900 09000 091'50 09790 10140 15520
03610
03110
03930 09880 11620
06850 06870 06880 07780 07790 17030 17040
01950
08930 09240 09460 09470
Q8170
02100
13060
11890
12100
08300
02150 04170 10690 10860 11850 12000 12010 12220
13110
11910 13250 13270 13290 14420
12110 13140 13150
175
0
9
["ftf
l
-)
!
.
")
.. *u'# .. '
·w " rit
!,".\,
Hi}" 'It"UW
II,
Itrw
HUll
W"!£t!l '
V
~
13890
07150
16180
15790
0992C
0106C
00070
07820
07840
PUTPHI 03200 05180 06710 13860 13870 13990 14000 14070
RETURN__ 072~.9 __ QL?r!0 07}6_Q_______
f;VINST 04200 14660 14150 14910 15280
0520C
0110e
C745C
15590
1764C
09860
0595C
11840
15480
02900
1023C
1587C
15680
02920
0556C
STATNO
STOC02
STePER
STOPSR
SYMBSB
SYMCHK
TESTOO
TFSAVE
TRAREC
TRNSBR
TkODIM
USEOFS
WATYSC
WIeTST
XETURN
SBS~;CH
SCRIPT
SOEccr
SKPPCH
SMlOOP
SMTlUl
020ao
10610
01230
00060
07860
00640
C5390
CA360
04350
C1170
07440
06490
10070
09070
02COO
08330
15305
02430
10100
06840
01770
02670
01450
~
~-~------.
_.
05050 05160 09990 10130 10/,20
01'594
00140
07920
00670
0559C
08370
0507C
02075
C6750
08110
00690
05790
08380
0'5240
02075
07410
08120
00710
05800
09920
10760 14040 14220
08140
02210 02230 04610 05220 05210 05310
06830 07790 07800 07830 07960 08160
10030
07560
10240 10400 10460
05740 06200 06380 06610 15450
11950
153BO
02860 03020 03090 03390 03560 03670 03710
07670 07670 08210 08250 14480 14490
03520 03~90
05530 05540 05560 05620
o~--------------------------~
o~--------------------------~
/7~
,,6
.a KaJ. lilIi; guma: ullin CEa".
I)
'"
***** LISTING OF THE
*****
P~Q
-------------~-.-----------------~---
Ff:r~Tn.>\;\;
CLC2
}JROCESSU~~
--------- - - - - - -
LO--KM00050:.t26000470005416000r;4-000111000S4-000031-0139-00104'1000120024049002¥\,--JO-C035-0 1 OC2600090C0299170CU()OOOJ40- 39 ,6000UOOI.)500 /-t90QUOOr 1234567891234'5(, "'lM--COC001023900033001004qOC072051445B004656596359415~0043534372000*000036000000
lO-OOe0005003600160005003A003CU0050U3~003B00050C3600OOOOC~OO
K00009800199250000DOOOOOIIOOIUJ000-1110009ROOO-11200113000~1470009201200360(li;b-
-50016COI13CC-154500068001964900008
0123456189123456189-23456789-JJ456789-JK456189-JKL56189-JKLM6789-JKlMN189-JKLMNO
89-JKlMNOP9-JKLMNCPQ*016115230f)O-01608427R99991616135-66002616593161351500459000
4911396036001C000500360018000~00360026000S004900000000OOOOOR49001~201600103-0200
-04621611387000-124161350842747005340110034000000()10239165630010015004~900~UJ2AO
-053870211481410n69400400311122S005001600641J73692600680006411200641000-21400641
-0613J7225410C46201300260047000000430067400410430061400469490058201600000-00-*49
-0690730034000000010237172250010046006440040046008020010034000000010238161310010
-0166340000000101391722500100150073100006490081001610B64J676443008541722531112?4
~084111226490C82201417225000M34700926012002400901172274700926012-024009011722946
-0918462012001411225000P0470131401300170924A-09622600984083464401022000041500701
-0991P2601020083462601069000042AOI03~0834A26000041613S26010630834632000050000016
-10131180-0C892616290161352616141084271601192-008831167511722445011S0161S2490130
-114B201416752000-04601246012C026-00001675233-00000L1-t.1401180-00994601266012001
-1223101180000-2110119?OOO-23116751167S349011300320008800000240009916155460276AO
-1298120021i48201481931167S1172242601~77049831416752000-0311A7~11~75346015660120
-13142101~71081954~0133816752260141601S123100000011944901430031167531722431167~1
-1449167531416752COOL347015B60120031161511675345015101615649115140141675200CK446
__
---=.1524115140 12C01416 7 52000K 3470 l l t7hO 12004905198031 J1224172 26490 13860450 1442167561
-1599417225COOM641016340120011114260P1101417225000M94A04500012001417225000M7460S
-1674622012001417225000M44604436012001417225000M24701774012001417235000~74606050
-175012001515S910C0044YC046201417225000~34701B42012001417233000N6410664001300460
-1825446801200490111601417225000NQ4701B90012001417229000034606270012001417225000
-190002460107601200141 722 50uON74A0212f.,() 1200460226101100 141 7225000M 14602318012~~
-1975417225000~547116460120G1417231000N14606250012004702054013001515991000014 ~
-205046204506410172334907240043020941 7235491164601601428- 260631172241'12364901-"4
-21261417227000N94h022300120047C705601100311722417234141722500003470221001200311
-22017224112321612916-288249023Qa03117224172341612916-29544902398014172250000331
-227611224112324702366012CCI612916-291849023980311122411236141122500003470238601
-23512003117224172321612916-2798490239BOI612916-28341612911000K11411225000094602
-24264460110CI7114260P173170Y248-24S82602480084261612921-000616129250-00*27139~6
-2501139952612916027284~02~3817227490A6400141722~000K331172221722441025180120045
-25712618112271600808-2074490U~4601601428-14301500698000001709414-26422602665108
-2652643112917000004~C2690172271612916-39142713996139951210864-0009490251AOJ7039
-212738-2734N35641440G626442~q566463495545620*31172241615126C27970d346110000400Q
-2802-62602821G83461~COOO~COOOKlll~290-00062714B32148311603061000J71603546J67~R3
-2811116149C44251603491000(C~1172241722645029441122'51600808-3ql049005460141722~O
-2954K3460290CCI2CCI4172250CO-04602900012001417225000K44103060012001603551~27261
-302q603510-290016030610CO~1490352B017114260PI71470365dOl1001417225000M047039620
-31041100141722500009460404LOI10025035471722~160341900-001417275000M146032760120
-31801417225000M44703962013004603276012001411225000M94603276012001603479000-0141
-32557225000M64603962011003117224172261109?4ROOO-GI703574000-02603995172131603~5
-33301000-0440346B0347A2703~50039491417225000-3470396201200311722417226270395003
-340594914172250000941C39~2011001709249000-032172i2000002603~51172133303548COOOO
-348033035500C00032035510000C3203S47000001A03570-29121103546000-51616158-0000211
-355567510353~490C0000003217~12COOC026035491721322034911121347036460130014112130
-3632-04609448CII0017114260PI721417225000KI4703114012001603'551-32931603570-28884
-310790352804602900011U0141722~OOO-44703962U12001603551-35741603570-373249035290
-31821603812J61522103812167513100000162B925038411b15143038~400210111A751000-1261
-38516158161352116158167512714556167511600808-0810490046204]03930112354903962031
-3932112241723649C2~J~0450944J1722517114260P1711603527-4042321121200000260399717
-40012134902q1202203491039954703646013001603~70-40181603527-29121203991000-14603
-40825280110049029120170924BOOO-02103ys003Y49141722500O[J7460423B012001417225
177
il.1
---.-.-----.--~~~
..
~.~~---------~
rwr'
' .... r '
!II'
UP
')
rOO!
¥'±i'.ttW""\'"zt±fti hi 1ft
t'
t
"ttitt.
rrlU
itt t tEte
tl
nil,
--=415784--:'-039-74012001703') 740CO-()-lbO:3'5-S 1- 3690 f604-3Z-9':4350 3117224T--722616-03~~rO-428249
-42333~2BOI7035740aO-016035S1-36541604329-4406490421801603539000-232112120000026
o
-
-430935r,1172T3i603~-70:':"435-649(T3i;2R(5flfY22-4Tii26 16-6-:3570='438226635511722 5490 3~23()12
-438411213000-14604338011001603~39000-~4902900-0749000OO*I~006990000431172241724
-4459249096C2031172241723615006990000M490960203117224172301616972000MQ161152300U
-4534M91500697000C132001020COC04911526033172120000033172100000033172080000033172
-461060000024112130466146046720120017114260-076024'55562450i:00000000.3100000U51i'7i-46854112310n00947U475601100250000917237311722411240141722~0000946047h8011001711
-47604260-0171605936-00051605067000K04904984026048231086431129010000026129001628
-48353311291016324440486812901490488007713976139754404Q0412908271399613995430494
-49108129083100000n5088210000~161354~0496003100000051321605936-C04131J7224112261
-4985105918-49961405936-0041470503201200160~936-00051105936000J245049721722j1714
-5060522000M41605067000M44900462043-00240005349000000000044000000006049000000140
~5137600-00046000000120046000C00110049000000*MOOOOOOOOOOOM90000CO*31172241722817
-52139248-522226052390834A1200004000l6141122'5000K3470~2820120*17114260-018170941
-52884-5294K60001105305260000~08421260560~0842116056200-OOI1605444-S605311122417
-5363226141122500CP0460~402CI3001109474-54261109248000-02608421112131105444-0005
-543826C0000084214~05354172272600011056104405498000081500000COOOJ1714522000J2260
-55135610161352605551055641105557000J9451140R000003100000056011105564-0020260842
-55887165824900462-000U-OOOO-OOCO-0000*3117224172321417225000K446051140120031000
-566670471109248-56822600005084261714522000-849004620160~936J68233116149069841~O
-57426980000131172241722617C591e-57741116751GOO-41105936000-44305738172242116787
-58171613521167941~1352116BOnI613~3117224172281709474-58701500698000002616758084
-58922121145561615149004620000017()9248-593026000000842626U5q6408346440598~000052
-5967605984C~91749000000260600808346440601800004490596602606035083461600005-0090
____
-~6042490S96601706482-606231000C0065982100005084261114522000J62606115083462600004
-6117161352600088084277,616290161353316286000003100089163463100091162843100098163
-6192472714B681486121000061~13526000100842617145?2000J249004620320621000000490'62
-6267e20330621000C001706487-62943100000066062606~23083462100006000041714522000-8
-634244004620627026161410B4271216141000J0261629016135271482014819490046201106482
o
-6417-642231000000662726000050842621000111613~1114522000J24906640000003111224172
-6492261417225000094106482011001709248-653026065710834f2606~76083461206571000-12
-65676C0009COC092606596064814998765049-00J0049-000Q026-000K00001*JP00002-0012*44
-6b433890001013100000069471205564-0020260669905564310004000000260671806699150000
-6723t110A718-00102606754C6718260COOOI63491106754-001026067900675426000001634926
-6802600044260001100059260001800044260002300054260003000049440688000007150000000
-6879244069C4C00191S00012CuC021714522000L61101069000L64106652012004903890JJOOOOO
-6959J40000COOCOOM7000000110C*-68JL00009000-4l20009500OOOJI00099-0067K6000590009
-70349K60006500000MROOOOOO*161289~OOO~84901200031112241723226129010711549071400J
-7109702452-3117224112381612895000l41709248000-026129051721333129020000045072001
-118472251617905-0000311290616345211397613975490664004902562*3100000072321714522
-7262-81614756-1284491470201614756J459245013161666949013400430734000459381666900
-733740026166COI6135161121300RY91609473-7384490823002616605084272616610083473116
-7412611161563116661165782607491165322601474165824601904001003400000*01022607901
-749244015560790144015360789816C1614-7898490763201607A14-78924907632044076120789
-15679140790100R994607Q04012COlt07674-789949076320440171207898490751603807470001
-7644340000C*010J44077320765538000000010012074910UOJOI201474000J0490745603307655
-77244907632C39078930010C320765~000002607790074901201790000-14407~80000052607aI4
-180011904407824000064907680026078460179026~741400009340000000101380741000100120
-78757491000K0490169200000000000**4308056004594607996003003100402165964901952-01
-7950~3400000001023902735001003600000005004900000*15166440000J1616595-040238165
-8025910040038027290040038019470040034000000010239165110010026080981658826000001
-81006349260815708Q97120809BOOOJD1408098J1396460809201l001500008000002605~640809
-81758221620S1620534K0000201CZ151599100n0139165510010041NI0000000015082Z50000833
-8250163500040038164300040049004020260842716582260834616581490833601208426000-11
-8325208346000-126112230000g440C380172214408312112114908596044084281721926034261
-84007222151721900000490B312R99994~085961722345114081722226084690834626000091721
-84153440854~112133317?13000001517214000D*31000891720426000880842721148681486743
o
-85518864006991411225000K447113321)120017114260-072241721317223460831201400410831
-8626201200241122311213460831201400311721510899240834116588471130801100250871408
17g
------------
-81014264308128002001108426000-1160d782J6105260817S084263208174000001108782-0000
-81161516105000011508427000001617225000M61511591000001609413-8844491134401500697
-885 5149125F,~Oi60S 12-308427141122')000K4460892001200440919200699490912401208346000
-8930-126089g7083462609117083461109122000-13117222172241109248000-0261999411213~
0
-9005117222172241411223000-44609224012002617223112131709248000-02317223112133200
-9081960000C3117222172242209122000991619999-000045091561722715006990000049004620
-91561417~25000K331172221722446092040120017114260-019450960211227490919202209122
-92311121349091120000016172090-0001609290J12091109290000-12511210172253117222172
-930624450932817225490~37A01417225000-046092960120014112250000946092720110014092
-938190J721346104620110C26C94230929026172130000032112100000044094500924642260941
-94563092414Q08280000001417225000-31511597000004609850012001417225000P0460985001
-95313001417225000M846095660110C490960201411225000N54609602011001511597000021609
-9606632J12052611214114892617205172253111222172241109632000-2141722S000M04610530
-96821300331721200000331721000000331720800000331720600000490828001410008J1210151
-975715970000246104620110016172050-000260981310008261721400000321121300000321121
-98384908280000002617213082351609849J01181610008J72061417225000P0410993001200311
-991372241122649C9B8601417225000~34610058012001411225000094709742011001410008J12
-9988134610014CII002500000172253111224112261110008~000IJl11205000-14909930026102
J006320100081417205000~!14hlul06012001609849J02262610160098491211205000-131172241
J013812261411225000P0460000C012004110246011001610160JO2261410220J121346102260110
J02142500000112251110220-0001491013001417225000M54710438012002610436100481417227
J0292K04710330013004110342012001510421000023117224172262510431172273117224172281
J0367417225000C94710426011C02210436104312510437112253117224112261117205-00004610
J0442462014004410414172J517114260-0731511591000003217213000004308280172061617205
J0520-049082RC01409632J721541096260120044046400070249045680261060808346121060900
__-=J~0596J0440e584COOC5261C632106084410642000064908584015006980000231108891089826108
J061193084211110892000-12610124083461210124000-12600004000041111084J073831000051
JC74661372210892112811411725000K346109080120044110000000931112241122615006980000
J08222510896115974311376001001110864000-9310000010889261088809473499816500000000
J0898-DOOOOOOtOl111084J092031000101613123000041128732000960000022108920009921108
J091392000044411000000144~lC786ClI11387000-12610895113811311387000J51611066J7203
JI048221106600099310000000C014910798000001511217000031616141-000-16112870-000311 ~
J11231224112261411225000094611252011001709602000-22616141084211417225000J0461124
J120012001417225000K047112880l2001511217000023117224172261709248000-026112871721
J12753331128700000261130611083490000001417225000K4461051401242431133000698311088
J13509108982f.l089308427491082203210896000-01500100000004910846017114260-07400000
J142626115111142539114910010015004590000J1500731000014903890-00000000H55959~6590
JI50255560300000*16115230-0-0161511100-001615020J69121610864J6164451183417227141
J1577152300CL346116~dOll001411523000KM4611646012001411523000K4411245001200171142
JI65260-0111712932000-04415dI400696431175012908431113012924441177012906441180212
J1121922330069600000491581404311106129244911130031128961290131129011291149160420
J1802261290012905261290512921491603001411225000M04111882011001500697000001109474
J1871Jl~621411225000L346119180120033006960000014172250OOJ04612142012001417225000
JI952K046121300120015006910()OOOI411225000-44612294012001417225000K14612498012001
J2021417225000J44612206012001417225000K44612262012001411225000134612510012001417
J2102225000-34611858012004911646015007000000543121740069115Q07000000049124500150
J21786Q7000C0311122411226491156201417227000J441124980120031112221722415007000000
J225354912546C1500~97000011115111000-14914990014115230OOL34611646012004412354007
J232921411221000K34604156012001411523000K44612834012001411523000KM46127420120014
J2404115230COM6461')462012001411523000M94604800012001411523000J046131600120014115
J247923000KC4613444012001411523000K1461354001200141152300CJ446135200120014115230
J2556JM461~C9001lC01500697000011512B95000062612629108641212629000-93112896000001
J263151290600000441499012902441261412904491499001612905-006021139761397526121281
J2106262911121280CO-832000000000049122740261211110864261282810864311290100000441
J27812810129083312908000004912822032129C8000003100000129013111224112261215020000
J2856-2261288115020261152300000491156200000260006000000-00*270048000000-00*00000
J29322612900162831612911000K1261301~108642612991108643112911000001213015000-9311
J3001290100COG431304212924431312812908424313114129081411523000JM4616090012001411
J3C82523CCOl346157780120017i14260-0751113675000M0421411523000L346157580120049131
J3158201613675J62111112Q32000-0441330412908441339212Q2415007000000~4413264129233
____
,I
,I
I
.
/79
.
0
'-
· . -tj"f"'"W'''
.. 'IT
!!!T'Utrr""f[ill
.
t'
"j
7["t&*
f"t .tir .11*_" #Ht 't ....
---- --J32331129'1-11290116136770001"Jt,,91 3664044132 8412907491324401613617000KP49136640441'3-' ---J330837212~244413360129231~C0700000041113675000-5491323201113675000-515001000000
J3 3844913220044f3412-1-i9234-Cj1336-00 f~-007-00000-041113675000-549132640 1613675J6211171
O J35341355201613675J62311712932-0000441363212908441364412924150070000000441326412
~J3459293200C-C44135001292433129240000049131840321292400000491318401613675J622149
J36099231113675000-5491~23204413~88129241500700000054913600026129160000041139761
J368439754413712136772"713996139951210864000J82617213151111609473J375649082800261
J3159378610B641113186000-63200000000001215020000-2261382715020261152300000141722
J38345COO-44612354C1200451387217227491157401411221000J446122300120014115Z)OOOK44
J3909614990012001411523000KM4614990012001411523000l3461499001200491150201614031J
J3984289449140-801614031J2910310000014158310006000000431408800012431408800073161
J40594521000J2310COOC00060491452204414056000723300013000001300013000J51614159J12
J413532214159000993100081000C026000470007144141961453026000410006645143240009026
J421359000893100000000362600006161351100006-0035441428014~301200006000-526000180
J42916120001ROOO-116145210COl649145220441434400094491420801614521000P22100042161
J436635210005416135260000600C942600011000842600035000894414452145301200042000-51
J4441200054000-5441452200035120004L-00121200054-00123100024000361614521000004914
J45165220003314522000002~14~~51452149145680003214522000001414634J666946147020130
J45924414628145222500000167~231167~21615325J6594000003100000000011116135-0001111
J46614634-0001121455S000-14614~6801100421614634J6594431413800459381658900~002616
J41425931613S4914592013-0000-000032000960000021-0099-000016-0011-000022-0010-009
J48119f03316286000-03100089162843100096163452600088161413300084000001414958J6144
J48924714952013004314928004593816669004001614958J666915166690000*31J666900084150
J496979GOOO*1114958-0015424315058007001115020-0002260000011225261152317225311122
J504441122649115620321722~00000150070000000491500201613675J62411112932000-015162
__-=J~512511516198CC0014415162129241113675000-544152901292331154461290116129080-00026
J52001290G1292116129C5-00607.7139161397531129011544626129001628344153661290727139
J52757613915491530204415366129074415346129082612905163351613677000KP491366401613
J5350677000MJ4913664044153261290831154461291026129221633621139161397521139961399
J542553112910154464915346o.00000000000000001112932000-026129161290531112221722444
J5500155901292444156461292344155461290815007Q0000021613611000KP31128941632416129
J551521-0060491361604415714129231613617000MJ441551012908150010000002491551004415
J56506701290A150070000002261290016283311290112911271397613915491554601613677000M
J5125J4413676129081S0070000C02491367601615849J6292491519001615849J63081615883000
J5800K13300696000003115446129013112901129113112910162924415810129074915882021139
I
'"
!I
~
J~815161391541139961399544159301290831129101632427139961399531129011544631160811
J595029012612900129051612905-00601615883000M141160100069649160300311289416014491
J60256042032145300000027139761397533145300000049066400J7-2586R050--00*1613615J61
J6100251511591000004915138-2000-196400000*OOOOO*OM65659544163--00000000000000000
J6206t-04RO-0420-1128-1128-13d2-1346-218B-2152-1614-1590-1644-1644-1722-1686K600
J628260M900000*K70229802297-00*K70239202391-00*K10181601815-00*-0000000**15--240
J6361*36000800050J4900104044000920016149001040000026000140016426000000011431-016
J643911545000560016C360016000S0044000320016026001460016431000000016549001040N759
J651456434562624955470043565457534563450f02634159630*N66545595341510*J9999*00000
J73841117411000K01500000000~031J999911405451138400000261658211414261658816582311
J14597841005002517820178412~1182117843251182211845251182311841311784011848141782
J15343-00004617152012004S1751617849371184100500161801100-00261800917841261761816
J76095882600Q00180111216588000J01617671J80001111671000-2431764818002261169017671
J16843100000118262611714165832600000180il1216588000JOl211823000-14911516016J7225
J1162-fl111758000-21417158J738447117520130015000190000*4908080-00000046000000000
J7838*OM1414141M1414141M1414141M1414141M1414141M141414IM1414141M1414141M1414141M
J19131414141M1414141M1414141M1414141M1414141M1414141Ml414141M14i4141M1414141M141
J798g4141M1414141-tM141414141410000000000000000000000000000000000000000000000000
0*000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000001C203040002040608000306090210040802161005001510200602181420070411282
00806142230090817263000000000050601080900121416181518112427202428223635203530454
03632484455324946536048465462754453627180123456789123456789-23456189-J34~6789-JK
0008SlN COS EXP lOG SQRlABS DRH AlAN
e~~~----------------------IgO
-
----.---
LCCTN
004C2
CC4C2
OC414
00426
00438
00450
... _-----
CP
P/L
Q
11453
C8357
16G6?
16523
00459
000-0
R9999
-66CO
16065
CCOCO
16
24
47
34
39
15
26
47
37
16
26,
12
14
41
26
43
43
49
11317
16065
C0534
00000
16493
00459
C0702
00694
17173
00641
00680
00641
00641
00462
00470
00674
00614
00582
000-1
08357
01100
00102
OC100
OCOOJ
11417
00400
CC5CC
J7317
00641
OCO-2
J7173
01300
00000
00470
00469
00000
OC45C1
00462
00474
C0486
00498
COSIO
00522
00534
00546
00558
00510
00'i€2
00594
____~C606
oe618
00630
OC642
00654
00666
00614
00674
00685
00686
00694
00694
CC7C6
00118
OC130
00742
00154
OC766
OC778
OC79C
CC802
00e14
OCB26
00838
OCAse
OC862
00814
00386
008Cj4
00894
OC906
OC918
00930
OC938
00938
16 00000 -0000
2
49 00730 COOOO
34
37
46
16
25
25
25
25
25
46
43
39
46
34
39
15
49
OOOCO
11173
00694
17171
11167
17165
11163
17161,
17159
00838
00838
17157
00886
COOOO
11159
00839
00894
CCIC2
COlaO
00400
0-000
16065
16064
16063
16062
16061
C0200
0(;459
00400
0OlCO
e0102
CC1CO
00006
OCOOO
16 10194 J6~94
43 00938 17113
31 17172 17174
49 00906
ocoeo
14 11173 00OM3
- ----
--------_...._-------- ._- - - . - - - - - - - - - - - - - - - - - - -
MNEM OPERANDS AND REMARKS
PAGE
PG LN
LABEL
00 000
** PDQ FORTRAN PROCESSOR ClT2 10/63*
OCRG 402t
INITL TFM O~P.'l,O,10:l=TFM S~CNT,99999*
TFM l
,6600*
lOAD,L:f:
TF
TOM SKPPCH,O:tSKPPCH OS
,*-2*
BEGIN TF,.. SUBN,1,10*
l,SMCNT:t
C
BNH -&48*
ReTY :I=WATY OVERL:t
TOM St31
14
31
47
45
16
ceoco
OCOOO
-2726
10794
ceooo
17175
-3914
13925
-0009
OOOCO
16681
08276
000-6
08276
PG LN
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
COOOK
C2
-0006
14761
000J7
J6688
04509
02
02
02
02
02
02
02
02
02
02
02
02
COOQO
1-/174
17173
-3994
00000
OOOK3
012eo
oeo-o
01200
eCOK4
01200
-2726
-2984
02
02
CCOpll
02
oeooo
02
02
02
02
02
02
02
02
02
OP171
01100
OOOMO
01100
OCOC9
OllCO
17113
02
02
02
02
02
010
020
030
040
050
060
064
070
075
080
090
100
110
120
130
140
150
160
170
180
190
200
210
220
230
240
250
260
270
280
290
300
310
320
330
340
350
360
370
380
390
400
410
420
430
440
450
460
410
480
490
500
510
520
530
LABEL
,.,NEM OPERANDS AND REMARKS
PAGE
DGRG *-3*
CHI,23,10=t
C~
ChI-3,CHI-l=t
TR
BNE 102*
,CHI&2*
BNR
*t44
,CONIO:t
TFf" BRCt6
PEGINt84t
B
OGRG *-3*
TFt': SCECCO-2
,SDECOO*
TOM seSWCh=t
BTM CSORN,*tI2*
TF
*&23,PUTETB&6*
TR
INST2&7*
BNR *&24,CHI&2*
TFM INST2&6,COMPlT=t
BT
PUT2,PUT2-1*
SM
PUTETB&6,9:t=
B
102*
OCRG *-3*
IOINST BTM SWC,LSUBS-l,07*
LSUBS OAC 17,LOAD SUBROUTINES~*
CHI-l,PHI-l*
FORMAT TR
*&17,SMTlU1&10:t=
TF
4,6,10f
A~
*&17,SMTlUl&10f
TF
TOM 5,2,11*
A~
BRINST&6,6*
BGO&12,BGO&11:t=
8T
TFM SWlP&l,11,10f
TFM TRANStI8,PHI&6*
TI{
PHI-3,FMTSP-IO*
,80
TFM WIDTH
,10*
FSCAN Tn
CHI-1,CHlt1*
BNR *&32,CHI*
TFM BRC&6
,CONfMT*
HEGIN&H4*
8
bORG *-3*
Ct-1I,23,10:l=
CM
FSCANt
BE
CHI,,10:t=
C~
FSCAN-t
BE
CM
CHI,24,10*
BNE SWlP*
TfM TRANS&23,lTPAR*
TfM TRNSBR~6,FSCAN*
TFM SWlP&I,41,10t
B
TRANS*
OCRG *-3*
BTM ERROR,7171,8*
SWlP
3NH
PUNCT*
eM
CHI,40,lO*
BNH
ChCHI&12*
CfII
CHI,69,10*
BH
hOlL*
Te
TRANS~19tCHI*
;gS
"0-
0-
----
0-;
------ ---------------------------------_..
0
"
0
0
LOGTN
OP
P/L
Q
03228
03240
03252
03264
C3216
03288
03300
03312
03324
03336
03348
03360
03312
03384
03396
03408
03420
03432
03444
03456
03468
16
14
46
14
41
46
14
46
16
14
46
31
17
11
26
16
44
21
14
47
31
03480
27
CO-CO
OOOpl,l
012CO
CCOM4
01300
01200
OCOM9
01200
000-0
CCOM6
01100
17174
000-0
000-0
17143
000-0
03562
04033
000-3
01200
17114
C4033
03492
03504
03516
03528
03540
03552
14
47
17
32
26
33
03563
11113
03360
11113
04046
03360
17113
03360
03563
11113
04046
11172
09178
03658
0407g
03635
03552
04034
17113
04046
17172
04034
11113
04,046
09118
17142
03635
03632
2
C3~63
03564
03516
03588
C3600
C361Z
03624
C3636
C3648
C36S8
03658
03670
C3682
03694
03706
03718
03130
03742
C3154
03766
03778
C3790
C3798
03798
C3810
C3822
03R34
33
32
32
16
11
16
21
--~-
00009
01100
000-0
00000
17143
oeooo
03634 00000
03635
03631
03654
03630
16688
16681
49
ooeoo
32
26
22
41
14
46
17
14
47
16
16
49
17142
03633
03575
03730
17143
09378
11356
17173
03798
03635
03654
03612
46
14
47
16
02984
17173
04046
03635
00000
ccenc
-2996
000-5
-0000
03623
00000
COCOO
17143
17143
01300
coo-o
01100
OP172
CCOK1
01200
-32gB
-2972
oeoco
OllCO
000-4
01200
-3514
_. -
------~.-~--------.-.-----.-
PG LN
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
02
03
03
03
03
03
03
03
01
03
540
550
560
510
580
590
600
610
620
630
640
6'30
660
670
680
690
100
710
720
130
740
750
760
110
780
7g0
80C
810
820
830
840
850
860
870
88C
8ge
900
910
920
g30
940
9'50
960
970
980
990
LABEL
-.
------------------.-~--
M.NEM
..
Tf~
EFINO,,9t
ChI
HN
*&36:t.
,41
TIER*
eM ChI,44,lC,*
BL
GHCHI&12*
BE
TIER:t
GM
CHI.49,10*
TIER:!:
BE
TFM EFIND"lO*
C~
CHI.46,10=t
8H
CHCHI&lZ*
TR
CHI-1,CHI<
TIER
BTM CFXN,OO,lO*
WIDTST,,10,*
9TM
,SYM:t=
TF
RPFMT&21
TFM TRANS&23,OQ,10:t=
BNF PRETRN,EFIND-l*
8T
CHCHI
,CHCHI-1*
CM
CHI,03,10*
BNE CHCHI&12.t
TR
CHI-1,Ct-II&1*
,CHCHI-1:t
CHCHI
8T
CHI,69,10:t=
CM
BNH
CHCHI&12:t:
8TM CFXN,,10*
SF
SYM-1:t:
TF
TRANS&23,SYM.t
PRETRN CF
TRANS&20:t:
EFIND OS
2,**
CF
TRANS&22*
TRANS&23:t
SF
SF
TRANS&19*
TFM TRNSBR&6,FSCAN&12*
*&18,5,1C:t
TRANS A~
TFP-1 PHI&6:t:
PHI-1,TRANS&11t
A
TRNSBR B
*
oCRG *-1*
SYM-l:t
WIDTST SF
TF
TRANS&21,SYM*
WIDTH,SYr;,*
S
CM
SYM"lO=i=
I3H
CSORN-26*
ERROR,1172,8*
CHI,21,lC:t
*&44*
TRANS&23,SLASH.t
8TM
PUNCT
C~
DOC
BNE
010
020
030
040
050
060
070
080
TF;I
TFM
.. _---
------------
----------_ .. -
OPERANDS ANC REMARKS
CM
BE
-
PAGE
,104: .
TRNSBR&6,FSCAN-12~
B
TRANS*
OORG *-3*
BH
FSCAN*
eM ChI,04,10:t
nNE CHCHI&12-t
TFM fRANS&23,RTPAR:t
/80
6
,.-
_._ ..... _
• __ ._ .. _ ... "._._. _ _ _ _ _ ••• _ _ _ _: . . . . . ' _ . _• ..;. __ ~._ . . . . . u
...... -
. '" ..",""'."_....__....
.-........ "......-....,.. ............ -.........
~
,~,,_,,
.... , ......_.a."'.". ..".. """ ".. _" , ,. "...."." ,,','
~,'
•,.•• ••"'.A ....~" ...,•.•"......... ".. ,.... _~ ....."....."........ ''' ...................... _.... .... ,__ ,.....................' ...........................-....." ........ ~ ... ""'.-...-~ ......... ,.~-" .. ""........ ~ ...."'.... "'........... ,~"'.,,,.,.~" .., ..... ,.,.~""' •. I".-,,,
•• " "..,,,', ."',"'~,.,I ... "••. " I.",,, ." ...
,!
I
I
- - - - - _.. _-
I
I
!
r
I
I
I,
LCCTN
CP
03846
03858
03866
03866
03878
03890
03902
03914
03926
03938
03950
03962
03974
03G86
03S94
03994
040C6
04014
04014.
04026
04034
04034
04046
04058
04070
04082
04094
041C2
04102
04114
04126
04138
04150
04162
04174
04182
03575
04182
04194
04206
04218
0423C
04242
04254
04266
04278.
04290
04302
04314
04322
04322
04334
0434(:
04358
04366
16 03654 -3866
49 03612 00000
16
21
31
25
'43
11
26
21
27
16
49
P/l
03896
03896
00000
03925
03938
16681
16688
16688
14486
00892
00462
Q
J6682
16681
16219
16681
00210
000-1
16065
16681
16681
-0894
00000
43 04014 17183
4q C4046 OCOOO
31 17172 17184
49 029R6 00000
45
17
16
32
26
49
22
47
16
16
12
46
49
17
2.7
14
46
14
47
17
16
16
31
16
49
17
16
16
49
OQ378
11356
03611
17142
04081
02996
03575
03730
03654
03611
04081
03612
02996
17173
OP171
-4126
00000
17143
ocooo
04079
01300
-4102
-2996
000-1
011CO
00000
09178
04034
17173
04322
17173
C4058
03658
03635
04413
17172
03654
03612
GOO-O
04033
CCOC7
01200
000M8
01200
000-0
-3690
-4434
17174
-4366
03658
coo-o
ccoeo
(,3635 -3654
04413 -4490
04302 OCOOO
PG IN
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
C3
03
03
03
03
03
03
090
100
110
120
130
140
150
160
170
180
190
200
210
220
230
240
250
260
270
280
290
300
310
320
330
340
350
360
310
380
390
400
410
420
430
440
450
460
470
480
4QO
500
.510
520
530
540
550
560
570
580
590
600
03
03
03 610
03 620
03 630
LABEL
MNEM OPERANDS AND REMARKS
TFM
B
OCRG
FINISH TFM
A
TR
TO
SD
AM
TF
A
BT
·TfM
B
DORG
CONFMT BD
B
DORG
TR
B
CHCHI
RPFMT
DOR.G
BNR
BTM
TFM
SF
TF
B
RPT2
RPT1
OORG
S
BN
TfM
TfM
SM
BH
B
WIDTH
HOll
OORG
OS
BTM
_BT
CM
BE
CM
BNE
BlM
TFM
TFM
TR
TFM
B
OORG
BlM
TF~
TFM
B
CCRG
PAGE
0
7
TRNSBR&6,fINISHt
TRANS:t
--3*
-&30,PHI* .
*tI8,PHI-l=t
,BRINST&5*
*t23,PHI-l*
*&24,210*
PH 1-1, 1, 10* ,
PHI&6,l*
PHI&6,PHI-l:t
PUTPHI,PHI-lt
BRC&6
,BRCt8*
BEGIN:.f:
*-3*
,CHI&10t
*&20
CHCHI&12*
"-3*
CHI-l
,CHI&11*
FSCAN&12
,5*
*-3*
CSORN-26 ,CHI*
ERROR
,7111
,8*
TRANS-1
,RPT1*
SYM-l*
.-1
,SYMt
FSCAN&12:t
*-3*
WIDTH
,RPFMT&21*
PUNCT-12*
TRNSBRt6 ,RPT2*
.,fSCAN&12:t
TRANS-1
RPfMT&23 ,1
,10*
TRANS:t
FSCAN&12*
*-3*
,EfIND&12*
CfXN,,10:t
,CHCHI-1:t
CHCHI
CHI,61,10*
*&104*
CHI,48,10*
RPFMT:t
WIOTST
,10*
lRANSt23,HTYPE*
HOlll&11,HCONT2*
CHI-l,CHItl*
TRNSBR&6,HCONTlt
TRANS:t
*-3*
,
WIOlST
,10*
TRANS&23 ,XTYPE*
HOlll&11 ,HCONT4&24*
*-56*
,
0
,
·-3*
0
187
')
. . . PM
0
-----. -
_. ---
------------
()
LCCTt\
CP
P/L
C;;
04366
04318
04390
04402
04414
04422
04422
04434
16
32
26
16
49
03623
11142
03635
03654
03612
000-2
COOOO
17143
-4434
00000
0444f
-0
04458
04466
04466
04418
04490
045C2
04509
04519
04520
04532
04544
04552
04552
04564
04516
04584
04584
04596
04608
04620
04632
04644
04652
0~652
04664
04616
04688
0
0410C
04112
04724
04737
04756
04768
04780
04792
048C4
04816
04828
04840
04852
04864
04876
04884
04884
04f!96
04 <;08
PG LN
LABEL
03 640
HCONTI TFM
SF
TF
HOlli TFM
B
DORG
HCONT3 TR
HCONT2 TF"
TF
03
03
03
03
650
660
610
680
03 6'10
31 11112 11114
16 03654 -4466
26 03635 11113
49 03612 oeoco
12 17143 000-1
46 04422 01100
16 03623 000-5
49 02984 COOOO
11
15 00699 OC004
31 17112 17190
49 09532 00000
31 11172 11184
15 00699 OOOO~
49 09532 COOOO
31 11112 17178
16 16902 00OM9
16
11)
32
49
11453
00697
00102
11456
COOM9
00001
COOOO
OOOCO
33
33
33
33
24
46
17
11142
11140
11138
17136
17143
04756
11356
10
00000
17185
04840
00009
11172
17113
04852
11356
C6020
05151
05068
00000
00000
00000
COOOO
04745
01200
0-"076
31
14
47
25
31
14
46
17
16
16
05261
00009
01lCO
17185
17188
00009
01100
0-071
-0005
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
03
04
04
04
C4
04
04
04
04
04
04
04
04
04
OOOKO
04
26 04907 10194
04
04
04
04
04
49
ceooo
31 12831 OOOCO
26 12830 16213
100
110
120
130
140
150
160
110
180
190
800
810
820
830
840
850
860
810
880
890
900
910
920
930
940
950
960
910
980
990
000
010
020
040
050
060
070
08C
090
100
110
120
130
140
150
160
170
180
190
PACE
MNEM OPERANDS AND REMARKS
8
TRANS&11,2,10t
SYM-1*
TRANS&23,SYM*
TRNSBR&6,HCONT2*
TRANS*
--3*
CHI-l,CHI&l*
TRNSBR&6,HCONT4t
TRANS&23,CHI*
<
B
TRANS*
DORG --3*
HCONT4 SM
SYM,l,IO*
BP
HCONT3*
TF" TRANS&11,5,10*
B
FSCAN*
DORC ·-4*
FMTSP DC
11,74900000.*
DIM
TOM OMSWCH,4t
CHI-l,CHI&17*
TR
B
COMM
IF
ER6
SENSE
IFSS
ER7
TEN
DORG
TR
TOM
B
OORG
TR
TFM
TF"
TOM
SF
B
OORG
CF
CF
CF
CF
cst
.-3*
CHI-l
,CHI&ll*
,~
OMSWCH
CSt
·-3*
CHI-l,CHI&.5*
PHI&220,49,10*
OM"1,49,10*
FSTSW,I*
IFSWCH*
ASCAN&12*
--3*
SYM-l*
SYM-3*
SYM-5*
SYM-7*
SYM,SENSE&8*
C
BE
IFSS*
BTM ERROR
!16
-OAC 10,SENSE*
TR
CUT
.IFSSRC*
CHI&12,69,10*
CM
BNH
-&60,*
T[)
OUT&9
,Clil&12*
TR
CHI-1,CHI&15*
CHI,69,lC=t
CM
BH
*&24*
8TM ERROR
,71
,OUT&5*
TF" KK&6
TfH THAT&11,20,10*
B
ELEVEN&12*
DORG --3*
TF
*&23,PUTETB&6*
TR
INST1&1*
TF
INST1&6,TFFAC*
,11*
,8*
,8*
18g
I .
er11"
-._-"
~~-----------------------
-~
0
-- ._-- ..-._----
CP
P/L
054t2
05474
46
17
17
26
11
26
45
26
44
C5486
09404
09178
08357
05528
OOCOO
05438
00011
05-;82
05498
0551C
05522
_.___05_534
05546
05558
05570
05582
OS'i94
05606
05~la
05630
05642
05654
05666
05678
05685
___
o5689
15
cocoe
17
26
26
11
45
31
11
26
49
14452
05694
05641
05641
11338
OCOOO
05648
08357
()0462
31
14
46
31
17
26
17
49
00005
ce005
00005
00005
1
11172
\11173
05798
00000
09178
00005
14452
00462
051,'14
05699
051C4
051C5
05706
05718
05730
05742
05754
05766
05178
05790
C5198
05798
05810
05822
05834
C5846
05858
05870
05882
05894
05Y06
05918
05930
05942
05<154
05966
05978
C599C
06002
C6014
06026
0
..
LeeT"
0548~
0
-
06038
16
31
15
31
17
11
11
43
21
21
21
31
11
15
26
27
49
17
26
26
44
06020
16679
00698
11112
06002
16681
06020
05822
16717
16124
16136
17172
09404
00698
16688
14486
OC462
09178
_
.. -
0
C1300
-551C
CCG-O
17143
-C005
CH357
17175
0'5694
COO08
CCCCJ
OCOJ2
160615
05648
OOOJ9
OCOOO
05685
-C020
16512
00000
-cooo
-cooo
-----~---------.-
PG IN
04 75C
04 760
04 770
04 78C
C4 790
04 800
04 810
04 820
04 830
C4 840
04 850
04 860
04 862
04 864
04 866
04 870
04 880
04 890
04 900
C4 910
04 920
-------.-
--
-
LABEL
._.-
--_ .. __ .. -._--
8~L
A.rw:
TF
BNR
TF
BNF
TeM
BTM
TF
TF
AfA
EMM
BNR
TR
AfA
TF
_ ..-
-
- ---- ._ . . _-----------.---------_._-_.-
----_._--_._--_._--
AND REMARKS
*£.24*
(S a Rf-: , * E. 3 6*
CFXN"lO-t
SMCNT,SYM:t
*&18,5*
,SMCNT:t
Ell,CHI&2:t
OUTSll
,DSADO&.5*
,OUTt8t
*E24
,1
OUT
PUTX,12,lO:t
DSADOt5,l:.t:
,EMMt6*
*&35
,19
*&23
NCSPCEt
,OSAOO-4:t
PAGE
,11*
,10*
~-6,20:t
SMCNT,ME~CAP-l*
BEGINt
B
DSADG
- - . - -
_.
-
Mt'\EM OPERANDS
BTM
BTt-1
TF
KAY
--
OORG ·-4t
OSA 0,0,0,0*
-0000
-cooo
17180
OOOK4
01200
07131
-5766
08356
000-8
00000
J6753
C1068
OOOCI
17174
-5858
OGO-4
000-4
17172
16065
1606')
16065
17176
-5954
00000
CS3')7
16681
ococe
-6014
OOOOC 08356
06048 08276
06070 COO05
04
04
04
04
04
04
04
0')
05
C5
05
05
05
05
05
0!1
05
05
05
C.5
05
05
05
05
05
05
05
05
930
940
950
960
970
980
990
000
010
020
030
040
050
060
070
08C
09C
100
110
120
130
140
150
160
170
180
190
200
05 210
05 220
01)
230
l,@:t
ChI-l,CHlt7*
CHI,24,10*
COMPUTt
,GGG:t
OlJT
BTM CFXN,*&12*
QUT&S
,SMCNT-l*
TF
BIM PUTX,8,10*
BEGIN:t
n
OURG *-3*
COMPUT TFM KK&6,PHI&71:t
Tf{
PHI-3,GOIORC-3*
SBSWCH,1t
TDM
CHI-l,CHltl:t
TR
RTM STATNO,*S12*
AfoI.
PHI -1,4,10=1=
KK&6,4,10=1=
At-i
BO
COMPUT&24,CHI-l:t
A
PHI&31),l*
A
42&PHI,l*
54tPHI,L:t
A
CHI-1,CHI&3* .
TR
BTM CSORN,*&12:t
TO~
SBSWCH,O:t
PHI&6,SMCNT::t
TF
PUTPHI,PHI-1*
Bf
B
BEGIN*
STATNO 8TM CFXN,*&12*
r"KK
,SMCNT-l*
*£22,SMTLUl&lO:t
TF
3NF *632,5*
GOTO
rr··
DC
TR
CM
BE
TR
1-
/90
10
-
..
d
'I
-------
lOCTN
06050
06G62
06069
06070
06082
06C94
06102
06102
06114
06126
06134
06134
06146
06158
06170
06182
06194
0620(;
06218
06230
06242
--06254
06266
06278
06290
06302
06314
06326
06334
06334
06346
06354
06354
06366
06378
063<)0
06402
06414
06426
06438
(
06450
06462
06414
06486
06494
06494
065C6
06518
06530
0f.542
06'i54
06566
06578
" Of59C
06602
GP
P/l
Q
26 06068 06001
49 00000 COOOO
26 06092 08276
44 06102 00004
49 06050 ceoco
26 06119 08276
16 00005 -0090
49 06050 COOCO
17
31
21
17
26
26
26
26
33
31
31
31
27
21
26
17
49
06566
00000
00005
14452
06199
00004
00088
16220
16216
00089
00091
00098
14798
(JOOO6
00010
14452
00462
-6146
06682
08356
000J6
C8276
16065
08357
16065
OCOOO
16276
16214
16271
14197
16065
08356
COOJ2
OOOCO
32 06354 COOOO
49 06366 COOOO
33
17
31
26
21
17
44
26
12
26
27
49
06354 00000
06566 -6378
COCOO 06690
06Lt12 08276
00006 00004
14452 ceO-8
00462 06354
16071 08357
16071 OCOJO
16220 16065
14750 14749
00462 COOOC
PG IN
MNEM OPERANDS AND REMARKS
05 240
TF
05 250
05 260
B
05
05
05
05
05
05
0'.)
05
05
05
C5
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
05
17 06566 -6506
31 oecoo 06711
26 00005 oe356 ' 05
21 00011 16065 05
11 14452 OOOJ2 05
49 06724 00000 05
31 17172 17174 05
14 17173 0(009 05
06566 C11CO 05
17 091,8 -6614 05
4,
LABEL
210
280
290
300
310
320
330
340
350
360
310
380
390
400
410
420
430
440
450
460
470
480
490
500
510
520
530
540
550
560
570
580
590
600
610
620
630
640
650
660
610
680
690
700
710
120
730
740
750
760
710
180
DORG
Tf
BNF
B
DORG
TF
lFM
B
DORG
BEGPRO BTM
TR
A
6TM
Tf
TF
Tf
TF
CF
TR
TR
TR
BT
A
TF
BTM
B
DGRC
ENDPRO SF
B
OORG
XETURN CF
BTM
TR
TF
A
8TM
BNF
TF
'SM
TF
PAGE
11
0
*&IB,STATNO-l:t
:t
*-4*
*&22,SMTLUI&10*
*&20,4*
KK&36*
*-3*
*&17,SMTLUl&10t
5,90*
KK&36*
*-3*
GETNO,*&12*
,BEREC*
OUT
OUT&5
,SMCNT-I*
PUTX,16,10*
*&11,SMTlUl&lO*
4,L*
88,SMCNT*
BRINST&6,L*
BRINST&2*
89,CRAM-3*
9I,BRINSTt
98,CRAM-~*
COMGO,COMGO-l*
OUT&6
,l*
,SMCNT-l*
OUT&10
PUTX,12,10*
BEGIN*
*-3*
XETURN*
XETURN&12*
*-3*
XETURN*
GETNO,*tI2*
,BERECt8:&:
OUT
0
*&22~SMTLUl&10*
OUT&6
,4*
PUTX,8,10*
BEGIN,XETURN*
lODER,SMCNTt
lODER~10,10*
BRINSTt6,l*
BGO,BGO-1*
B
BEGIN*
OORG *-3*
EXPROC BTM' GETNO,*&12*
, EXREC:.t
TR
OUT
TF
OUT&S
,SMCNT-l*
,lt
A
OUT&11
8TM PUTX,12,10*
B
TESTDO*
GETNC TR
CHI-l.,CHI&l*
eM CHI,69,10:t=
BNH *-24t
8TM CFXN,*t12*
BT
0
/9/
I
I
I
'I
,
'I
.----"-----,--.--.~---,---
-----.--
---------------
----I
---------.---------_.--------_.- ------------- ------- ---------
0
lCCIN
CP
06614
06626
06638
06650
Ol:J662
06614
06681
06682
06690
06690
06698
06698
06710
06711
06717
06723
06724
06736
06748
06760
06772
06784
06196
06801
26
26
12
26
26
49
06B08
C!
0
06820
06832
06844
06856
06868
06880
06892
06904
06916
06928
06940
06952
06964
06976
Ot988
07000
07012
07024
07031
01031
07042
07054
01067
07070
01C71
07080
01082
07094
071Cl
07106
P/l
Q
06655 08276
C6660 08276
06~55 000-1
00009 00009
06680 C6565
98165 00000
49 -OOJO 00000
4<) -0000 00000
26 -OOOK
1
1
6
6
44 03<)74
31 00000
12 05648
26 06183
31 00040
26 06802
15 OOCOO
1
11 C6B02
26 06838
26 00000
11 06838
26 06874
26 00000
26 00006
26 00011
26 00018
26 00023
26 00030
44 06964
IS 00000
44 06988
15 00012
11 14452
11 01153
47 06736
49 03974
1
11
12
13
3
1
9
2
12
7
'5
00001
C0701
C7031
-G020
05648
COOOO
06783
00000
-0010
06802
16279
-COlO
C6838
16279
00044
00059
00044
OC054
00049
00007
00002
00019
00002
OOOl6
00016
01200
00000
PG IN
05 790
05 80C
05 810
05 820
05 830
05 840
05 850
05 860
05 870
05 880
05 890
05 900
05 910
05 920
05 930
05 940
05 9';0
05 960
05 970
05 980
05 990
06 000
06 010
06 020
06 030
06 040
06 050
06 060
06 070
06 080
06 090
06 100
06 110
06 120
06 130
06 140
06 150
06 160
06 170
06 180
06 190
06 200
06 210
06 220
06 230
06 240
06 2'50
06 260
06 270
06 280
06 290
06 300
06 310
06 320
06 330
LABEL
MNEM OPERANDS AND REMARKS
PAGE
12
IF
TF
*£41,SHTLUl&10*
*&34,SMTLUl&10*
SM
*&17,1,10*
TF
9,9*
TF
*&18,GETNo-l*
B
98765*
DORG *-4*
BEREC B
10,,25*
DORG *-3*
B
8,,26*
DORG *-3*
TF
2,1,26*
DC
1,4)*
EXREC DC
1,1*
DC
6,700002*
DC
6,OOOI2Ci*
TESTOO BNF CONFMT-20 ,OOSWCH*
TR
,OORCRO*
OUT
SM
EMM&6,20*
TF
*&23,EMM&6*
TR
OU1&40*
TF
*&18,·-1*
TOM
*
DC
1,G,**
AM
*-6,10*
TF
*&18,.-18*
TF
,CRAM*
AM
*-6,10*
TF
*taS,.-18*
TF
,CRAM*
TF
OUT&6
,OUT&44*
OUT&ll
,OUT&59*
TF
TF
OUT&18
,OU1&44*
,OUT&54*
TF
OUT&23
TF
OUT&30
,OUT&49*
BNF -1;24
,OUT&7*
TOM OUT
,2*
BNF *&24
,OUT&19*
_TUM OUl&12
,2*
BIM PUTX,36,10*
AM
SLOT
,36,10*
BNE TESIDO&12*
B
CONFMT-20*
DORG *-4*
DORCRD DC
1,1*
11,10000000000*
DC
DC
12,140000000000*
13,470000001100.i)*
DC
DC
3,6S*
1,lt
GOIORe DC
DC
9 1 300009000*
DC
2,04*
12,320009500000*
DC
DC
1,i100099*
DC
5,00067*
.-
L92
-
------------- -------
--------
LCCTN
07118
07130
07131
07139
06724
07140
07152
07160
07160
01112
07184
CP
P/L
Q
8
16 12825 OCOM8
49 07284 OGOOO
31 17172 11180
26 12831 Cl1S9
49 07224 COOOO
J1 02452 -()OOO
31
16
11
26
33
45
16
31
21
49
11112
12825
09118
12835
12832
01284
12835
12836
13906
06724
17186
COOl4
cco-o
11143
COGOO
11113
-0000
16275
13905
oeooo
49 02562 OCOOO
31
11
16
49
1
00000
14452
14686
14632
07316
OCO-8
-7368
CCOOO
16 14686 J4522
45 07400 16599
49 01424 00000
43 07424
38 1t:399
26 16530
It. 17143
16 09403
49 08210
26
26
31
31
26
11
16
46
43
26
2t
16535
16540
16541
16591
01821
08357
07611
07834
01e34
07594
ccoce
LABEL
Oll4~9
CC4CO
16065
00R99
-1468
CCOOQ
08351
C821'1
16GH6
16508
16513
OCO~l
-8351
CC2CO
CC459
('2217
C7725
06 3'30
C6 360
06 370
Dc 3SC
06 390
06 420
06 430
06 450
06 46C
06 470
06 480
06 490
06 500
06 510
06 520
06 550
06 560
06 570
06 580
06 590
06 595
06 600
06 610
06 620
06 630
06 640
06 650
06 660
06 610
06 680
06 690
06 100
06 710
06 720
06 730
06 140
06 1')0
C6 160
06 170
06 180
06 190
06 800
06 81C
06 820
06 830
06 840
06 8'10
C6 815
06 885
06 895
OA 9C5
06 91C
06 915
O~ 925
PAGE
MNEM OPERANDS AND REMARKS
DC
06 340
12
12
1
011~2
07192
01200
0-'200
01212
07224
01236
01248
01260
01272
01284
0129t;
013ce
07316
0131f:
01323
01323
01324
01336
07348
01360
073t8
07368
0138C
01392
01 l tCO
0140C
07412
01424
01436
07448
01460
07468
01468
C148C
07492
01504
07516
07528
01540
C7552
01564
071:,16
01'5e8
PG LN
------_ .. ----------------- - ----
DC
DC
GGG
DC
CCNTIN OS
PAUSE TFM
8
DORG
STep
TR
TF
B
OORG
fiTM
DCRG
CONTRl TR
TFM
BT~
TF
CF
BNR
TFM
TR
'BT
B
ENOX
OORG
B
END
OCRG
DC
TR
BT~'i
TF",
B
OORG
TFM
12,26000')900099t
130
--_._-----
12,260006~0000O*
1,4*
8 ,9000000@*
,TESTrO*
,48
INST1&1
ENDX-32*
*-3*
CHI-l,CHI&1*
INST1t1,CONTRl-1*
CCNTRl&24*
--3*
STOPSR
--3*
CHI-1,CHI&13-t
INST1&1,34,10*
CFXN,,10=t.
INST1t11,SYM:t
INSTl&8*
-&24,CHI*
INSTlt11*
INSTl&I2
,CRAM-4*
PUTl,PUTI-l*
TESTDO*
*-3*
ENDSR*
--4*
1,ii}t
OUT
,ENOX*
PUTX,8,10*
DUpo1P&54,*&.20*
DUMP*
--3t
,
,10*
,01*
0--
OUMP&~4,PUTPHI&36*
BNR
*&20,IMAGE*
B
*&32*
OCRG *-3*
BO
*&.24,SKPPCH*
WNCD IfJAGE*
TF
BUFBAS~6,L*
TFM SYM,9~9,q*
TFM CSORN-l,*&20:t
SMTLUt
B
DURG *-3*
BUFBAS&11,SMCNTt
TF
3UFBAS&16,SMTLU1&11*
TF
BUFBAS~17,USEDFS*
TR
PSTAE-
TR
RUFRAS&61,ME~CAP-5t
TF
At!i
TFf'Ii
FIN&ll
SMCNT
tX&11
EXIT*
,FCTENO*
, 1
,SMCNT*
EXIT
,SKPPCH*
,SiJ.TLU1&11*
,fJlKST:f
Be2
50
TF
TF
AOR
Ar~&6
,lOt
/93
I
i
,j
- - - - - -..
-.---.--~.~--~
.. ---.-
-
--
--.-------~.-------------
0--
IItrr,
o
lrCTI\
CP
P/l
Q
_..
..
!"lew
PG LN
. -r
LABEL
n'
f.w',tt'#l"w'"
at"-:
ttL"
tttitiWt',kttettb
it
MNEM OPERANGS AND REMARKS
,eN
lr:rY' 1lt,n' """::,,ti"!1!'Jt!l w
I't
PAGE
H,f
W"'*lMttrNre' .
w
14
------------------------------
----=-0.. :. . 7-=-6=0..: 0__=2_=.6.-----:::07773 07594 06 ___9 32__ ---__ .I!______ ~_~:.~~!J_________ !.!:-~! ____________________ _
07612 11 07773 CCO-2 C6 945
A~
CKF&11
,2
,10*
07624 16 07620 CCO-6 06 955
T Ft-"
i\ DR& 3_~ ________, 6 _
,10:f:
07~36
26 07666 C8277 06 96~
T~
*&30
,SMTlUl&ll*
07648 12 07666 COO-4 06 97~
SM
*t18
,4
,10*
07660 2t. 00000 08357 06 985 AD
TF
,SMCNT*
_______ .QI6::-7=-'2==---~1=2--=-O=7-=6--==-6-=-6____::C_=C-=.C__:_-_::5-__=C~6:...-._:9~9=_=5:___--_-----:S:=-:t<=-'__*_-.-:.6~--_..!..,.=...5--=---=--:--_-~,..::::..1-=-0...:.*------.
07684 26 07702 C1666 07 005
IF
*t18
,*-18*
07696 3P COOOO 00400 07 01~
WNCD t
,
071C8 49 07762 -0000 07 02~
B
CKF
07716
07 035
DORG *-3*
07725
10
01 045 BlKST D~B IC*
,lOt
,10
07726 11 07773 CCCJO 07 055
A~
CKF&11
, 1
07138 12 07620'000-1 07 065
SM
ADR&32
01150 47 07786 01100 07 075
BNH
*&36*
07162 44 01126 COOOO 07 085 CKF
BNF *-36*
01114 16 01671 -1119 07 095
TfM AC&11
,BlKST-6*
,10*
01186 11 08271 CCOPO 07 105
A~
S~TlUl&11 ,10
,10*
07198 11 08357 CCOPO 07 115
A~
SMCNT
,10
0181C 14 C8271 -0000 07 125 FIN
C~
S~TlU1&11*
________
0 7~8=2=__=2~_4...:....7-'-C=_,1~5~6=-4...:...-C=-:1=-:3~0=__'0=----'0==-:7:=---:1=-=3::-::5:---____:=__-----=B~N--'·_-=-A.:...::D:.:..R,:-,---=2:..-4:.-:*_-::-:-:--:::-=-:---:--_ _ _ _ _ _ _ _ _ _ __
01834 43 07986 OC459 01 410 EXIT
SO
MCON7-24,SKPPCHt
01846 46 01926 C0300 07 420
nC3 LeOp*
01858 31 00402 16526 07 430
TR
402,BUFBAS&2*
07870 49 01882 ~0152 07 440
B
STOPER,152,1*
01882 34 COOOO 00102 01 45C STOPER RCIY
07SQ4 39 02819 001CO 07 470
W~TY LSUBS*
07906 36 OOCOO 00500 07 480
RNCD *
01918 49 00000 OCOOO 07 490
B
*
01925
1
07 500
DC
1,@,*-4*
01926
01 510
DORG *-3*
01926 15 16~74 C000J 07 520 lOOP
TOM BUFBAS~50,ltll*
01938 16 16525 -C4C2 07 530
TFM BUFBAS&1,402*
07950 38 16521 00400 07 540
WNCD LGAO-2t
07962 38 02b13 OC400 07 550
WNCD lSUBS-6*
07Y14 38 01811 00400 01 560
WNCO STOPER-5*
01986 34 00000 COI02 C7 570
ReTY
07998 39 16441 Ce100 07 ~80
WATY EOC*
.~0~8~C~I~0~~2~6~O~8~0~2~8~1=__=6~5~-1~8~_C=_7~-~5~9=0__~M~O~O~N~7__~T~F____
*-=&-=1~8~,~F_=C~T_=E~N~O~*________________________ ~
08022 26 00000 16219 07 600
TF
,CRAMt
08034 26 08081 08027 01 610
TF
*&53,*-7*
08046 12 08028 OCOJO 07 620
SM
*-18,10,10*
08058 14 08028 J1344 01 630
CM
*-30,lAST&12*
08070 46 08022 011CO 01 640
BH
*-48*
08082 15 00008 00000 07 650
TOM 8*
08094 26 05648 Oe028 07 660
TF
E~~&6,MOON7&18*
08106 22 16135 16135 01 670
S
USEDFS&49,USEDFS&49*
08118 34 KOOeO 20102 07 680
K
20000
,20102
i
CB12S
07 685
[NCREM OS
,*-4*
08130 15 15921 00001 07 687
TO~
TRACE&l
,1*
08142 39 16481 001CO 07 690
WATY lSTM*
08154 41 ~1000 OOOCO 07 700
NCP 51000
os
OE16~
C7 705 fl
TO~
*-11,H=t
08166 15 08155 CCOC8 07 71G
W~CD LROUT:f:
C8178 38 16280 C04CO 07 740
*
*
___ .~l
o
/9$1
lCCTN
CP
Oe19C
08202
oe2le
08210
08222
08234
08242
08242
08254
38 16360 e0400
49 00402 OOOCO
oe26t
08218
08290
08302
08310
08310
08322
08334
08346
08351
08358
08310
08382
08394
08406
08418
0843C
08441
08442
08454
08466
08418
08490
08502
08514
08526
08538
C8550
0f:!562
08514
OBS86
0859B
C8610
08622
08634
08646
08658
08610
08682
0f:!694
08-/06
C8718
oe73C
08742
081'54
08-,66
P/l
Q
26 08357 16512
26 08216 16511
49 08266 OOOCO
12
12
26
44
44
49
08356
08216
11153
08310
08242
08526
000-1
OCO-l
00009
17151
11141
00000
44
26
15
49
08358
08356
17149
08242
17149
17152
00000
R9999
45
45
26
26
44
33
15
08526
11338
08399
00009
08478
11143
11144
1
00089
00088
14198
08194
11173
11262
11356
11143
08242
08242
11153
08242
17145
08211
11238
08644
08658
08356
08112
08105
08704
08112
16035
08357
17173
11521
17153
11152
08276
11143
11143
00000
00000
11134
31
08357
26
14197
27
00699
43
OOOK4
14
01200
47
0-012
17
24
11153
C1400
46
47
01200
17143
24
C1400
46
10829
31
16518
24
01100
47
C8356
25
C0200
43
000-1
11
16
J6035
08356
26
OCOOO
32
11
-cooo
00001
15
cecco
15
OGO~6
16
ocoeo
15
16 0'1403 -8774
49 11214 00000
MNEM OPERANDS AND REMARKS
PG IN
LABEL
07
07
07
01
01
07
01
01
01
07
01
07
07
01
07
01
01
07
07
01
07
07
01
07
01
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
08
WNCD
B
DORG
SMTlU TF
TF
8
DORG
SMlOOP SM
SM
SMTlUl TF
BNF '
BNF
750
760
770
780
790
800
810
820
830
840
850
860
870
880
890
900
910
920
930
940
950
960
910
980
990
000
010
020
030
040
050
07,0
080
090
100
110
120
130
140
150
160
170
180
190
200
210
220
230
240
250
260
270
280
290
300
SMCNT
SMNOT
MOON3
SMTST
lROUT2:t
INITl:t
*-3*
SMCNT,HEMCAP-l*
SMTlUl&lO,MEMCAP-2*
SMTlUl:t:
*-3*
SMCNT-l,l,lO*
SMTlUl&lO,I,JO:t
COMP,9*
*&32,COHP-2*
SMlOOP,SYM-2:t
B
SMTST*
DORG *-3*
BNF SMNOT,COMP-4*
SMCNT-l,COMP-l:t
TF
COMP-4,0:t
TD~
SMlOOP,99999,1*
B
OS
,**
BNR SMTST,COMP*
BNR NOSPCE,COMP-l:t
TF
*&11,SMTlUl&10*
TF
9,SYM*
BNF MOON3,SYM*
CF
SYM*
TOM SYM&l*
DC
1,Ci,**
TR
89,SYM-9*
TF
88,SMCNT*
COMGO,COMGO-1*
8T
BO
OMM,DMSWCH*
CM
CHI,24,10*
BNE
PUTETA-12*
BTM ERROR,12,8*
C
SYM,COMP*
BV
SMlOOP*
BNE SMlOOP4=
COMP,SYM:t
C
BV
SMlOOP*
TR
COMP-8,ETAC-7*
C
SMTlUltl1,FCTENO*
BNH PUTETA-36*
TD
*t22,SHCNT-l*
BO
*&24,200*
AM
SMCNT-l,1,10*
TFM -&54,USEOFS-51*
TF
-&35,SMCNT-l*
SF
*&22*
A~
*&18,*
TOM USEOFS-51,1*
TOM SMCNT,O*
TFM CHI,46,10*
TOM FXORFl*
TFM CSORN-1,*&20*
B
PUTETA*
PAGE
15
0
-----i
()
/95
0
-
~----
._--_.
__ ._-_. __ __
..
... -_.-
._-----
- - - - - - - - ----.......:....-------
LCCTN
CP
P/L
Q
09330
09342
0<1354
09366
09318
C938C
09380
09392
09404
09416
09428
09440
09452
09464
09476
09488
09496
09496
26
26
32
44
42
09353
17143
17140
09380
00000
09220
OCOOO
26
49
14
15
46
14
46
14
46
49
09403
08210
17173
11527
09780
17113
0978C
17113
09496
09532
C9177
COOOO
000-3
14
46
15
16
26
26
31
11
14
46
33
33
33
33
49
17173
09532
11527
09562
11144
17135
17110
09562
11173
10460
11142
11140
17138
17136
08210
ceON5
14 09938
I" 111)21
46 10392
16 17135
26 09743
26 11144
32 17143
32 17140
49 C8210
26 11143
16 09119
16 09938
14 11113
41 09860
31 17172
49 09816
J1140
00002
01100
14
4f
14
47
000-3
C1200
CCOC9
C11CO
J1143
09~08
OfJ520
09532
09544
09556
09568
09~80
09~92
09604
09616
09628
09640
09652
09664
09672
09612
09684
09696
C9?Oe
09720
09132
09144
09756
09768
09180
C9192
09804
09816
09d28
09840
C9852
09860
09860
09812
09884
09696
09908
11113
09988
17173
C9f12
14 09938
oeooo
09176
COOOO
oeooo .
01200
acope
01300
CCO,",,8
011CO
COOOO
C1100
00GC2
J7135
11419
17173
11112
COO-2
OOOPO
01300
OCOOO
oeooo
CCOOO
coooo
ceoco
c-oee
09938
ooooe
cooco
oeooo
COOCO
C8165
JCD48
J1136
OCOPO
01200
17114
ecuee
PG LN
LABEL
08 810
08
08
08
08
08
08
eu
08
08
08
08
08
08
08
08
08
08
08
09
09
09
09
09
09
09
09
09
09
Oq
09
09
09
09
09
09
09
09
09
82C
830
840
850
860
810
880
890
900
910
920
930
940
950
960
970
980
990
000
010
020
030
040
050
060
070
OPO
090
100
110
120
130
140
150
160
170
180
190
200
210
220
230
24C
250
260
270
09
09
09
09
09
09
09
09
09 2eo
09 29C
09 30C
09 310
C9 32C
09 33C
09 340
09 150
PAGE
MNEM OPERANDS AND REMARKS
*&23,CFXN&42:t
SYMt
SYM-3t
*t14,CFXN-2=t=
Sf:)
t
CORG *-9t
CSORN-1,CFXN-1*
IF
B
SfJ;TLU*
CHI,3,10-t
C~
TOM FXORFl*
BE
NUMBERt
CHI,70,10t
CM
BNL NUMBER*
C~
CHI,48,10*
BH
*t20*
B
CS*
OCRG '*-3*
CHI,1)5,10*
CM
BH
CS*
TOM FXORFL,2*
TFM SALTf;6,SYM-8*
TF
SYM&1,IER09*
SYM-3,CHlt
TF
CHI-3,CHI-1t
TR
AIV'
SALT&6,2,10*
CHI,40,10*
CM
BNL SYMCHK*
CF
SYM-l*
SYM-3.f:
CF
CF
SY~-5*
SYM-lt
CF
TF
Tf
SF
BNF
CSORN
CS
SALT
110
--_._-_ .. _--
0--
8
S~TLU*
OORG *-3*
FXNUMB
TOM
BH
TfM
TF
TF
SF
SF
,SYM-3t
NUMB1&6
FXORFl,2*
EXCESS*
,
SYM-d
*&23,NUMBl&6*
SYM<
SYM:f
SYtJ.-3*
B
S~TLUt
C~
,8*
NUp.lSER TF
TFM
TFM
Ct-1
NUMB
SYM
,Fl*
NUMBER-1,NUMB3:f
NUMBl&6
,SYM-1*
CHI,10,10*
BNE *t32*
TR
CHI-1,CHltlt
B
*-36*
OCRG *-3*
eM CI-1I,3,10*
FlNUMB:t
BE
C~'
ChI,t-9,lO*
t-XNUrv,Bt
BNH
Ctl
~~UM81 t~6,
- - - _.. _--
s't ~*
/97
-0-
,.or' II '1' ..... " rOT!
;-
(\I
IT
1"""'['"
. tWttttttrl
!"btfM
II
!
,
mil"!' IIfP"WWHU!#t*lt'U'ttMWH!¥tt' 'ttJtU 'tt'I'Dtt
1 -__~l~C~'C~T~~_'__C~~~)__~P~/=L____~Q____~P~(;~L~N_;__~l~A~8~E~-l~_M~N~'E~~_l~O~P~[RANOS
09920
09932
___J~9944
CS95t
OG968
09980
CSQ88
46
2'5
31
11
Jl
49
09944
00000
17172
09938
17135
09860
01100
17173
17174
-0001
eCO-l
COOOO
09
09
09
09
360
GH
3 fb- NlfM-BT--TO
380
TR
390
400
410
420
430
440
450
460
470
480
490
500
510
520
AM
AM
we,'Wti""*'''-'.'W'''N ,"HriwtH' \ ttk#b1t • •dM'1e!, \' ;,1
_A_N_'D__R_c_-M_A_R_K_S______
PA__
G_E___l_3______
NUMBl~12*
------;Ct=ln--------------------------------------
Ctl I-1,CHI &_1_*_ _ _ _ _ _ __
NUMBl&6,1*
,010t
09
NUMB5
SYM-8
,1
09
3
NUMB*
09
DORG *-3*
C99L8
26 10150 09938 09
FlNUME TF
NUMB2&6,NUMB1&6t
leOCe
14 17135 COONI
09
C~
SYM-8
,~l
,10*
lC012 46 10036 01200 09
BE
*&24*
lC024
16 09719 J0156 09
TFM NUMBER~1,NUMB2&12*
10036 26 10090 09779 09
TF
VARBR&6,NUMBER-l*
10048 12 17135 COO-1
09
NUMB3 SM
SYM-8
,1
,10*
10060 31 17172 17174 09
TR
ChI-l,CHItlt
lC072
14 17113 OCOPO 09
C~
CHI,70,10*
lC084 46 00000 01200 09
VARBR BE
lC096 47 10176 CllCe C9
BNH CMPAR*
10108 16 10090 JC156 09 530
TFM VARBR&A,NUMB2&12*
1C120
14 10150 J1143 09 540
CM
NUMB2&6
,SYM*
10132 46 10156 OlIGO 09 550
Bh
NUMB2&12*
____lC144 25 OOCOO 17173 09 560 NUMB2 TO
,CHI4=
lC156
11 10150 -CCCI 09 570
A~
NUMB2&6,lt
lCl~e
49 10060 COOCO 09 580
B
NUMB3&12*
lC11~
09 59G
OCRG *-3*
10116
14 17173 CCO~5
09 600 CMPAR C~
CHI,45,10*
10188 47 10368 01200 09 610
BNE
PlUS&12*
~I~C~,2~C~O~,~2~6~=10~3~6~6~C~9~9~7~8__~O~9~6~2~C_________~T~F__~P~l~U~S~&=1~0~,~N~U~M~B~5=&=1=0~*_____________________
10212 14 17115 COOKO 09 630
C~
CHI&2,20,10t
10224 47 10260 01300 09 640
BL
*&36*
10236 41 10272 C12CO 09 6~O
BNE *t36*
lC248
15 10351 C0002
09 660
TOM PlUStl,2t
1C2~C
31 17172 17174 09 61C
TR
CHI-l,CHI&l*
10272 25 10367 17175 09 6eO
TO
PlUS&11,CHI&2*
1C284 31 17172 17176 09 690
TR
CHI-l,CHI&3*
10296 14 17173 CCOC9 09 10C
CM
CHI,69,10*
lC308 47 10356 01100 09 710
B~H
PlUSt
1C320 22 10366 10361 09 120
S
PlUSEI0,PLUS&11*
1C332 25 10367 17173 09 730
TO
PlUStl1,CHI*
1C344 31 17112 17174 09 740
TR
C~I-l,CHI&l*
10356 11 17135 -COCO 09 750 PLUS
AM
SYM-~*
lC368 46 10392 01400 09 760
BV
EXCESSt
,SYM-8-:t
10380 44 10404 17135 09 770
BNF *&24
,73
lC392 11 11356 0-073 09 780 EXCESS BTM ERROR
10404 15 11527 COOGe 09 790
TOM FXORFL,Ot
10416 32 17143 CCOCO 09 8CO
SF
Sy~*
1C428 43 08210 17136 09 810
BO
S~TlU,SYM-7*
,10*
lC440
l~ 1713~ OCO-O
09 820
TFM SYM-3
,
1C452 49 08210 00000 09 830
P
S~TLU*
lC46U
09 840
DORG *-3*
lC460
14 09562 J7145 09 860 SYMChK eM
SAlT&6,SYM&2*
1C472 47-09556 C12CC 09 81C
BNE SALT*
,IFSWCH*
10484 44 04724 OC702 09 880
GNF ER6
10496 49 04652 ceooo C9 890
B
IF&6Bt
105C4
C9 gee
rORG *-3*
*
O____
o -
----~ LC_5~~_ 2 6
J 0 ') 3 §. CE ,~ 7 t; __ C '-)
2~~t __ ~_C R I ELI F ~ _ _* f: 3 4~~_t1J_~~1!_t~_J 0
* ___ ~
______ ~ ___~ _ ~ _~~_____~_________________~__________________________ ~ _________~______ _'_________________________ __ i.~ g
_~_
------------
~
I
!
LCCTN
CP
P/L
10516
10528
10540
1(552
10564
10572
1C512
10584
1C596
10608
10620
10632
10644
10656
10668
10680
10692
10104
10116
1072E
lC140
1C752
10164
1C176
10188
1e8CO
1C812
10819
1C821
10836
10838
1085C
10862
10814
10886
10898
lC910
10922
10930
10930
10942
1C954
10966
10918
10990
11002
11014
11026
11038
11050
11062
, 11014
11086
11098
11l1e
12
44
26
44
49
10539
08514
10562
1{)512
08514
COOJO·
00005
lC538
00006
15
31
26
11
26
12
26
11
31
22
14
46
44
31
15
25
43
11,
31
26
49
00698
10819
10823
10822
10654
10654
00004
11014
00005
10822
11173
10838
10930
17112
00698
10826
11306
10794
00000
10818
98765
00002
10828
08357
000-1
08216
000-1
00004
JC668
16061
11217
00OK3
C1200
00009
17174
COOCO
11527
00100
000-9
10819
09403
COOOO
17
31
23
32
22
21
44
49
4
9
11014
00010
00004
00096
10822
10822
10930
10716
J0850
1606,1
11211
OOOCO
00099
00004
00014
00000
11
26
13
16
22
31
49
15
16
16
31
14
46
17
11311
10825
11311
10996
10<)96
00000
10728
11201
16071
11211
11112
11113
11182
09532
26 16011
14 17113
Q
COOOO
000-1
11~17
000J5
J1133
00099
oeOOl
00000
COO03
-COO-
o-oeo
17114
00009
01100
000-2
08351
ceOJO
PG LN
09
09
09
09
09
09
09
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
10
930
940
950
960
910
980
990
000
010
020
030
040
050
060
070
080
090
100
110
120
130
140
ISO
160
170
180
190
200
210
220
230
240
250
260
210
280
290
300
310
320
330
340
350
360
310
380
390
400
410
420
430
440
450
460
470
LABEL
MNEM OPERANDS AND REMARKS
PAGE
19
*&23,10,10*
SMTST-12,5t
*&22,.-2*
.&20,6*
5"T5T-12*
·-3*
SB5WCH,2*
ETAN,ETAC-8*
ETAN&4,SMCNT*
ETAN&3,1,10t
*&34,SMTLU1&10t
*&22,1,10*
OUT&4
,4*
COLECT,·&I2*
OUTt5
,SYMBSB-4*
ETAN&3,NOMB*
CHI,23,10t
TWODIM*
QUERY
GORE
,OUT&9*
CHI-1,CHI&1*
SBSWCH*
ETAN&7,fXORfl*
80
PETA,FlAGSW*
AM
.&18,9,10*
PUTETB TR
,ETAN*
.&18,CSORN-lt
Tf
B
98165*
OS
ElAN
,.-4*
OS
4*
DC
ETAC
9,.*
lWOOIM BTM COLECT,·&12*
,SYMBSB-4:t
TR
OUTtlO
M
OUTt4
,NOMB*
5F
96*
S
ETAN&3,99*
A
ETAN&3
,OU1&4*
BNf GORE
,OUT&14*
B
QUERY*
OORG .-3*
AM
GORE
SUBN,l,10*
TF
ETAN&6,SUBN*
MM
SUBN,15,lO*
TFM
*&30,TOP&1*
S
*&18,99*
,0UT&1f:
TR
QUERY&124:
B
COlECT TOM FAGR&1,3=t
TFM'
SYMBSB,0,1l1*
TfM NOMS,,8t
TR
CHI-1,CHltl*
eM CHl t 69,lO*
BH
FAGR-24*
BTM CS,2,10=l:
SYMBSB,SMCNT=t
TF
CM
CHI,10,10*
0
SM
BNf
TF
BNF
B
OORC
TOM
TR
Tf
AM
TF
SM
Tf
BTM
TR
S
CM
BE
BNF
TR
TOM
TO
0
0
199
.,,1
,I
I
.1,1
1
1
--.---.~-.--.-.~---~~------
j'''"OC
----
-.---~-
- - - .---_.-
-0
-0
0
----_.-
-
-
... - - - -
---
t
fill
['''l'' "twith.
It
NeW rt . trtt 'tt t t
j
'ti'w"HW:urtrtr
'Wllr"t II IInlllE" " tttttuaU*bH.f,IWfMetu "
.. -.--
-_..._------.-
lOCTN
CP
11122
11134
11146
11158
11170
11182
11194
11206
1121f3
11230
11238
11217
11238
11250
11262
11274
11286
11298
11306
11306
11317
11318
11330
11338
11338
11354
11356
11368
11380
11392
11404
11411
11419
11421
11444
11453
11456
11468
11480
114<]2
11504
11516
11521
11528
1154C
11552
11564
11!516
11588
11600
11612
11624
11[;36
1164P
11660
46
14
47
15
31
17
_ .. -.-----
P/l
Q
11170
17173
11218
11207
17172
09178
26 11217
33 11217
26 11236
49 OOOCO
14
46
43
31
26
49
17173
10504
11260
10819
10823
10752
01200
COOKO
01200
00002
17174
coo-o
17143
00000
11013
00000
GOOK4
01242
00698
10828
08357
oeoco
32 10826 00000
2
15 00700 COOOO
49 10716 00000
17 11356 0-074
5
26
39
15
15
49
11441
11421
00459
00839
03914
113'55
C0100
OCOCJ
OOOCI
00000
9
12
16 11453 COO-O
2
16 15041 co-co
16 14950 J69C2
16 10194 J6694
4C;' 11764 11175
14 11453 00013
46 11588 C12CO
1
14 11453 OOOK~
46 11576 C1200
14 11453 0001<4
41 12380 01200
17 11356 0-071
17 12862 oco-o
44 15744 OC696
43 11680 12d38
43 11660 128t}4
44 11700 12e36
44 11732 12352
33 00696 CCOOO
-------------------------- -
PG IN
10 480
10 490
10 500
10 510
10 520
10 530
10 540
10 550
10 560
10 510
10 580
10 590
Ie 600
10 610
10 620
10 630
10 640
10 650
10 660
10 610
10 675
10 680
10 690
10 700
10 720
10 130
10 740
10 750
10 760
10 765
10 770
10 780
10 185
10 790
10 830
10 835
10 840
10 850
10 860
10 870
10 880
10 890
10 895
10 900
10 910
10 920
10 930
lO 940
Ie 950
LABEL
BE
eM
BNE
TOM
TR
BTM
FAGR
970
980
990
000
010
TF
CF
TF
B
OORG
NOMB
OS
CM
BE
BD
PUTETA TR
TF
B
DGRG
SF
PETA
SUBN
DC
TOM
B
DCRG
NOSPCE BTM
OS
ERROR TF
WATY
TOM
TOM
B
OORG
ZER09 DC
ERRMSS OAC
ASCAN TF..,
DC
OMMI
TFM
TFM
TFM
S
-BNR
CM
BE
FXORFl OS
CM
BE
eM
BNE
ERI
BIM
SSB
BTM
BNF
10 960
10
10
10
11
11
MNE'" OPERANDS AND REMARKS
BO
BO
EQ2
BNF
BNF
CF
PAGE
*&48*
CHI,20,10*
FAGR&12:f:
FAGRtl,2:f:
CHI-1,CHI&I:f:
CFXN,,10:f:
NOMB,SYM:f:
NOMB:f:
.tI8,COlECT-lt
:f:
.-3:f:
,FAGR&11:f:
CHI,24,10:t
SCRIPT,42*
.-2,SBSWCH*
ETAN,ETAC-8:f:
ETAN&4,SMCNT*
QUERY&36*
*-3*
ETAN&1:f:
,0
2
,**
FLAGSW,O*
PUTETB-12*
*-3*
ERROR,74,8*
5*
ERRMSS&20,ERROR-1t
ERRMSS*
SKPPCH,l,llt
TYST&l
,1*
CONFMT-20*
.-4*
9
,0*
12,ERROR NO. .:1;
OMM1,OO,lOt
,
,*-2*
2
ACC,,9*
PUTOHH&6,PHI&220t
PUTETB&6,PHI&12*
SSA,CHI&2*
OMMl,33,10t
SSB*
1
,*t
OMM1,-24,10*
*&36*
OMMI,24,10*
SSt
,71
ERROR
,8*
COOE"IOl:
,EQSW:f:
fOF
,INSTl&14*
*&68
,INST2&14*
*£36
,INSTl&12:t
E03
EC4
,INST2&12*
EQSW*
200
20
--
~
........- .-
---,~
..,-
••
•
HIt
~
.....·" ....................
oWl" •• ,.....
,·,,',~·,·'"
.......... _ _ _ _ _ _ _ _ _ ••
~_~~~_.'.
_ _ .M _ _
I!
-
--~
..- - - - . - - - . - ..---
.~.-.---
_. _. __ .__ .. _- -------..---------
--------- -_. __.-.
-----.--_._--.----- ------_._._--------
LCCTN
CP
11612
11680
11680
11692
11100
11700
11112
11'724
11132
11732
11144
11156
11164
11164
11776
11788
118CO
11812
11824
11836
11848
11860
11812
11984
11896
11908
11')20
11932
11944
11956
11968
11980
11992
12CC4
12016
49 15144
1202~
1204C
120'52
1206C
12060
12012
12084
120S6
121C4
12104
12116
12128
12136
12136
1214e
12160
12112
12184
12192
12192
P/L
Q
ceoco
43 11636 12854
49 11660 00000
31 12a26 12831
31 12831 12841
49 15912 00000
26 12830 12835
26 12835 12851
49 15960 ceoco
14
41
15
11
14
46
33
14
46
14
46
15
14
46
14
46
14
46
14
46
14
46
14
46
49
17113
11812
00691
09404
17173
11848
00696
11113
12012
11113
12060
00691
1"1173
12224
17113
12428
17113
12136
17113
12192
11113
12500
11113
11188
11516
eOOMO
01100
oeooo
J1492
ceOl3
01200
00000
OOOJO
01200
0001<.0
01200
OCOOO
000-4
01200
0001<1
01200
OOOJ4
01200
GOOK4
01200
CCOl3
012CO
CCO-3
01200
OOOCO
15 00100 COO05
43 12104 00697
15 00100 OCOOO
49 1238C 00000
15 00691 ceooo
31 17172 17114
49 11492 COOOO
14
41
31
15
49
11115
12428
11170
00700
12416
COOJ4
e1200
17172
OCOC5
ccoce
15 00697 oeOOl
PG IN
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
020
030
040
050
060
010
030
090
100
110
120
130
140
150
160
110
180
190
200
210
220
230
240
250
260
210
280
290
300
310
320
330
340
350
360
310
380
390
40(,
410
420
430
440
4150
460
410
480
490
11 500
11
11
11
11
11
11
LABEL
PAGE
FCF:t
DORG "'-3*
EQ2
BO
,INST2&14*
B
*-32*
DORG *-34=
TR
INSTl&2
,INST1&1:t
,INST2t1:t
TR
INSTl&1
ZOT&12:t
B
DORG *-3*
TF
INST1&6
,INST1&11-i:
TF
INST1&11 ,INST2t11*
ICT:t
B
DGRG "'-3*
CM
CHI,40,10*
BNH ... t36*
TOM FSTSW*
BTM CSORN,S*
C,.
,33
CHI
,10*
BE
*&24*
EQSwt
CF
eM CH[,10,10t
Bt
5S001*
Ci'4
CHI,20,10*
BE
S54*
TOM F5TSW*
CHI,4,lOt
CM
BE
SSCAl:t
CM
CHI,21,10*
Bf
SS1:t
CHI,14,10:t
CM
BE
SS3*
CHI,24,10t
Ct-1
BE
5S5*
CM
CHI,33,10*
BE
5S6*
CHI,3,10:.t:
CM
S5A&24:t
Bf:
B
t-.:Rl*
[lORG *-3t
TUM fLAGSW,5t
BD
*&32,FST5W:t
TOM FLAGSW,Ot
210
B
E03
EQ4
SSA
SS4
S5COI
-0--
3
SS1:
OCRG *-3*
TDM
TR
FSTSW,O*
CHI-l,CHI&l*
B
s*
OORG *-3:t
S53
510
CM
CHI&2,14,lO:t
5S1*
Tg
ChI-3,CHI-l:.t:
TOf": FLAGSW,5*
B
SS2*
OORG *-3*
TOM fST5W,l*
ENE
520
530
540
550
560
MNEM CPERANDS AND REMARKS
SS5
o--~
Zo/
----------
I
I
- - - - - . -....
~---~-.,.,~-
- -
~--.-----
.... -.---.----........ _ - - -
-
-
-~
....
----~--.~-----~.----
.....
II·
fittt,('
!
ft
t
rt# .
- --
•...
tnit*Mbt
_-------_._ ...
d
t
.
bi"b#t :
,
j
drt
r r "!In
,t
at
t
'ft'!
rr
U!
, w'urn' .Wt'i"*t'J'tt ffl'la'ttN'f'LlHhrir±t'ijf"
IIwWltn(
'UJljwe ttI,tttMtt"tt*,*
-----.------- .
_. - --_ .. _------._--_..
0
()
0
P/L
LOCTN
OP
12204
12216
12224
12224
12236
1224B
12260
12 ;~7 2
12284
12296
123C8
1232C
12332
12344
12356
12368
1238C
12392
124C4
12416
12428
1244C
12452
12464
12416
12488
125CO
12512
12524
121)36
12548
12560
12572
12584
12596
12604
12604
12616
12628
12640
12652
12664
12672
12672
12684
11 15041 000-1
49 14920 CCOCO
14
46
44
14
46
14
46
14
46
14
46
14
46
14
46
14
46
14
46
14
46
14
46
15
15
26
12
31
15
44
44
49
Q
11453 eCOL3
11~76 01200
12784 OC102
11115 ceOK3
04840 01200
11453 CCCJ<4
12764 012CO
11453 COOKM
12(-'12 01200
11453 CCOM6
15392 01200
11453 OOOMQ
04884 C1200
114153 COOJO
13090 C1200
11453 ceOKO
13314 012eo
11453 CCOK1
13410 01200
11453 OCOJ4
13450 01200
11'.. 53 COOJTtI.
15020 C1200
00691 CG001
12825 00006
12559 10"7<14
12'559 000-9
12826 ocooe
12836 cooeo
14920 12832
12604 12834
14920 COOOO
PG LN
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
11
12
12
12
12
12
12
12
12
12
12
LABEL
MNE~
.!}'ND REMARKS
12835
13906
12658
12658
00000
12204
-0060
13905
12559
000-8
--------.-----~--.------~----
22
590
ACC,I,10i:
PUTOMG:t
DORG *-3:4:
CM
OfJ!fvll t 33,10*
BE
ERl*
BNF SSC ,IfSVJCH:4:
C~
CHlf.2,23,10*
ER1i:
BE
o~".nt24, lOt
C~l
SSCAt
BE
600
610
620
630
640
650
660
670
680
690
10e
110
120
730
140
150
160
110
180
790
800
810
820
SSCAI
830
TOM
SS6
TFSAVE TOt-'
TF
SM
TK
SSC
C~
SS
55CB*
CM
BE
CM
O~M1,46,10i:
BE
TENt
CMf"n, 10, lot
Be
CAOOt
OMMl,20,10*
eM
Bt
CM
BE
CTtI.
SS2
CfCTt
OMM1,49,10i:
CM
CM
BE
SSI
O~Ml,-24,lOt
BE
Br-c
TD~
BNF
BNF
csuet
OMM1,21,10i:
COIV*
OMMl,14,lO*
CMULTi:
OMMl,-14,10t
CEXPt
FSTSW,lt
INSTl£I,6*
*£35,PUTETB&6:4:
*£23,9,10:J:.
IN5Tl&2*
INSTl&12,Ot
PUTOMG,INSTl£8*
*&.20,INSTl&10*
PUTOMG~
B
DGRG *-3*
920
,FACt
INST1&.11
PUTl,PUTl-l=t
*&.30, TFS.f\VEf.47=t
*&.18,8,10,*
A~
Sf·
ccooe
*
B
980
S55&.12*
cecco
9g0
DIJRG *-3*
*£35,purr:TB&6=t
TF
oDe 55CB
26 12107 10194
TF
*&.14,PUTETB&6=t
OlC
26 12758 10794
T !~
INSTIG7~t
020
31 12831 oooee
12696
8NF * &. 32 , INS T 1 £.14 t
030
12108 44 12740 12838
Cr
INSTlt14t
04G
12120 33 12838 oooee
.t20,*
B
0'50
12132 49 12752 00000
DORG *-3*
060
1214C
SF
INST1~14*
070
12740 32 12838 ccooe
r;~
,INSTIE.7i:
08C
12152 31 00000 12331
Chi-l,CHltlt
Tf<
09G
SSCA
121£-4 31 17172 11114
SCi
PUTOMHt;6,2,10:t:
12776 12 14950 OCO-2 12 10,::;
.l238 q __ ~~__ t~~~l__t~._~.':JJ ____ ~~_~LL ______________ II:_____~§ 2l!~1J Tg_r:;!j~~! _______
16
21
26
11
37
49
PAGE
A:I,
B
570
580
840
850
B60
810
880
890
900
910
OPERAt~OS
TFM
930
940
950
960
970
---~.---.---
BT
TF
•.. --
------. _._- -------------_._-------------
---~--
__ 2_92
- -------- ----"--
--_._-
--.--~-
---~--~---
- - - _.. __.
P/l
lOf.TN
OP
12800
12812
12824
12839
12840
12855
12860
26 11453 00000
49 11492 00000
26 00060 ceooo
4
27 00480 00000
4
12~62
26
16
26
26
31
12
31
43
43
42
12830
12(341
12945
12921
12841
12945
12831
12972
13058
00000
16213
COOK1
10194
10194
00000
000-9
00000
12854
12838
COOOO
43
14
46
14
46
17
11
42
13044
11453
16020
11453
15108
11356
13605
12838
OOOJM
01200
00013
01200
0-075
OOOMO
00000
12814
12886
12898
1291C
12922
12934
12q4~
12958
12'170
12912
12912
12984
_ _-.12996
13008
13020
13032
13044
13056
13058
13058
1301C
13082
13090
13090
13102
13114
13126
13138
13150
13162
13174
13186
13194
13194
13206
13214
13214
13226
13234
13234
13246
13258
13210
13282
1329C
13290
133C2
Q
5
conoo
14 11453 COOl3
46 15688 01200
49 13032 00000
16
17
44
44
15
44
31
16
49
13605
12862
13234
13322
00700
13194
12847
13607
13594
J6141
000-0
12838
12854
00003
12853
12831
CCOMJ
00000
44 13214 12831
49 13114 00000
16 13607 OCOKP
49 13594 cooce
44
44
15
11
49
13302
13290
00700
13605
13162
12854
12853
OC004
OCO-5
ceooo
11 13605 000-5
15 00700 CCOOC
PG LN
12 120
12 130
12 140
12 150
12 170
12 180
12 190
12 200
12 210
12 220
12 230
12 240
12 250
12 260
12 210
12 280
12 290
12 300
12 310
12 320
12 330
12 340
12 350
12 360
12 370
12 380
12 390
12 400
12 410
12 420
12 4.30
12 440
12 450
12 460
12 410
12 480
12 490
12 500
12 510
12 520
12 530
12 540
12 550
12 560
12 570
12 58C
12 590
12 600
12 610
12 620
12 6.30
12 640
12 650
12 660
12 670
LABEL
INSTI
INST2
CODE
CODA
COOF
CODD
CODC
CADD
CADDI
CA.DDC
CADOB
CADDO
CADOH
CAOOJ
MNEM OPERANDS AND REMARKS
TF
OMM1,*
B
s*
TF
DC
BT
DC
PAGE
FAC*
4,.*
FAO*
4,d*
OS
5*
INST1&6,TFFAC*
TF
TFM INST2&1,21,10*
CODA&11,PUTETB&6*
TF
*&23,PUTETB&6*
TF
I NST2&7:.t:
TR
SM
*&23,9,10*
TR
INSTl&1*
BD
*&26,INST2&14*
COOC,INSTl&14*
BO
BB
*
OORC *-9*
COOO.,INSTl&14::1:
BO
CM
OMMl,-14,lO*
BE
FXEXP*
CM
OMMl,33,10*
BE
FlOAT*
BTM ERROR,15~8*
AM
OP,40.,10*
BB
'*
DORG *-9*
CM
OMMl,33,10*
BE
FIX*
B
COOF*
DORG *-3::1:
TFM OP,AFAD*
BTM CODE"IOt
BNF CAODH 7 INSTI&.14*
BNF CADOK,INST2&14*
TOM FlAGSW,3:t
BNF CADDB,INST2&13*
INST2&7,INSTl&1j:
TR
TFM COMMON&I,41,1011:.t:
B
c*
OORG *-3*
BNF CADOO,INSTl&13*
B
CADDC*
OORG *-3*
TFM COMMON&1,21,1011*
e
23
----
0
0
c:t
DORG *-3*
BNF CAOOJ&12,INST2&14*
BNF CADDJ,INST2tI3:t
TOM FlAGSW,4*
AM
OP I S t 10*
CAOOI:t
B
DORG *-3*
OP,5,10:t
AM
TOM FlAGSW,t
203
0
-- _ ... _--_._--- < - - - - - - - - - - _ . _ - - -
o
-----------_._._-----_.
.
----~--
-- ._- --
LCCTr\
OP
13314
13322
13322
13334
13342
13342
13354
49 13150 COOOO
133~6
-0
__._-----_._.
13374
13374
13386
13398
13410
13422
13430
13430
13442
13450
13450
13462
13470
13470
13482
13494
13506
13518
13530
13542
13554
13562
13562
13574
13586
13594
13594
13606
13618
13630
13642
13654
13666
13678
P/L
Q
44 13342 12853
49 13290 COOCO
15 00700 00004
11 13~05 000-5
49 13194 COOOO
13605
12862
13430
12E54
13114
J6141
OCO-O
128'54
COOOC
00000
32 12854
49 13114
ceooo
cooce
16
17
44
33
49
16 13605 J6151
4q 13482
16
17
44
44
15
44
11
49
13605
12862
13562
13574
00700
13194
13605
13162
oooeo
J6161
-COCO
12838
12854
CCOOO
12853
000-5
oeoco
44 13518 12854
15 00700 oe005
49 13530 COOOO
OCOCO
13905
13607
13925
COOJ8
15041
J3686
26
41
44
27
12
26
16
49
12846
13906
13642
13926
10794
17143
09403
08210
26
11
32
12
26
26
14
13716 10194
13716 000-6
ocoeo
1368l:
-0
13686
13698
1371C
13722
13734
13746
1375B
13170
13782
13794
138C2
13802
oeooo ccooo
14950
13757
11453
11173
46 12284
4t:; 13802
49 11504
000-2
14950
ceooo
000-4
01200
17175
COCCO
14 17115 CCOJ4
- ._------
-_._------
PG LN
12
12
12
12
l2
12
12
12
12
12
12
12
12
12
12
12
12
12
12
12
12
12
12
12
12
12
12
12
12
12
12
12
13
13
13
13
13
13
13
13
13
13
13
13
13
13
13
13
13
13
13
t3
13
13
13
680
690
700
710
720
730
740
750
760
710
780
190
800
810
820
830
840
850
860
810
880
890
900
910
920
930
940
950
960
970
980
990
000
010
020
030
040
050
060
010
080
090
100
11C
120
130
140
150
160
170
180
190
------------
LABEL
CAOOK
MNEM OPERANDS AND REMARKS
B
OORG
BNF
B
OORG
CADDl
TOM
AM
B
CSUB
CSUBA
CMUlT
OORG
TFM
BIM
BNF
CF
B
OORG
SF
B
OORG
lFM
B
CDIV
CMOB
OORG
TFM
BTM
BNF
BNF
TOM
BNF
AM
B
CMDA
DORG
BNF
TOM
B
OORG
TF
C
COMMON NOP
BNF
BT
SM
- TF
TFM
B
OORG
TF
AM
SF
SM
TF
TF
CM
BE
BNR
200
B
210
220
CM
OORG
PAGE
CAODI-12*
.-3*
CADDl,INST2&13*
CAODJt
·-3*
FlAGSW,4*
OP.5,lOt
CAOOBt
*-3*
OP,AFAOt
CODE"lOt
CSUBA,INST2&14*
INSTl&14:t
CADD&24*
*-3*
INST2&14t
CAOOt24*
·-3*
OP.AFMP*
COIV&ll*
.-3*
OP,AFDV*
COnEt
CMOA,INSTl&14*
CMOA&12,INST2&14*
FlAGSWt
CADDB,INST2&13*
OP,5,10t
CADOlt
*-3*
CMOB-12,INST2&14*
FlAGSW,5t
CP4DBt
*-3*
INSl2&6*
PUTI,PUll-lt
*&24,CUMMON&1*
PUTl,PUT2-1*
PUTETB&6,18,lO*
SYM,ACC*
CSORN-l,*&20*
SMllUt
*-3t
*&30,PUTETB&6*
*&18,6,10t
t
PUTOMH&6,2,10*
*t23,PUTOMH&6*
OMMlt
CHI,4,10*
SSC*
*&20,CHI&2*
S&12*
"'-3t
CHI&2,14,10*
2.o¥
24
..-
.....
-----'-----~----
. -......--,--,....-......--,........,..
---....----...........--
........_...
_-_ _----_ -._._ - _ _ __.__'--...
~-
...
_. --_._- .---
-
-.-----..-------
OP
13814
13826
13838
13850
13862
13814
13886
138<)8
13906
46 12160 01200
13906
13918
13926
13926
13938
13950
13962
13974
13986
13998
____
14010
14018
14018
14030
14042
14054
14066
14018
14090
141C2
14114
14126
14138
14150
141t2
14114
14186
14198
14210
14222
14234
14246
14254
14254
14266
14274
14214
14286
14298
14310
14322
14334
14346
14358
14370
16 13961 J2824
49 13918 00000
14
46
14
46
14
46
49
P/l
11453
14Q20
11453
14920
11453
14920
114R2
Q
COOl<4
01200
CCOKpi.
01200
COOl3
C1200
00000
16
31
31
43
43
16
31
49
13961
00000
00060
14C18
14018
14451
00000
14452
J2840
14688
44
33
13
16
22
31
26
44
26
45
26
31
26
11
44
12
26
12
16
49
13986
00013
00013
14089
140S9
00081
00041
14126
00041
14254
00059
00012
ceooo
000J5
J7133
CC099
OOCQO
COO06
OC006
14210
COO06
00C18
COO18
14451
14452
COOOC
C0072
00013
00OJ2
oootO
cooco
oooeo
C0011
144f:0
00066
00090
ce089
(0036
16065
-0035
14460
ceo-I:)
000C6
CCO-1
oeOl6
00000
44 14214 00094
49 14138 COOOO
16 14451 CCOP2
21 00042 16065
21 00054 1606'5
26 00006 00094
26 00011 cooe4
26 00035 000139
44 14382 1446C
12 00042 COO-5
12 C0054 000-'1
PG IN
13
13
13
13
13
13
13
13
13
13
13
13
13
13
13
13
13
13
13
13
13
13
13
13
13
13
l3
13
13
13
13
13
13
13
13
13
13
13
230
240
250
260
270
280
290
300
310
320
330
340
350
360
370
380
390
400
410
420
430
440
450
460
470
480
490
50C
510
520
530
540
550
560
510
580
590
600
610
13
13 620
630
640
650
660
670
680
690
700
110
120
130
140
13 150
13 160
13 770
13
13
13
13
13
13
13
13
13
13
13
13
~~-
..
- -. _. -_ .. _.- -
..
-
----_.. __ . _ - - - - - - - - - -
----- .. _-_._----
_._------
lOCTN
..... ............ .....
..............
lABEL
MNEM OPERANDS AND REMARKS
I'E
eM
BE
eM
PAGE
SS3&24*
O~~1,24,10*
PUTOMG:f:
O~M1,-24,10t
BE
PUTOMG*
OMM1,33,10*
BE
PUTOMG*
B
5,,5*
DORG *-3*
*OUTPUT ROUTINESt
PUTI
TF"" PUT2&35,INST1*
S
PUT2&12"S*
DGRG *-3*
TFM
PUT2&35,INST2*
PUT2
TR
OUT
,SUBI*
TR
OUT&60*
BO
,OUT&12*
*&56
80
,OUT&.73*
*&44
TFM PlJTX-l,12,10*
TR
OUT
,OUT&.60*
B
PUTX*
DORG "'-3t
,OUT&72t
BNF *-32
CF
OUT&73*
,15
MM
OUT&13
TFM *&35,TOP<
*&23,99::tS
TR
OUT&81:f:
,OUT&11t
TF
OUT&41
oNF *&24
,PUTX&8*
,OUT&.66t
OUT&47
TF
BNR Bl2
,OUT&90*
OUT&5CJ
Bll
TF
,OUT&89*
,OUT&36t
TR
OUT
TF
OUT&6
,l*
,35::tAM
OlJT&6
BNF *&24
,PUTX&a*
,5
S~
OUT&6
,OUT&6=1:
TF
CUT&18
,1
SM
OUT&18
PUTX-1,36,10:f:
TF~
B
PUTX*
OORG "'-3:t
BNF *&20
,OUT&94*
Bl2
B
SLl*
CM
,10*
0-
,10*
,10*
OCRG "'-34=
TFM
PUTX~1,12,10::t-
A
A
OUT&42
OUT&54
OUT&6
GUT&ll
GUT&35
*t36
OUT&42
flUT&t)4
TF
TF
TF
BNF
SM
SM
,l*
,It
,OUT&94*
,OUT&84i=
,GUT&89*
,PUTX&8*
,5
,'5
--------- ..-.--_.-
,lOt,lOt
208
I
I
I
250-
0-."
~
---.--.---..
-----------.-.~-~--.+
- - ----_._-----_._._------ -- -
-
-.--.
.-
---'_.
LCCTN
CP
P/l
Q
44
12
12
31
16
41 __ ~5__________ .__________ 13 62 4
15 150 SLASH OS
,3298*
__ ~~2~_______________________J 5 11 0____ s.9~_~ _. __ f) 5___ _ _____ __ _______ , BA& 2*
________"
OC691
15 180
FSTSW DS
·----~BA-&3-*---·--·-----·--OC6<;8
1_5 190
SBSl-ICH OS
_ _ _ _ _-'-,_B_A_&_4_*______________
GC6S9
15 800
OMSWCH OS
,BA&5*
_ _---'0 C 1 C e _______.__________1.2 __~!lQ ____ . !~~_S?_~~.__ J!j_. __ _
_____. ____________~_A & 6
._--_._------CC7Cl
15 820 DOSWCH OS
,BAt1*
_____ .Q~_J.c Z __-'-_____ ___________________~~lQ ___ Jf~~~!:i __ Q~ __
_. __________~~ ~f!~______ .______________ ._. --_________ _
16075
6
15 860
FRMSCT OAC 6,FCR~AT*
_ _-=1.t_086
1 .
15 870 lJSEOFS DC
1,0*'
16135
49
15 880
DC
49,0*
___ 1_61~ fJ __ _____.____._1________ ~ 89JL _ ___ ____ 01_
1 ,_(ii~ _______________ ._________________ .__ _ __
02298
15 900 FIXl
OS
,2298*
n
* ________
*
02_2!l£__________________li_-'LtQ... __~_~P~J.:J ___~~ ____ ~ _____.
00060
CC48C
16141
____16146
16151
_ _~I.l:12.f
15 920
5
'5
5
'5
15
~30
15
15
15
1~
15
1'5
16
940
950
9(;0
970
gee
99 a
ooe
___ .L?_~~?_L__ '_ _____· ---.- -- --...--- . ---
FAC
FAD
AFAO
AFSB
OS
OS
DC
AF~P
DC
5
,1128*
DC . . ____ ~________ ._!.11_28* __._ _ _ _ ... _. ______ ._. ______ _
DC
~
,1382*
DC ___
'1 __
_ _ _,'-1:;....3"--4-'-6._*
_ _ _ _ _ _ _ _ _~__
DC
~
,2188*
DC
~
________ !_?J~~~___________________.
If:1f:l
5
AFCV
16166
5
AF CV_R
16171
5
AFXP
______ .l.t13_f- ________________5 __________ ~_ 010. ___EA~_E2~_
Q~______
'5
,60*
,480*
,480*
2_______,_~~Q1
______. ____. ._.____________ .______.___ .__.__._ ...___." _._._. _. ___._______________________________?2 9______ .- ______
- - - -..
- ......... -.-.-.----~ ..-... -.----_.... _-_....
0
_ _.._---
r""")5'
---------
------~--------.----.
- - . - - - - - . -..
0;
--------
--~-------
lOCTN
OP
1~186
16191
16196
16201
16206
01816
16;~13
0
171~2
0
17143
11153
17155
11171
17113
17332
_--_._-_.
__ ._------_ _ - - - _ . __
-
.. -~.-
P/L
Q
t-'9 00000 GOOOO
1
9
1
15 --240 OCOOO
1
36 coceo CC5CC
(;9 00104 ccooo
C0161
ceooo
00164
00174
OC17.5
C0160
CCSCO
CC160
C0164
00165
ccooo
1
--
.
- -
-
-_.
_.-'
--- -'---'--
- ---'
.
-
------
5
DC
DC
I)
DC
I)
FXO
DC
070
FXDR
DC
5
5
080
090
110
120
130
140
150
160
170
180
190
200
210
RVSGN
OS
0
TFFAC DC
8RINST B
7
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
16
350
360
370
380
390
400
410
420
430
440
450
460
470
480
490
500
SIO
520
530
540
550
16
16
16
16
16
16
16
16
16
16
16
16
16
16
580
590
600
610
620
630
640
650
660
610
612
6RO
690
980
fXM
5
_..
_--_ .._-- ----_.__
.- -
-
'10)'
-
--_.-._------
DC
16
16 570
10
1
16
80
11 17359 OOOKC
_. - --
_.
FXA
FXS
6
5
-
HtiH',1 :b'teb'btiritf"r"M;""!liWM ,iN)'W
020
030
040
050
060
6
B
5
1
74
1
19
4
460
.
'wlg'Ee
16
16
16
16
16
16
16
16
16
16
16
20
'''ftl
MNEM OPERANOS AND REMARKS
16
00092
00104
00074
OOCOO
-0160
00056
00160
00032
00146
COOOO
00104
.',. WU
- ._- --.---.----
.-
--------
& . . . . .: ... .... ric
LABEL
16
1<7 02298 C2297
4
K7 02392 C2391
4
K7 01816 01815
4
-_ .. _-
""'-'"\"""
PG LN
16
7
£t4
49
26
26
31
45
36
44
26
31
49
__..
..
S
5
5
5
5
5
16181
16214
16221
16222
16222
16237
16238
16253
16254
11>269
16278
16279
16280
It291
16292
16304
16312
16312
16324
16336
1634B
16360
16372
16384
16396
164C8
16420
16432
16440
1t441
16481
16493
COOOC
16513
16518
16523
16524
16598
16599
16678
lc682
..
T
PAGE
,1614*
,1590t
,1644t
,1644*
,1722*
,1f.86t
,1816*
,2600060*
"Ot
1,Ql,*-4*
OCRG *-3*
FIXl,FIXl-1,ot
BT
FIX2
4,@-1=
DC
FlOAT1,FLOAT1-1,0*
FLCAT2 BT
DC
4,@*
RVSGN,RVSGN-l,O*
RVINST 8T
4,a)t
DC
DC
9,@*
DC
CRAM
1,@*
LROUT TC~ 240
,23*
1,@,*-1=
DC
RNCD 80*
B
104*
DGRG *-3*
BNF 92
,161*
B
104*
TF
74
,164*
TF
,174*
,175
LROUT2 TR
160
,2*
BNR 56
,160*
RNCC
160*
BNF
32,160*
TF
146,164*
TE
,165*
104,60000,7*
B
OORG *-3*
DAC 2 C , PRO C ES S ! p.~ G COMPLETE@*
EDC
DAC {,
.START@*
LSTM
OAC
P,OVERLAP@*
OVERL
,0-1=
OS
OUT
6,19999@*
MEMCAP DC
FCTENO OS
5*
'ii
OS
LOAD
BUFBAS DS
1*
OS
74-1=
IMAGE OS
1*
OS
79t
DS
PHI
4*
OS
460*
OS
SYM
1*
cs
ceMP
IG*
OAS 1*
,50701070700000*
DC
16
DAS
CHI
80*
*~21,2C,10-t
LAST
At'
DC
,
2/0
30
1"
I' *
II
!'
~-
"1'' .
$"'
ttb±& ........ 'tt
-.----....
-----------~--------.-
'1"""',
~-
-_._-------_._--------_..•. _-----_._---- --." ---.---- _._-----_._-------_._-----
0
lCCTN
17869
17877
17885
17A93
17901
17909
17917
17<125
17933
17941
16071
17949
17132
17951
11344
CP
PIL
Q
4
4
4
4
4
4
4
4
4
4
1
6
PG LN
17
17
17
17
17
17
17
17
17
17
17
17
17
17
17
540
550
560
570
580
590
600
610
620
630
640
650
660
610
680
LABEL
MNEM OPERANDS AND REMARKS
OAC
OAC
OAC
OAC
OAC
OAC
OAC
OAC
DAC
OAC
SYMBSB OS
OAC
. OS
TOP
cec
DAC
OEND
PAGE
32
4,AAAA:t=
4,AAAA=t
4,AAAA:t.
4,AAAA:t.
4,AAAA:t=
4,AAAA*
4,AAAA:t.
4,AAAA*
4,AAAAt
4,AAAAt
,LODER:t.
1,~*
,PHI&450*
6,AAAAAA*
lAST&12*
!
------------------------------------------------------------------------------------~:
~~-------------------------------------------------------
.
~------------------~------------.212
.
I
------------_._-
00000** PDQ FORTRA:--J tJRf'CFSSGR Cll2 10/63
ACe
14475
lOH40 11570 13070
----06895 0"70«;5
06985
AD
06915 06955 G706!) 071 "3"5
06925
ADR
1.594C
12440 12770
AF~D
12890
15980
AFCV
15990
AFDVR
·AFt1;P
15960
12860
15950
AFS8
AFXP
14460
160CO
10830
ASCAN 01120 01150 03940
00854
AVOID 01050
0031{)
00160 00290 00330 15770 15780 15790
BA
00080
BEGIN 00220 00230 u0240 00250 OOAOO 01340
04430 04900 05010 05190 05510 05620
05860
BEP-EC 05360 05580
BGr)
00960 009fO 02260 02~260 05660 05660
14150
07045
BLKST 06925 0709')
01200
BLNKI 01)980 01010 01020 01040
01030
BlNK2 C1210
13610
13550
Bll
13540
13660
Bl2
00340 0206(; 02330 03210 03210
BRC
00390
12520 12580 1444(: 14680 14110
13020
C
11140 12810 12840
CADO
12440
124YO 127S0 12940
CADDB
12540
CADOC 1·2550
12510
CADDO 12540
12570
CADDH 124f,0
12600
12640 12680 129('0
CADOI
12500
12600 12610 12710
CADOJ
12660
12410
CADOK
12100
CAuDl 12100
12130
1711)0 171AO 11180 17200 17220 1 7 ;~60
cce
17610
17050 17060 170-70 170S0 17090 17100
CCO
17440
11780 12870
CDIV
12890
11820 1'5530
CEXP
14460
CEXPA 14520 14620
14640
CEXPB 14600 14640
14130
14650 14790
CEXPC
14700
14130
CEXPO
14610
117uO lS0AC
CECT
1~83C
14860 14970 14990
CFCTA
14950
14870
CFCTg
1501Q
14950
15080
CFCTt
00630 G1920 02600 02780 .03460 041,00
CFXN
Q8f!lQ
06550 08410 08470 08780 °IA790 03d10
02500 02580 02640 02710 02710 02730
CtiCH I
03300
03250 03470 03470
00170 00180 00210 00320 00331 00"332
16690
CHI
00339 00380 00510 001)20 OOr,20 00550
00970 01060 01200 OL~OO 01240 01210
013'50 01370 01420 01440 01460 01480
01591 01595 01595 01!,OO 01630 01630
01700 01740 0175G 017:50 01800 01800
01990 02020 C2030 G2030 02G5C 02120
02360 0238C 02400 02490 02'110 02530
0265C 02 f' ')0 02720 02740 02740 02760
03270 033CC C3420 03S00 03550 03550
03.320 0385C 038')0 C3?90 03890 04060
-----
11)800 15310 15820 15R30
01566 02064 02340 03220
05670 08560
0:
17100 17130 17140 11160
04710 04980 05200 0'1780
OB840 08810 10530
02750 02750 02770 03070
0033J 00334 00335 00336
00S10
01290
01510
01640
01810
02200
0'2550
02990
03700
04080
00590
01310
01530
01660
01830
02310
02S70
03060
03700
04090
00610
01330
01550
01660
01830
02310
02600
03240
-03120
04090
213
,I
I
I
I
I
007dO
01334
01574
01700
01890
02370
02630
03270
03820
041uf)
~
I
---------------.- ----_.- .---
04340 - 0 '+"3 '.. (: 044 ') 0 04 590 04 590 04630 0 4
c
i:3 D- 64 (30--04 74-5---043 1 0
04940 04940 04950 05060 05060 05100 05140 05140
O~150
0~7~0
. -- ---"05-76-0 .064.5C---6T4-S0 06s-i 0- -0(;-5-1-0 - o-i;~-Ul/j"080:fu'--o 8270 08351 08400
~C~R~.4~C~.O~0~8~4~1~0~0~t~;4~3~0~0~S~'4~4~O~O~8~5~0~G~)~0~B~S~\0~O~~0~R~5~4~Q~0~8~5~~~:O~O~8~5~9~0~O~8~S~9~0~--~
4C) ____________________ OR620
08700 08710 08710 08120 08750 08170 08890 08920 08940
_ _ _ _ _ _ _ _ _ _--=O:.;:.8::....:9~8:::....:0~0::.....;9:.....:0::...:.:3::...:0~0::..:9:.....:0::.....4:._=O 0 q O~ 0 09060 09260 09280 09280 0931 ;j 0933 C
09310 09380 09380 09490 09490 09S00 09560 09600 09630 09670
_ _ _ _ _ _ _ _ _ _~O~9~6::.....!7~0~O~9~6~8~O~O::....::9~6::....::9:....::0:...... a 9690 09700 09730 09740 09740 10090 101 20
10120 10420 10420 10430 10410 10410 10520 10520 10600 10870
11150 11190 11220 11240 11270 11290 11310 11330 11350 11370
11410 11470 11500 11520 11520 11630 12090 12090 13110 13190
13220 14350 14360 14310 14370 14400 14350 14850 17310
17120 17350
17310
CHIGC
0~935 0~94~ 07G2~ U70S~
CKF
07085
CfJOA
12910 12920
1298C
C~t)B
12980 13000
12940
C~PAR
09520
09600
CMUll 11800
12860
12220
CGOA
1226C
ccnc
17280
1240C
12310
COOO
12310
109S0 12450 12780 12900 14410 14e30
COOE
12200
COOF
12420
12360
CGMGO 05470 05470 08040 08040
14190
C1390
CO~M
0385C
11,670
COi"lP
07840 07850 01890 07900 07910 07940 07950 08100 08130 081sn
CONID 02060
01591
CRAM
C5440 05460 06050 06080 06~95 07600 14170
16210
03830 03870 08620 08960 08990 10450
CS
09010
CSGRN 02090 02970 03300 04670 04760 05150 06790 08290 08870 10130
08890
11180 13080
~~1~2~7~1~0~__~C~S~U~8~~1~1~7~6~0~---------------------------------------------------------1283C
CSUBA 12790
03810
DIM
013~O
0842C
DI~A
08370
DIMS
08356 0838C 08660
08520
DIMC
08354 084110
08650
0835C
OMM
03050
04590
DO
01180
04920
DSAOC 04700 04710 04720 04820 04860 04870
14030
OUMP
06680 0669C 06710 13910
02820
EFIND 02540 02620 02700 03450
04130
Ell
04810
0487C
EMM
04862 05970 05980 07660
06660
END
01530
15600
ENDSR 06630
06630
ENOX
06420 06660
07530
16520
Eoe
10960 11010 11210 15130 15350
15110
EQSW
11040
10990
EQ2
10990
11070
EQ3
11000
11110
EQ4
10740
ERROR 01260 01910 02470 02980 03310 04020 04120 04660 08090 08610
09780 10720 10740 10940 12360
01540 01592 11390 11610
ERl
10940
098.1
\
07410
05920
lS92C
15930
10550
16010
15620
15630
01125
15130
15900
16140
1516C
03800
15190
11420
02310
EXIT
EXREC
FAC
FAfJ
FAGR
FAXBN
FAXI
FAXIN
FIN
FIX
FL(1
flX2
fLOAT
FMTSP
FOF
FRECK
FSCAN
06905 06910
05700
04450 04470 04500 11930 12140 14'>60 14920 15320
12170
10390 10440 10500 10510 10590
15780
16020
1606C
16070
15510
1604C
1603C
07705
05150
06360
14270
10320
0494C
0346G
03610
15730
03890
04050
16620
01140
00020
12140
FSTSW
FXA
fXD
FXDR
FXEXP
FXM
FXS
fl
GETNO
GGG
GOER
GORE
GOTe
HOlL
HOlll
HTYPE
If
IFSS
IMAGE
INCHK
INITl
INSTI
08320 11170 11260 11420 11460 11560 11830
12170
IN3T2
0188e
01990
01240
C480C
0521Q
1555C
101
16980
IC2
ISITF
KAY
KK
l
lAST
tt;530
15540
06875
12410
16140
15130
12350
02290
10960
17240,
02370
03780
03920
---1--
0
16140
15210
1102U
02390 02430 02860 03020 03050 03280 03350 03400 03430
12330
09230
05350
04970
14200
10110
01300
02520
C3540
C353G
01280
04010
06720
01500
07760
04180
06590
11840
12080
14530
14730
1 '5.200
01670
02130
12470
12940
148'tO
01680
01594
01090
04720
04130
05570 05690 05830
i
1_
14210 14240
10290
0
03610
09890
06760 14200 14230 14240 14250 14270
• !
04190
06595
1187G
12200
14540
14840
15220
01710
04200
12490
12980
14-860
01720
01g90
04210
10970
11P80
12260
14550
14880
15270
01770
10980
12500
13020
14870
01780
02040
04250
10990
11890
12280
14560
14910
15300
01840
11000
12600
13360
14920
01850
02160
04210
11070
11900
12310
14580
14970
15305
01870
11040
12610
14500
14950
06390
11070
11930
12460
14590
15010
15310
01880
11080
12100
14520
15040
06460
11080
12020
12500
14600
1'5030
15310
01940
11120
12790
14550
15200
06520
11110
12030
12540
14640
15040
1-5320
01950
12210
12800
14740
15210
06560
11110
12040
12910
14650
15090
15380
01980
12240
12830
14150
15280
06510
11120
12070
13330
14660
15190
02110
12270
12920
14780
04330 04360 04380 04390 05030 05090 05290 05330
OOOltO 0005U 00U90 00332 00333 00334 00335 00336 00700 00750
C3180 04290 04060 05110 05120 05130 05400 05420 05480 05650
C57LO 06770 13570 13700 13710 13970 14060
07630 17020 17340 17680
2/8
0
tw··
00050
lC.'\D
165<1C
___ ~_1 S 529_______ J OD~R __ QQ1J~9
07420
0752(;
lOOP
lROUT 07140
-016350
01690
lSTM
16530
0219C
lSUBS 02180
LTPAR 02420
1511C
MOON3 079(30
OBese
MOON7 C7410
0759C
17060
NO
17400
10080
NO~B
1059C
09410
09310
NUMB
NU~Bl
091'.0
0937C
NUMB2 09430
0<156C
NUM83 09240
09480
0940C
NUr4B 5 09620
OMp.Al
00020
10835
11710
13160
12370
OP
1444C
14510
04050
OUT
16550
04690
05580
C6100
06170
-1~370
-0 C639C
16540
OVERL
PAUSE
10670
16640
PETA
PHI
C975C
0110e
0687')
02990
13950
13850
PLUS
PRINT
PSTAB
13330
PUTI
PUNCT
13·510
13580
13730
13810
00130
01620
10150
00400
01000
01160
03170
05120
09610
01610
13360
PL'T2
10110
15660
QUF:RY
02480
13900
C4410
13430
13860
O'-t240
14610
01970
13360
10300
RAce
01B40
1565C
RATY
01810
011nO
01840
03320
0339C
03370
1572C
016080
PUTTC
PUTX
RoeD
07540 14050 14060
05b3C
05640 __14180
11640
---- .-----------_._--_.
_------------_.
__
-.--
..
· ..
C· ...·r··r--
.
01470 075:>0
07660 17380
17070 17080 11090 17110 11280
102'50 10410 10540 10550
0918() 09250 09350 09360 09390 09430
09460 09530 09540 0<1550 09.~70
09')80
10830 10880 10900 10920 11600 11650 11670 11690
11750 11170 11790 11810 12120 12320 12340 12400
13260 13280 1.4360
12630 12660 12740 12770 12860 12890 12950 14460
03910
11730
13240
12440
15510
04080
04820
05600
06110
06660
13380
13r;10
13600
13730
13930
04130
04830
05700
06110
10050
13390
13530
13610
13740
13950
04280
04840
05710
06120
10070
13400
13530
13610
137.40
13960
04290
04970
05720
06120
10110
13420
13540
13620
13760
13960
04320
04990
05960
06130
10240
13420
13550
13660
13770
17360
04330
05360
05990
06130
10250
13450
13550
13700
13780
04360
05370
06090
06140
10280
13460
13560
13710
13790
04380
05480
06090
06150
10290
13470
13560
13720
13800
04680
05490
06100
06160
10370
13500
13570
13720
13810
00780
01030
01230
0318C
05130
09620
00790
01060
02200
03190
05110
09660
00820
01070
02280
03190
05180
09680
00840
01070
02290
03200
10850
09710
00900
01080
02880
03900
10860
09120
00900
01100
02890
05030
13930
09720
00970
01100
03120
05040
13940
09730
00990
01110
03130
05080
13940
01000
01140
03150
05110
17660
14030
05000
13590
13920
06600
14760
02140
14770
106'50
053dO 05500 05610
13630 13640 13690
15410 1r;430
06600 11940 11940
14760 15050 15050
02140 04260 04260
15260 15260 15290
03380
13980
04R50
13520
13890
04240
14610
01970
14770
10380
RPF~T
02680 03370 03410 03510
RPTl
RPT2
RTPAR
03320
03390
030bC
RVSGN
16180 It130
05730 06180 06670 13410
13750 13780 13820 13830
13030 13030 14570 14570
15250 15250 15420 15420
13050 13050 13330 13340
15290
2t..~
I·
----~-.-'"'"',,"'.""''''"',,'
._-"
10870
_ _0903C
0404C
15150
0073C
Q}930
S
SALT
SENSE
SLASH
SLOT
StlCNT
0794C
017.80
0810G_
SMNGT
SMTLU
SMT5T
55
SSA
' SSb
SSBCO
SSC
SSCA
SSCA1
SSCB
55001
SSl
SS?
SS3
SS4
SS5
SS6
STOP
SUBI
SUBN
11-J30
1115C
1095C
15250
11650,
12090
11600
ItOOO
11420
11770
11810
11500
11410
______ --.1.1560
11830
06450
14090
10675
15100
02410
16660
14810
0417C
1609Q
04410
02650
17660
15350
1561C
Q281Q
----
17100
15Z10
00340
0951Q
15670
1562Q
03450
__
J~?'J4C_
SWC
S\-lLP
SYM
TEMP
TEN
TFFAC
THAT
TIeR
TO?
IRACE
TRACX
IBANS
TRY
IhAG5
TYST
~A~BB
WACO
WATY
WIDTH
XTYPE
iO"l85
ZER09
1541C
lOT
11180
09010
04000
03010
00680
OC030
C5170
0(,98'5
08350
01890
06BOO
07810
10930
10870
..
----.
.
'""'.""
..-.... "."..
-,~--,,-,--'''
-_.. --------------_.---- --
11480 12130 132('0 13300 14380
09050 09860 09870
---------- -------
06190
00090
05210
01115
10010
.....
""""""--,,-
----- ------
..
_- _
..--.--------------- -
(L
00760 01930 04690 04700 04780 04800 04890 04990
0537C 05410 05490 05630 05710 06820 0688~ 06d9t:;
07780 07820 07900 080]0 0(3180 08.200 08220 08760
10460 lO~40
08880 09120 09220 09810 09830 13090
079~O 09Y40 09970
11440
11380
lC89C
15170 15330
11620 13180
11660
11280
11680
11230
11300 11510
11540
11320 13230
1125U
11340 11980
11360
01470
133-1'0
00080 10320
02180
02210 02410
02680 02790
01660 03750
0786G 07970
03460 08480
09010 09020
09200 09210
09770 098CO
14530 14580
11720
04190 12200
04140
02560 0259U
10350 13480
Q133L 01562
1548002280 02420
02890 0293(1
03570 03600
17290
1fj130 15160
003d'5 10165
09410 09530
016"'10
01110
C23UO 02940
03600
G01S0 09070
1(090 11130
.-.----.--
10330 10340
02440
02HOO
03960
07980
08480
09030
02920
03970
07990
08650
09080
02930
03980
08000
08670
09090
09230 09250 09350
09810 09820 09860
14740 14780 15190
02940
03990
08020
08680
09100
09400
10540
15300
029(,0
04000
08100
08700
09110
09440
1307C
03330
04780
08130
08790
09140
09480
03340
06560
08420
08820
09170
,09540
2)
O.:;.l(
50
06730
08460
0-:
!
08~30
09190
097'10
14590 15030
02610
01687
024'50 02530 02690 02800 02810 02830 02840 02850
03010 03030 03080 03100 03320 03400 03420 03530
03640 03860 036ao 03720 03730 03770
C3l10
0,---,1
15J60 153g0
2/7
()
·
01800
ACCJ::PT
01520
______~5 ~~___~J;Ji P ~p __QJJ_"l?
00960
16110
1660C
0
BLANKS
BRINST
BUF~1AS
1039C
1303C
COL [C T
COMMON
15640
05030
03240
0638()
06510
08530
15800
06230
1582C
0434C
05530
10790
09780
05690
1658C
03120
______
15810
CC~PLT
09430
15910
16160
022UG
OQ74C
00840
15860
09140
10895
06280
FLNUt-l-B
FLOAT1
FlOAT2
FOR,"AT
FRMAT1
FRMAT2
FRtviSCT
Cl
Q~~40
03710
037CC
03750
0445C
045CC
04560
15830
01685
C218C
_ _ ~644C
.16570
1072C,
0923C
0160C
C281C
10630
1017C
0--
l433C
1435C
1389C
1618C
COMPUT
CONFMT
CONTIN
CCNTRL
OIMONT
DMS'.r.JCH
OORCRO
DOS~·JCH
ELEVEN
ENOPRC
ERR~SS
EXCESS
EXPROC
FCTENfl
FINISH
FLAGSW
_. . -------
------_._--_.
--------------------
CC6LO
007'50
0677U
14030
10060
12510
15110
02130
0496lJ
02330
01380
01400
OR]50
03810
05960
00660
OfJ980
01554
10740
08800
C1574
C6875
-
_.. _._--_._---_.-
-.
-
--
-.-
~
"ti''"'
--
-[
--.
-
----_.-
.
059~O
NUMBER
OUTCH!<
PRETRN
PUTE:TA
PUTC:T£:
PUTCflG
PUTOf.i'H
PUTPHI
RV 11';S1
139~O
--
.
064,,0 06470
08390 0851C 08650
03P6() 08050 08354 0855C
059t";1J
041"C G4400
lC7'1C
09160 09760
07S9G 03160 17040 17170 17190 17250 17270
03090
lOl~C 1068 f )
129'JC 143 3l~
11410 11410 111:)30 12480 12~20 12670 12130 12930
14410 14\-~9C 14980 15020 15100
03560
03540
C376C
03610
04280
04320
04050
COl"C
0102C
01980
C77'3C
04890
C486')
Gf.91C
01490
0270,1
H~CR E~'
-
06210 10770
HCCNT1
HCONT2
IOINST
lRCUT2
MEt-',CAP
f\:CSPCE
_-----_._-----
0510n
0'50 /t('
IFSS~C
I F St-~CH
..
l
10230 10560
12570 13040 14670 14700 14)00 14930 14960 1508C 1 ') 0)0
FXCRFL
HCCNT4
IFRCFL
IFRCFX
--_.. _
'"!U'tl .,!'tItIl"'t·., ._.
_._----------------_.------------------
GCT(Jf~C
HCCNT3
.. __ .•.
008eO r;p.3g6
02250 03140 0')420 05430 05'.50 05650 14150 14160
O!)~2() 06 FJ 30 Ond40 068tlO 07430 07520 07')30 13900
OJ3:-'0
1A16C 1A16G
1'1160
00950
C091C
_._----00740 00770 00d30 00<360 008BO 00.-)90
C094G
C'}340
On280 OAgeO 09000 09150 09790 10140 15520
FXNUMB
-_
tst
b trimrt'
I ... ••
--------
03670
03710
03g1u
-------
ogr;B(j
11 () 7(\
-----_._---
061350 C7780 07790 17030 17040
07gr..C
0.8930 09240 094 f·O C9't 70
OeO£O 08170
Cf~GO
004GC 021CO e2Ise
1223C 13Cl:C 1311C
11580 1129C IISl;;
lu850 121CI; 1211U
C32C(,' 05180 Of, 71 C
04200 14660 147:>0
-~-.,.-.--
04170. 10690 lOE'6C 11850 12000 12010
13;:''':(;
13140
13f (:0
14'110
13:27C 13790 14420
131';0
13870 13990 14000 14070
15230
2/8
122~C
,:~:':"--~-'".'-'iJ."~~~~'~
.........
••
.. ---_ •..__.... _-------_.._-- ---------
.,
~,'" ".".,'~""",."",,,",,,'--'-"""-'"'
v
1579G
09920
01060
00010
07820
01840
SBShCH
SCRIPT
SDECOD
SKPPCH
SMlOOP
SMTlU1
05200
01100
01450
15590
17640
09860
05950
1184C
15480
02900
,10230
15870
1568C
02920
05560
STATNO
STOC02
STOPER
STCPSR
SYMBSB
SYMCHK
TESTOO
TFSAVE
TRAREC
TRNSBR
TWOOIM
USEOFS
WATVSC
WIDTST
XETtJRN
02080
10610
01230
00060
07860
00640
053 Q O
07800
04350
01110
07440
0649C
10070
09070
02000
03330
15305
02430
10100
06840
01710
02670
01450
- - - . - - - -,--i
05050' 05160 099QO 10130 10620
01594 02075 02075
00140
07920
00f,70
05'590
07830
05010
00338
08110
OOL90
05190
07960
05240
06750
08120
00710
05800
08160
06910
08140
d2210
06830
08360
01410 10760 14040 14220
02230 04610 05220 05270 05310
06915 06965 07105 01125 01790
08370 08380 09920 10030
07560
102.40 10400 10460
05140 06200 06380 06610 15450
11950
15380
02860 03020 03090 03390 03560 03610 03110
01610 07070 08210 08250 14480 14490
03520 03~90
05530 05C)40 05'560 05620
l'
---------------------------------.--------------------------~----------------------~I!
-------------~------------------------------~O
I
I
I"
I
;
I
~1
~I
!,:!,·I'.
.
I
-------------------------~--~---------------~O
219
!!!1If!N"
---
":"
- - - - - --_ .._-----------"-"--
***** l. 1ST I NG OF THE PDQ FCHTI~M~ CL T2 PROCESSOR
*****
-.- '-'---'-'lO-==-j(-~-6-'o-650"* 260004 7 GOO j 4 i--6-c-o-6-5"t;=6'o-,)I-1 10 (J 054"=06 (30"31-0139- 0 010450 a 0 12002404900242-
0 ---JC-CO 3 5-0 1 002600 090002991 70006000J40-3936000000050049000000123456 789123 /t56 789-
LM--OCOOOI023900033001J0490007205744'80046~659635941550043536312000*000036000000
LO-C0800050036001~U005()G360030C00500360038000500360000000500
K0000geOOI9925000000aOJ01100103000-11100098000-11200113000-147000920120036001950
- '500160011.3 C0- 7 54 S,---,O:. .: O:. .: U:-.6:...::3:...::0:-.-::0:....:::1:.....::9:...::6=-:4~9~O:-..::O:...::O:-..::O~8:.......-: '
_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ __
012345678912~456789-2345~789-J34561B9-JK4S6189-JKl56789-JKLM6789-JKlMN189-JKlMNO
89-JKLMNCP9-JKLMNCPQ*01611453000-01603357R99991616065-66002616523160651500459000
491734403600100005003600180005003600260005004900000000000008490015201600103-0200
-04621611317000-124160650835747005340110034000000010239164930010015004590000J260
-0538702114174700694004003717173005001600641J13172600680006411200641000-21400641
-0613J7173470046201300?60047000000430067400470430067400469490058201600000-00-*49
-069C730C3400GOOOOI0?37171730010046006940040016171110-00025111671606525111651606
-0765425171631606325171611606225171591606146008380020043008380045939111510040046
-C842886001C03400000001023Yl115900100150083900006490089401610794J669443009381711
-09173311717217174490090601417173000M34701010012002400985171754701010012-0240098
-09925171774600462C120l)1417173000P04701398013001109118-1046260106808216440110600
-1069415001010000P26011040827626011530000426011230821626000041606526011470827632
-11485000001~01264-0089261622016065261&071083571601276-0088311668117112450123416
-1223682490138601416682000-046013300120026-00001668233-OOOOOL1-*1401264-00994601
-1298350012001101264000-21101276000-23116681166834901214032000880000024000991608
-1373~4602852CI2002714750147493116681171122601661050611416682000-031166811668346
-14491650012002101~610d125450142216682260150001656310000001218490151403116683111
_--=1524723116681166831416682000L34701670012003116681166834501594166864911444014166
-159982000K44611444012001416682COOK34701562012004905282031J717217174490141004501
-1674526166861411173000M647C17180120011113560P1701417173000M94604584012001417113
-1752~746057060120014171730CO~44604520012001411173000M24701858012001411183000N14
-18216C6134C1200151592100004490046201417113000M34701926012001417181000N647067240
-190213C04604~520120049012CC01417173000N9410191401200141117100003460635401200141
0
-1977717300C024607160C120C1417173000N74602210012004602346011001417173000M1460240
-20522012001417173000~54711576C12001417179000N7460633401200410213801300151592100
-212914900462045064941718149073240430211817183491157601601512-269031111721118449
-2205139801417115COGN94602314C12004107140011003117172171821417113000034702294012
-22823117112171801612£46-2882490748203117112111821612846-29544902482014171130000
-235733117172171804702450012001612846-291849024820311717211184141711300003410247
-243412003117172171801612846-2798490248201612846-28341612841000K7141117300009460
-250925300110017113560P1731709118-25422602564083561612851-000616128550-00*211392
-2584613925261284602812450262217175490672401411113000K33117170171124702602012004
-26595027021117~160CB92-2158490054601601S12-15141500698000001109404-272626027491
-27357943112847000004502774171751612846-391427139261392~1210194-000949026020J103
-2810938-2B18N3564t44C062644259566463495545620*311717216681260288108276110000400
-2886-62602905C827615000050COOKll16220-00062714162141611603145000J11603630J66883
-2961116679045091~03575000CC3117172171744503028171131600892-39944900546014171130
-3038K3460?984012COI417173000-04602Y84012001417173000K447031~4012001603635-27261
-3113603654-29841603145000~14903612017113,60PI114703142011001411173000M041040460
-3188110014171730000946041820110025036311117316035630O-001411113000M146033600120
-32641417173COOM447G4(l46013004603360012001417173COOM94603360012001603563000-0141
-33397173000M64604046011003117172171141709178000-CI703658000-0260401917143160363
-34145000-04403552035622704034040331417173000-3410404601200311717211114210403404
-3490331417113000094704046011CC1709113000-03211142000002603635171433303632000003
-35~530363400C003203~3~OQOO()3203631000001603654-29961103630000-51616688-00002116
-3640681036234900000000321714200000260363311143220351517143470373001300141714300
-3716-046093180110017113560P1721417173000KI4103793012001603635-32981603654-29724
-379190361204602984011001417113000-44704046012001603635-35741603654-386649036120
-386616C3896J66822103Sg61668131COOC0162192503925166814303933002101116681000-1261
-3941(6881606~2116Ae8166B12714426166311600892-0894490046204304014111834904046031
-4016171721718449C29R6045C93781717317113560P1711603611-4126321114200000260408111
_4CJ-4091143410799602203j7;G4G79470J7300130C16036~4-41021603611-29961204081000-14603
.
.
220
-4166(-'120 11004902996tJll09f73000-Q2 70-4{)-j-t;o40-31 C4:C7 rr30fJ-b0746043Z20 1200141 i17300m'-1
__ -424184704058012001703A5BOOO-01603635-36901604413-44343117172171741603654-436649
-431 736120 11036-58ooo-oT6-o363~-36541604413-44904(f64302o 160 36Z3000-23217142000002·
-43933635111431603654-44344Q0361203117172111741603654-44662AO~~3~1717349036120
-446811143000-14604422011001603A23000-54902984-074900000*1500699000043117172111
-4S444909532031171721718415006990000M4909S3203117172171181616902000M91611453000M
-461991·500697000013200702000004<) 114l)60 331 7142000(1)331714000000331713800000331 i T j ___ =!t694600C0024171430414j46047560120011113560-07602455562450*000000003100000052611
-4169417185G00094104~400110025DU009171853117172171B81411113000[)94604852011001711
-48443560-0111606020-GOO~160~151000K0490506eO?604q071079431128310000026128301621
-4919331128401625444049521281749049640271390613905440498812838271392613925430503
__ -499421283831C000005112210000616065490504403100000052161600020-004131J1112171741
-5069106002-50801406020-0041410~116012001606020-000511C6020000J24505056111151714
-5144452000M41605151000M44900462043-00240005349000000000044000000006049000000140
-5221600-0004600000012004600J000110049000UOOtMOOOOOOOOOOOM9000000t31111721717617
-52919118-53062605323082761200004000l61417173000K341053660120*11113560-078170940
-53124-5318K6P00110538926000060835726056890835116057040-0011605528-5689311117217
_ _-_~4411141411113000P046054860 130l) 1709404-551017091 73000-02603351171431105528-0005
-552226000000835145054381711526000110~6944405S82000081~000000000J1114452000J22AO
-559156941606526056410564A1105641000J94511338000003100000056851105648-0020260835
-561211651249C0462-CCOO-OOGC-OOOO-OOOOt3111172111301411173000K446051980120031000
-515011311109118-51662600005083,61714452000-8490046201~06020J6153311667907068150
-5826698000013111112171141106002-58581116681000-41106020000-44305822111122116711
____ :- 5 90 11 606 5 ~ 116 124 160 6 I) 2 116 13 f) 16 () 6 5 3 11 7 1 7 21 11 16 1 1 0 9404- ') 9 5 4 1 Cj 0 0 6 980000026 1668 808 3
-5976~72114486166814g00462000001109178-60142600000083562606048082164406010000052
____ ·~051606068Cf.) 00 1490000002606092(182764406102 000044'10605 002606119082161600005-0090
-6126490605001106566-61463100000066822100005083561714452000J62606199082162600004
-620116065260C088083572616220160653316216C00003100089162163100091162143100098162
-621611211471~1419121C00061606526000100a3561714452000J24900462032063540000049063
-63516603306~~4000001706566-03133100000066902606412082162100006000041114452000-8
-64264400462063542616071a83~71216011000J0261622016065211415014149490046201706566
-6501-65C6310C00906711260000~083562100011160651714452000J249061240000031171721
-6516141411113000094706566011001109178-66142606655082162606660082161206655000-1 .
-665160000900009260668,)06 s t 5499~i 16 504')-·OOJ 0049-000Q02 6-00CKOOOO 1 =tJP00002-00 12 *44
-67213974001013100000070311205648-00202606733056433100040000002606R02061H3150uOO
-6801*11C~?~~CQi02606838068022600000162791106838-001026068740683826000001621~26
-6886600G~~L60001100059260001a00044260002300054260003000049440696400001150000000
_ _-:f: C;b~;}L406988000191500() 1200002171445 200016110 115 3000164106 7360 12004903914JJ COI)OO
-1043 J 4000 C0 t.J 0 0 0 OM 7000000 1100*- () 8 J l 0 0 n 09000 - 4 L 200 (J 9 r:; 0000 OJ 100099- 0061 K 6000 ? Y 0009
-71189K6CC065COOOOMRGOUOOO*1612825000M84907284031171121118026128310119949012240J
-7193702452-3111172171861612B25COOl41709178000-026128351714333128320000045072841
-72687173161l835-G000311283t16275271J906139C5490672404902562*3100000073161714452
-7346-816146~6-736cl4~1463201~14Ae6J4522450740016~99490742404307424004593816~9~OO
-14214C0261653016C651617143COR991609403-7468490321002616535083~7261654008277311A
-749654116086311659116~08?6C7821165181108357000-11607671-83574601834002004307834
-1S134592607594082112600000C7725260777307~941107773000-21607620000-6260766608217
-164812016660CO-4260C000083571201h66QCO-52607702076663800000004004907762-@@@@~@@
_ _-_) 723@Gi411101113000J01201620000-14 7077B60 11004407-{?600000 1607671-171911082 77000PO
-17~EII08351CCCPOI408277-0C0047075640130C43019860C459460792600300310040216526490
-18737882-0152340nOOOOOl023gU2819001003600000C050C4900OOOt15165740000J1616525-04
-194923t~6521C040C3802813004003b078770C400340000000102391A44100100260802816~la26
-8029162142(C~~~7')~Qt712080280COJOI40B028J73444A0802201100150000800000260~6480eU
-8104282216135161353 A KOOOC201C21515921000C139164810010C41Nldo0000001S0815~OOOOg3
-8179816280Ca400381~j600C400490040202~0835716512260827616S11490826601208356000-1
-82541208216000-12(il1~3000J]4408310171514408242171414908526044083581714926C3~56
-83291115215171490{;J004908242R9999450AS26171534511338171522608399082162600009171
-84044344084181114~3317143000C015111440000*31000P9171342600088083512114798147974
-8419308194COA991i1717~UOOK~471126201~0017113560-a722417143111S346082420140C410B
-85542420120n241715311143460924201400311714510829~40827716~18471123aOll002~08644
-863CA3564308658002061108356JOO-11boa712J6035260870~083563208104000001108712-0(~
221
I
I
.1
'I
I'W"·"-
-8
o
r pt. r
7oii- 5i-6-b-j-s-o"c CC"i"-l--S 0 ~~-3--r;7"6(; ej-c?516-I-l-"i-:7""1 U U Ok 6151152"7000001 (-JO CJ 40 3-;177-4-4'9"-1-[2 -:i4-0 1 S006 97
-87851491?~12C260S0S3083~71417173000K446aAA50Cl?00440q12200699490905401208276000
--~
C ,i
08'2 7
q 0;7 2
1 C 9 () S ? ,:) G0-:'" -1 311 7 1. 7 J 1 7 1 7 2 1
fj C 0- 026 1 99 '} 4 1 l14 3 3
- 8"860:" i i6
9-27
62 () 0
i 0917 0
C;3 if i
_ _-_8_(.:.....)12,11 '7 1 TO), 7 1 72 14 1 7 1 7 l 000 - 4 4 A 0 '-1 11-) 4 U 1 ? 00 2 6 111 ~ 3 1 7 1 4 3 1 7 0 Y 1 7 8000 - 02 3 1 71
-90119600C
I) 3
1 7 1 43 3 2 0 a
031171701.1172220905200C9Y161S999-00G04509086171751~006990000()49004~2u
-908614111730CCK3311717CI717246091140120017113560-079450~53217175490912202209052
iTo 92 2cfbc-6=T2 5 1 7 140 1 7 173 3 11 i 1 76-1 'II
- 9 16 11 11 43490 904 ;Ecco00 f6Tii 3 c~o ~-oooI '6 0 (~'Z-2OJ -i 139
-923672450925eI7173490930~CI417113000-0460922601200I417173000094I)U92020110()14U9Z
-9 3112CJ 71434(: 10392 C 1100260':; 35309 2 202 61 7143000003217140000004409380091 76422-(0947)---9386309171490821COOOOOI417173000-31511527000004609780C12001417173000P0460978COl
-94613C0141111300C~84609496CI100490q532C1417173000N54609532011001511527000021609
"_~) 6 5 6 2 J
7 1 3 ') 2 6 1 7 144 1 1 4 1 9 ~ 6 ] 7 1 3 5 1 7 1 "3 3 11 7 1 70 1 1 1 7 2 11 095 6 2000- 2 1 41 7 1 730 0 OM 046 1 04 f, 0
-961213003317142CCOC0331714COCCOC331713800000331713AOO000490821001409q38J71401~1
___ ,_-:,~_2~7152 700C02'461 C 392C 11 00 161 71 35 O-CGO 2 f 0'] 74 30993-3261714400000321 714300000321714
-9768490821COC0002611143C81651f09779J004816CY938J71361417113000P0470986001200311
-9843717 217174490981601417173nco- ~460Yge8(J120CI4171730l)OO<.J470Y6720110C140')938J71
-99184346099440110025G000017173311717217174110993d-OOO1J117135000-14909860026101
____ ::-- 9 99 3 5 0 0 9 9 3 8 1 4 1 7 1 3 5 COO ;\J 1 4 6 1 CO 360 1 ? () 0 1 60S' 7 7 9 J a 1 562 6 1 0 09 0 a 9 7 7 9 1 2 1 7 1 3 5 000 - 1 3 11 7 1 721
J0068717414171730CCP0460CCCC012C04710176011001610090JO1561410150J714346101560110
J01442500000I71131110150-00C149100S001417113000M5471036801200261036609978141117~
J0222K0411026C013C04710272012CC15103570C0023117172171742510367171753117172171{61
JC297417113COOC94710356011C022103661C3672510367171733117172171741117135-00004610
J0372392014CG44104041713517113560-C731511~2700C003217143000004308210171361617135
J0450-0490821C014C9562J714S47Q95~~012004404724007G2490465202610538082761210539CO
J0526JC4408~1400C0526105621053A4410~720C00649ce514015006980000231108191082326108
____..J..Q 6 0 1 2 3 C 8357 1 11 0 8 2 ;2 COG - 1 26 1 06 S4 'J 8,2 76 1 2 1 C6 540 a() - 1 2 60000 400004 1 7 11 0 14 J 066 8 31 0 COO 5 1
J067660612210822112171417173000~3461003801200441093000C0931171721117415006980COO
J0152251082611527431130600700III079400!)-9310000010819261081a09403499876500000000
J0828-0CCOOOOt01711014JOH50JI00010160~723JOOU41121732000960000022108220009921108
o
J090322C0004441093UCC0144910716G1111311COC-12AI082S113171311317000J51610996J7133
."--------,
J09782210996C00993100000000G14~107280aOOOlSl1207000031616071-000-16112170-000311
J lOS 371 721 71 7414111 7 3 U 'J 0 C 94/) 111 q 2 0 11 0 \)1 70 q ';
320 uo- 2 2 f;
1!:J L 7108 3 r, 7141 71 7 3000J 046111 7
Jl13012COI417173000K0471121H012001~11~07000023117172171741709178000-026112171714
J12C533311217CC0002611?361101)49JOCOJ01417173000~44610~04C12424311260006Y8311081
JI28091C8282~IC82308J5749107j20,3210a2600J-0150c10oooo004910776017113560-01400000
J 1356261144111355'391142100100 1 ~;o 04 t:; 99.9 cQ~J2.9,,~-,'1).2_Q~Qo 1~_~.9_~~}7 !+-00000000r-15 59C;9~ 6 ""' 90
JI432555603000CO*lSI14530-C-I)1615J4l00-COIA14gS0J69021~10794J6694451116417115141
J 1 501 14 5 3 C0 CL 346 11 5 8 "~ C l 2 C C 14 1 14 ~)' COO 1< .v /t (:; 11,_~L(~_~_LZQQJ ,~!l~, 5 3:) 0 0 K447 1 2 3 800 1 20 C 1 7_~_~_~~__
J1582AO-0711712862000-J441~74400A~A43116B~1283343Ll~6G122544~1170012836441173l12
JI65785233UG6g600n004l1~744l)~111A3~1~S~44~11~~00311282A123J13112B3112g474ql~9720
J 1 73 2 2 6 1 2 8 30 1 2 83 52 h 1 2 d 35 1 2 ? ') 14 9 i ') 9 6 ' ) 0 1 /i 1 7 1 7 .3 a COM 0 4 7 1 1 '3 1 20 11 0 C t ~ 00 6 970000 C 1 709404
i)J}Q~6 O.Q~_()0.1~_llI1} OOOJ 04612 07201200141 71 13000
J 1 88 2 K C4 6 1 20 A 0 0 1 2 ~ ~ ~ 1 .5 0 (: 6 'j 7 0 ih) ~J C lIt 1 I 1 7 3 COO - 4 !~ 6 1 ? ? 2 't 0 1 2 ] C 14 1 7 1 7 3 COO K 1461242 '3 0 1 2 C>j 1
J 1 95 7 it 1 7 1 7 3 G1..) 0 J 446 1 2 136 C 1 2 0 C 1_ 'i II LJ _}JL~ll< !!~_?_L~J }2J.1_ ?:,(~ ~lX~ 1 7 17 3 000 l. 3 4 6 1 2 5 000 1 2 00 1 It 1 7
J 2 03 2 1 7 3 0 a 0 - .3 4 6 1 1 7 R 8 0 1 ? U 0 4 9 1 t '5 7 (; U i r 0 0 7 ! H>; () () () ') 4 3 1 2 : c: 4 0 () 697 1 r; 00 70000 (] D 0 4 I) 1 23 GCOl 5 \)
____ ,,_fl_B_O 7 J 1492141 71730 r; CL 34611 F4!l 0 1 <)~~3 j
J210869700CQ01117172111744~ll41?01417J75cnO,J44112~2d01200jl17l70171721~C07000000
J21835491247~Gl~OUf97CaOUlllL~04100G-14914920(:141L453OOOL34611576012004412284LC7
___ ~ 2 ~ 1) <) 2 14 1 7 1 7 '5 ceo K :3 4 6 011 84 () J 1 ~ :J 0 1 Lt 1 1 4~i}~_~{L~2t:.~; It ') 1 ? 7 ~),4_I;J ?_9 ut~J15 5] ~;(~~j K M4 (, t~~ ~~o_~~Q,iJ,1,-':t:
J2334114530COM6461~3~20120014114S3000~J4604A840120014114,)3000J046130900120014114
____L?_~Q9-.2 3 CC C K.Q46133.l~912 00 14 114l'3! d~nv
t'i{2.LL~]~),~)1?(1~l/~LL~_~~OO UJ I t 46134500 12 00 14.114~:3 0
J 2 4 8 6.J M4 61') C 2 G 012 C (115006') 7 CC C elI 512 d? » C\)O '; t, 2. 612 S 5 91 0794121255 'lOC 0- 93112826 000 001
J2561'512836COC004~14)2012~3~4412hl)417~344Y149Z001~1283~-OO~02713~06139052f12A~8l
J 26362 55 <) III 26 58 C ~~ 0- 8 32 C Joe J 0 i~ V) 0 1+ 9 I? ? 1) 4 tJ ~ f~ 1 2- 7 07 1 ': 79426 1 2 7 c:. RIO 7 9 43 1128 3 100 () 0 0 4 '-11
_, __~t2 7 11 2 74 0 1 2 E<, 3 8 33 1 2 H 3 8 GO:; 0 f) 4 9 1 2 -, ::i 2 () ::3..1~lS 3 ,j GC~~~Q_9']-.l 0 U 0 0 a 1 ~.Q21 3 1 J 7 1 12 1 11 IiL2 1 ~~5Q~! Q.~),
J 27 86-22612E 11149 co 2 6114~ 3C(;0 DC It j 1.'149) ~)COC U 2f;(}006 GOJOU (;-00*:27 004800UOOO-cotuOUOO
___ ,J2~Q2 2 6 12Jl) elf: 2 1 3 1/) 1 ? H 't 1 () 0 i. } \, 7 ~~ (:,1? ) 4 S 1 ! ) ,I)_~~~_ LLi ~. .lL219 4 3 11 2 84 7 () l~; 00 0 1 2 12~14 5 0 () 0 - 9 j 1 1
J29372831CGC004312972122'544113J~~i2~J~~24313J~41?8381411453000JN4616020J12G01411
o
J '3 0 1 24 5 3 ceo I, 1 '-I (; 1 ~l 7 'J d :] L:' 0 Ij 1 7 1 1 3 ') 6) - 07 5 1 1. 1 3 {) G,) U GC I." 0 (t;> 1 4 L 1 4~) 1 (i 0 0 L 3'; 6 1 '56 8'3 0 1 2 0 ;) 4 -) 1 ~ '.)
J308732016136(5J61411112H6ZCO(-O~~1~21~l2~3]4~lJ32?12S~41~on~COC000344131~412153
___ ,_,Jl.l_9,21,_Uc-~ 4 7 1 2 :-3 3 11 () 1 3 ~ 07 0 () CJ " J 4) tl-'L~~Q!i_,:~l,l_:~I~J,~~~l} ftlJ}_L!_~!?1!) 1 .3 i>~}_O.-9 0 KP 4 <) 1 3 ,-; 9 ~ 0 4 ~__
222
':,~
J32373302128544413290128531500700000041113605000-5491316201113605000-51500700000
J3314491315G0441334212853491329001500700000041113605000-5491319401613605J6141111
J3389286200C-04413430f235433128540000049131140321285400000491311401613605J615149
J34641348201613605J616117128n2-0000441356212838441351412854150010000000441319412
0'
J3539853111360S000-54913162044135181285415007000000~4913530026128460000041139061
J361439054413642136C72713926139251210794000J82617143150411609403J368649082100261
J36893716107941113716000-63200000000001214950000-2261315714950261145300000141111
J31643000-4461228401200451380217175491150401417115000J44612160012001411453000K44
J3839614920012001411453000KM4614920012001411453000l346149200120049114R201613961J
J3914282449139L801613961J284031000001468831000600000043140180001243140~800073161
J39894451000J2310000000060491445204413986000123300013000001300013000J51614089J11
J4064332214089000993100081000002600041000714414126144602600041000664514254000902
J413960005900C893100000000362600006160651100006-00354414210144601200006000-52600
J421518000061200018000-116144510QOL649144520441421400094491413801614451000P22100
J429142160652100054160652600006Q009426000110008426000350008944143821446012000420
J4368-51200054000-544144520003~1200042-00121200054-00123100024000361614451000004
J44439144~2000331445200000261448~1445149144980003214452000001414564J659946146320
J4518130044145581445225000001668231166821668325J6524000003100000000011116065-000
J459311114564-00011214485000-1461449801100421614564J6524431466800459381651900400
J46682616523160654914522013-0000-000032000960000021-0099-000016-0011-000022-0070
J4143-0099t03316216000-03100089162143100096162152600088160113300084000001414888J
J481866144114882013004314858004593816599004001614888J659915165990000*31J65990008
J4893415000790000*1114888-001542431498B001001114950-0002260000017113261145317113
J496B311111211114491149203217173000001~0010000000491493201613605J61711712862000J~0441516130000011516128000014415092128541113605000-5441522012853311531612831161
___J511928380-00C2612830128511612835-0Q60211390613905311283115316261283016213441529
J5194612831271390613905491523204415296128314415216128382612835162651613607000KP4
J526991359401613601000MJ49135940441525612838311531612840261285216266211390613905
J53442113926139253112840153764915216000000000000000001112862000-0261284612835311
J54191110111724415520128544415576128534415476128381500700000021613601000KP311282
J54944162S41612851-0060491360604415644128531613607000MJ4415500128381500100000024
J5569915500044156001283815007000000226128301621331128311284121139061390549154160
:.
~O
.
.
J56441613601000MJ441360612838150070000002491360601615119J6222491572001615179J6?~~
J51198161~813000K133006960000031153761283131128311284131128401622244158001283749
J5194158120271390613905411392613925441586012838311284016254211392613925311283115
J5869316311601112A312612830123351612835-00601615813000M1411594000696491596003112
J5944824160044915912032144600000027139061390533144600000049067240J1-2586R050--00
J6019t1613605J60551511527000004YI5068-2000-196400000*00000*OM65659544163--000000
J6136t-0480-0420-1128-1128-1382-1346-2188-2152-1614-1590-1644-1644-1722-1686K600
J621260M900000*K10229802297-00tK10239202391-00*K10181601815-00*-0000000**15--240
J6291t3600080005004900104044000920016149001040000026000140016426000000017431-016
J636911545000560016036001600050044000320016026001460016431000000016549001040N159
J644456434562624955470043565457534563450*02634159630*N66545595341510*J9999*OOOOO
J1156-05010107010000000000000000000000000000000000000000000000000000000000000000
J133211173590POK01500000000t031J999917353451133200000261651211362261651816512311
J1407718900500251176817789251776911191251711011193251777111795311118817196141711
J74821-00C0461110001200451152417797371718900500161195900-00261195111795261756616
J15575182600000119591216518000J01611619J19481111619000-2431759617950261163811619
J1632310000C117142~11662165182600000179~91216518000JOI211111000-14911464016J7113
J1710-tl111706000-21411106J733241111000130015000790000*4908010-00000046000000000 .
J7186tOM1414141M1414141M1414141M1414141M1414141M141414IM1414141M1414141M1414141M
J78611414141~1414141~1414141MI414141M1414141MI414141Hl414141M1414141M1414141"141
J1~364141M1414141-*M1414141414100000000QOOOOOOOOOOOOOO00000000000000000000000000
OtOOOOOOOOOOooooooaOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO00000000000000000000000000
00000000000CI0203040002040608000306090210040802161005001510200602181420070411282
008061422300908172~300000COOOOS0607080900121416181518112421202428223635203530454
0363248445532494653604846~462154453621180123456789123456189-23456189-J3456789-JK
0008SIN COS EXP lOG SQRTABS ORH AlAN
----~----------------------~~O
223
71
o
U"\
" bOtt H .. " »1
trw
"'''''1'j
t
rtt"'"'
~,
-,
,
_...
,il',1
I!~I
'I"
c
0
COMPUTER
TECHNOlOG'/
1
Source Exif Data:
File Type : PDF File Type Extension : pdf MIME Type : application/pdf PDF Version : 1.3 Linearized : No XMP Toolkit : Adobe XMP Core 4.2.1-c043 52.372728, 2009/01/18-15:56:37 Create Date : 2014:03:06 10:58:06-08:00 Modify Date : 2014:03:06 10:37:34-08:00 Metadata Date : 2014:03:06 10:37:34-08:00 Producer : Adobe Acrobat 9.55 Paper Capture Plug-in Format : application/pdf Document ID : uuid:01e52f09-37f1-b143-a529-a8cb85076015 Instance ID : uuid:3a871142-28ce-0045-a564-51fd874410df Page Layout : SinglePage Page Mode : UseNone Page Count : 244EXIF Metadata provided by EXIF.tools