?>2CB
H
>L$($HXP$H:PL$0:.HIDI!:M$ANTDDC -8P-IDQBH-TRDFHE <T  TEP HE<CHX8UTSHRSG$UHDED"HPEDFHCHE <FRD DDLEC$RP$THONHOFTTH  CA\NHESF<RDMH HEVDAP DOH HEVHBL.HL8IDPPU $VDA LS /H?D LHR?LDOLNOTL TRN
?RN
>	=RN
?: 
>	=NK<[;I18 [:K;2I2B	9+GO8AEY0I19D8F8!I0>(*$I0H>H4Y0O7H?XO6Z+<B8AI0\HK5XI0AE[4K49H8JK4[4LC3K4\I0[D2AO2K1X<BI0\K;H>[;S:*S2IR.2I$ =3SVY"/OI18 XHY)I Y	/WQ)2II)2B	9/0O2K/Y(O6Y.O7Y/O8/
P].JA,?CC?3A.A/A0S/CBCA?5TBTAT<BNO,B0B2B,GMV0J2C,]LX%JQPIN)JIK;JFJS*PM.C]<Z ZIZAZT\*SPRB\N[Y[^[	[2\A2]/]LT^PG[>2A6Z4ANCDEGHIKOPX 8?ABBJBMB B0B:B?CACSDP*E =H=P= A?>?]? ?(?0?9?;?<?=??????B?????:??2AM4??O4E .0"B"B"B"B"BBZ1<(*18!XHJ?Z]HZXK?XIL<B\L2A8!L>(*	<B*
PPI*\PH<H*?EXT MEM?(0-7)PDP-8? PDP-8/E??;O9\TO;\]X%U5U38K-M=K+>MH

9.92IDEC/X8  (MAINDEC-X8-DIQAB)EAE?LP08/LE8?  DEV CODE:HSP?EXT MEM?(0-7)PDP-8? PDP-8/E??;O9\TO;\]X%U5U38K-M=K+>MN^ZN Z%9S9TCA:DC:%WC:$%IL[?I18 [>H4Z=">Y,I
XJJ=	=HRY,K<XJJ=	=K;Y,I XJJ=	=	:J=8!H4> *7S?S><H,^J=H>Z=*V	:S?S><H,^">*6K?$($ =3IFIA	9K?=9D8FY)I)K8	7:HZY,8 XJI)H4	=I [6Q)I)	5+&: I)8J>PK4K4XJI0	=S6+Y.>I/K<XJI-	3/2HSR?1B1Y?>S/CC34C5B5L.?75CBCA<(*Z2B$R*ZD:;^8*+*W*+<B<B<B2B&P*+J%<(*42B$R*4E&Z&
$+E*1+E<B<B<B2J&*+EJ?<(+N2B$R+NF6Z84+
+K+
<B<B<B2J	D+
KY<(++2B$R++G=,:	8+	+%+	<B<B<B2J	^2C/)O3*Q2S*K4*BEFK?2CD.<(*2I$R+3(D
?J
>Z2C,X
>")>")Z<6")JK??")J%??")J???")KY??")^P??")&P??")6P??"):P??<B.(]P2AO=8![<2IJ.Z=N)[;R)N)[:R)K;[GK:[92AOG<B
GOG2A8!OG>(+H<B*<SGS9*<S<<H.)J=H>Z=*7$$OP>DAQ> +[$$OU+]$$O*I18 [<Y)I Y	Q)2II)2B	8<H/7Q	+S<+3$,0B2C/2S.I)H;+ S/NBS/CECCCBCAA1K?K>J/?O>Y,O=Y-O<[CBI,IBY?M?Y(Q?M?[;2IJ>DAQ> *<EK:\$8AI,
9B/82IW9$-K7\$B/82I$-	6I-$*$-$-I(>(*2K5<HK4$($-IK$(K;$+$,.;M*I(> *:E	6*7<B/BI)$*$-/E>D8F?H/3/JDEC/X8JOB MODULE  MAINDEC  FLD PRI STATE CNTRJOB FLD CNTRB;M/CRCKW]N&\1]IN
CCA0A-A,MR>DAH>(*H2C: .GK2\.UXMXY?2I"+:<O"+6<N"+&8M"+^8LI?> *M>D8F?H*D$$P72AMX$+$,*DI?9HY?J+<P*4
?/>H:Z+.+ROTATE $QO&\JO(\QX O6$!/79F8DXH	=QO+Z$O-Z&O5O+I^XJPJ+Z	<Z<6(POQSQX2ALC;HH\2I+T2AN?[*O[,<B+*<B
:2I/$$$U7$ <	Q8Y"$/0A98GL)SORARN
?RN
>	=RN
?: 
>	=NK<[;I18 [:K;2I2B	9+GO8AEY0I19D8F8!I0>(*$I0H>H4Y0O7H?XO6Z+<B8AI0\HK5XI0AE[4K49H8JK4[4LC3K4\I0[D2AO2K1X<BI0\K;H>[;S:*S2IR.2I$ =3SVY"/OI18 XHY)I Y	/WQ)2II)2B	9/0O2K/Y(O6Y.O7Y/O8/
P].JA,?CC?3A.A/A0S/CBCA?5TBTATI18 XK?XIH4ZJ<BQ\IJJH>ZJP*JJ[>JA[=
ZX<BO>2I\IJXH>ZXS<*X
H>Z&2ILI<B
>J&H>Z&J&8!JX> *2H4Z&S<*$S>S=*VI18 [<K?XIJ$Z><BQ8!LI< <BJ>H>Z>J>8!JX> +NH4Z>S<*>.B: JXHJA[;9LH<X8AS;+W2I/QI18 [<K:XIH4/
  OK?U.CDCCCBCAU&2DY"8H2\YIAG>(<B: L6XIAEH4ZP<BL[L2IKLC?K><(*]K>>(*2<BKLC=K<>(/;KLC:K9> <BKLZ-I8D: A"*0<BY"/8KLC7> *;KL=K6[5/5KLC4IY> /3KL=K2[5/5KLAE9H8JK1[5/5: $ <,QD<(WW<)WZY"	02C//	02C-YIK$(O.AE9H8J$)$-/]$ <.]\<5][Y"OC>EQ0XPXHX)GCAXG8X=C<<EYKC><CH8+K*=
K*)*)*X*)*X*X*Y+K+K/?*X*X*X*X*\*	*X*X*X*X*X<BO>[H*>I9D8FAEH4Z"<BI"2LY"*=I*
O>Z/I8D: A"*6*5<HPPPY"8H[=IC<K=YMP>D8F2$>P24I8D: A"<B0A,M+I9D8FAEH4[H/ML-2I\-: $ <?W	<<Y%<4Y$WM2C,
H;KI[M$!+"9F8DXH	;2AO:;9HO:[3<B8KMHH
:/9P<\ISO
?CAWLWEDCC/$2CBCAK(K*K	?8/	I)/*AHQK99K8<P*]JWZV<B.XZ	X3Z7[G[O:HQ\HS HHK7?H*D	6AO5>(*2K4\HS K C3> ***!HQ\H: 	2*!O5> +HQ\HK1	2/0K1K/XPK.\HPP+B/0O5> *?HQ\HK-	2/0O,8F?+]HHXPLPK+> +]: HHXH+SHQ\H*!= >?7BJ?;X5?<YQGB Y
]GG)E=2C?>AA?YKPL5?K?ZR;&XQK>ZLNR<(.	=A<BNRRR	=D	<CJRJQZRPQ*E.	;9F<X+C8JC:9J8HK9XPLP<(.\XPK>Z0O?	=A<BJ0K8>(K7K6[$HPK$[)O58![	2B&0"H]A	<BXG.\:2IBLA.BHLI.HP3L3A \3Q4+PW?W>2C/ZXZ8 XJ	=	<	;[$HJ> +(<BM(>(+.2AHJ
:2I2B	9Q	+
PH<H(PI Y	I)H;Y)+
QPA:S
SWSO]N]KMP0 PA>A<A:A8A4
4
O?C>> /XQK=XPLP<(+TC>9!HQXQ>X/PPPP+HHQO?
?/0X>\?6??K<	;0Y+
	:0^K9>(PVHV9DK8	;HV>(/7/.*NOYESX
/<	UH&/V>O?0>K>XQK=XPO=<(	<
=LP<(* C;\PLPK:Z(;VHPXRN(?	9FPPLP\Q:A\PPPPQ*IK>XQ
O8	7
	6/5VY<(8 Z7N(8J8J8J"8N("8R(R7*,.( 3C4< K3=HK2K1	0//.8VQZ(XPK.[
Z8O
<(/B9J(<P+RZ(R8+H:J8HP<(+]K-"8;XXPS
+G"8+[V[K,	0//K+	0///
+H+%"%PBJBMB0
XYBTIB A? ?"PA&(>6]Q?/O	E>O6A[!/>:X]K=XH2ALHXXHX9K<>P	;ILHXULHXYPHLHXZ2ALH<(+UZ4LHZ5LHZ6LHZ=LHX[HZ8 HHXHLH<(+J8!XT2ILQ9!HU>P+I;&	:DX8MBJ=>(K9K8	7	:SVHWC<> +HHT	6HZ> H[	5	4HTHUXUPX*VHY>(+*HHC3K2*ELH8!XT2IHTH]X]HWC1>(+IK0	:<EMPTY>	7HT	6+HPQH]	/*L]VO?<BC?<!
&(!B 8.?2 (]QAW?Y]PL	?	>	=	<")	;+O<(*FKG> *F	;+OKG<(*MJUXQHQBK:<(*6K9C8<(* JU> *F: ")SKG> *": ")*F=	7?HK6K8XPJU	5/4PP*0.)K3
2: ")HQ8J8JC1K0XPLP= +^<(+KXPS>PP+F*:S	5/4*&")	//4/.HQ	5/4	;+\XQHQ/S	-G9H> 	-HS96HQ9T+CZERO SYS?+Y]QXSH	OOQW<HYBTI8T<?? = PL][PA[!
XPLP8J8J8J"KLP"KPP*BC?<(*"W.KK>	=HRK<9H*OK;<(*Q8A<(/:=HK9K8	=.WK7	=K6	=.H<(.(ZW5	4J9F8F8DC3	2K1	4J8J8HC0	2K1	4JC/K.	2: O5
5.( H[J	-J/SB>G<BKJ/E?>?>B?8?>?>?>BB?>BBBBA((L29(X("(,(8)H)W)%)22U<HKFBAFG
/!BO 8!VBJBMB^A3?!CQ):B? ROOM FOR OUTPUT FILELINE TOO LONG IN FILE
ERROR DELETING FILEINPUT ERROR, FILE
CAN	T OPEN OUTPUT FILEDEVICE
 NOT A DIRECTORY DEVICEPREMATURE END OF FILE, FILE
ILLEGAL BINARY INPUT, FILE
BAD DIRECTORY ON DEVICE
DIRECTORY ERROR0&0!+<:/:	>
=
<
;
:	9	8/7K6ZPO5<(/7	4A<BG	39J8HC2K1XPLPXYO0<(8A8!XWJPXUHU
/O.XTQ	:2B$TLA/-2B	,,W/-:A
+
:2AN,2IXXJP9K*>P+BK)XX	(: 
	
&/%O$CK"XPLP?	!F/GKY2A
5K 

K^
]2K/Q>T+S>B.(>A.B]Q?/O>O-C.!:-8A?:B>G.VQ&RM>&^?T<B>:AXQ]PB/>QRRRS
!-\ZG	>2B	=BH:A/<
>O;X[K:XILI<(+Y\HHH[[	9LIX\H\<(+U9!HXHY>X+SH\\H: O8
8H[8!HX>(HZ>(	7H\8!HXXXH\8!H[X[HH8!HWHWK6?+MW5O58A
4O4K3?/2	1K0XH
/\HHX\H\H\HHW\HVF*NO.<(/-*K,	+: K[XH*/LI*0ARE YOU SURE?HT8!HU>(8AXZ/&/].:BT;5?.Y.T?96B.!95V
64K:D:A.U>G/V	?	>	=: Z5Z62C.:R5*RIHZ7K<Z5	;J6> *	N7C:Z8J78H>X*!R79J82C.I8 Z68 J7Z7*]Z6N7C9Z8R7N7C99J8JJ88J8JR7*
UPON ".", TYPE "SAVE (DEV) (FILE)" - - -I-O ERROR IN ^ - CONTINUINGNO ROOM IN ^ - CONTINUING%5I>B>A(>"G?,*0D >$/B24UZ<C?0	:0^0Y0T<B2CX<B<B<B<B<B<B<B<B:	?K.T	?EBN.YK>Z$O=	?A"8.^:O<Z1W<82B&$BHB*5B.	?*3"8B$$1H: J8$+$,2C,^:2A
;2I/BPS/8 ERROR 1:I18 ZK:XHI19D8FXJK9HJ\HPHK8HJ=+Y:2B	7"H.
"8$$.9	62C: 
;/54>42GYI>Q$>G?8
0DA9>P>ODA?L-2I\-: $ <;2IY"$ <-2NY"	?$$20K>[=I18 [<Y)I Y	Q)I)2B2I	;<H*&I)$*$-S=<H$,Q	*YS<*-2C.,.CI)H;*VEMPTY SLOTS:/0.4OUTPUT ERROR[!O/Z4ZD;&ZGN49J8J8JC.< 	-RD+]R4RG+FK!> /,N4>(/,K+	*S!: +E: ZDN4+JXPLI\HPP+/!&=J?):B.&P&W?-[.RV4YI0S>R>Q30O?0>OS/CACB?0SOO?X
O>XU
=
<
;O>
:.;&	9O88!HW=*[XJO8< 	9\HPJ*W.KXJHW< 	9HIHJXI.K2AO72IK6> /5.	4?	3EHUK2>(PZ.+Z+O1>(/0J+>(	/.5(GUY	CE"TDPQI%(MV>GI%(IBECB<+$-BB6TEO	)-B6S O	(<B3PB(PB2(DB1PB) B*D7J!NB(TFRV(%"(M9
X>A9]QT<1 F\A:D3!RMRSRRS*030SNTERDILPA-A62I.I2B$VD??Z\>D;< ZO"I0B2B$1.R8JY2L"IHPZ<3)*4S]*;3*RQ8JO<(.^ZPO?>(3/*LO?>(3+*<S]<H+$[]2K. $$6AIOZ^R
>R
=X
<X
?]$!+8 
;X
:(P7E]$+8!/R7P]$"+/X??$,J^$($-R^/]3/K9*L; Z^"R; ZP(DZQO?>(3-K8Z^; []0B3.(D87	9:9/98979699;$K8>P*TK6[4ID[<K<[;K7[3TS3*M\S<S4*IK88H>X*2ID[<K6[5K7[3K5[4K<[;TS;S3>H*.S4*"ID[;K6[4*"\S<S5*\K8< I!> *A[4; K4[4K4[3K1[;TS3*?\K48!K7> *8S4K4[3K1[;TS3+M\S4+I*AKT
?K;3.: 
>/=IJ[;TII[;K/[0T[;S0+$K:>(/\K2[;T/\??B*N?>0A6L7]6^NOTFUNDIKAD-B2I.I2B$VK??>/Z\>D;< ZO"I0B2B$1.R?=0.G4G4K?Z&$$:A$-$"*	[,; [+
>K-[.K1XO$,K.$*$-$!*2<(+9D8F\OS.*2[+\O(PZ"; Z^I!Z
+O;$Z^I!Z
+OZ^Z
"R; 0BZP(D<,RQ8JO<(+\ZP(DKT(DZQK+>(+MK/
=/<W=O=K0>(+"/<???A?W0HH<1<B< <B8A?0< <BO>>(/?<< <2:AZ0K2XOJ B.Z-LO<(*O8!J->(/?*GJ 
>O=>(*XJ =>(/?N1O<R18J<PH
<O<0.<H/;
:O:8!O<> /9R0*X	8/?(G8?UHPX ABBHBPBXB B(B0B8G G0G8CCHCPCXC C(<BK7=A8!K7< <BK6=A8 < <BK6>Q< <B?A< <BK6<QK7?Q8!K6< <B?A< <BS6* W=8	</;K>[0$$:A$-<1+1[8(P;T;H:";B:!;,: ;%^C"G,
"9.B$ <6RMY/$!,
Y)$%I)=[QKQ<(,
I ? ,
I)AE[RKR9H8J8!I1?H,
KRH4Y*KQKS[RORY,KQKXY+I*Z1<BM+Y-2AI-?RG.GI-9DAEH4Y.I-:H5[QOQKYY/I/H?[QI.[K<B8 OQY02A.9SS^&6:K-JN^B  OK?^E$%$[,]$ =3S)Y//2K/-N/*Y)2LHE[;2AK=ZG*Q+;S/"9<B//S8!<BNO,B0B2B,GMV2C,]LX JQPIN
JIK;JFJS*PM.CY/Z ZIZAZT\,SPRB\[T[Y["[-[9A2]$]JT	PG]I2A6Z4ANCDEGHIKOPX 8?ABBJBMB B0B:B?CACSDP*E =H=P= A?>?]? ?(?0?9?;?<?=??????????==??2AM4??N<B>DC?	>G)Y9Y2.H:<B>DC?	>5?$$G1	=*N*[$$GO$!*S9F8D	>E^$$GU	=*[*($$GO$!* 9F8D	>E"$$GX$"*(Y18AI19DI18 Y4I1> 8 
<O<> +DK;
:K9
8K;
7K9
6	5+JK4
3888	2$$G 	=+J/1: 
0
/+"$$G%	=+S+ : 
/
0K;
.K-/
^
0
//, PF?JA9DXSHR8DD0DN[EPEQ^H^VNG2JF9XXXWS,<HS+8ERETFG8$$GKT*<H: [O$$C$T*G<H*OK?
>$$E	T*O<H*WK=
<$$E*T*W<H: [SKPCO> *(K?
;K?
:K?
9KQ8 CO> *3K=
8K?
7K6
5KPCR>(*=K?
4K=
3K?
2KSCR> +EK?
1K?
0KPKO> +MK/
.K?
5$,/-$ <	E\<2E]E^STST/T?=3/3032?=353638 MP? TS?FQL6:NUMLMTMRL8OS=AOQL
OUL%LZO$<HNO8XHNXILIXJLIXLBPHH\PJ*FR.8GI1<(*18!XHJ?Z]HZXK?XIL<B\L2A8!L>(*	<B*\PPI*\PH<H*5J]H>Z]*XIS
>88J,ZQ.8XEK=
<H
	;.92IDEC/X8REVISION BEAE?  DEV CODE:HSP?EXT MEM?(0-7)PDP-8? PDP-8/E??:O&\JO(\QX O6HSR?8FA"LZ\Z2AH IP^MT8K>>NDC: %WC:$%IL[?I18 [>H4Z5"6Y,I
XJJ5	=HRY,K<XJJ5	=K;Y,I XJJ5	=	:J58!H4> */S?S><H.8J5H>Z5*N	:S?S><H.8"6*.K?$(<B*>H>H9	9K?=9D8FY)I)K8	7:HZY,8 XJI)H4	=I)I]> +ZK6Y,8 XJI)H4	=I [5Q)I)	4+): I)8J>X9VI XJI0	=S5+\.6I/K<XJI-	3/211WS/CC\34C5B5L.?75CBCAJK<(*Z2B$R*Z??*+*W*+<B<B<B<B&P*+J%<(*42B$R*4??
E*1+E<B<B<B<B&*+EJ?<(+N2B$R+N??+
+K+
<B<B<B<B	D+
KY<(++2B$R++??+	+%+	<B<B<B<B	^2C/)O$*Q2C/-M:????????Y8Y72K$R$[Y8,G: Y&; Y$0A2K+2[8JXILI[42LHEZTI%8!K4?H*XK48!I8I&?H*V<B.K4<HI&[5<	: DI8 Z <CLI[7LI?H<Y: DIZ PILI[6>DAG>(*5I;Z2<BM<<HK7<QJ <H+GAEHE[RJ 9D8FAEH4[SJ 8D0B+I0B0E>DAR> 2<K4Y$K5Y&K6<B<B0A/8[92L9H8J2
[6H;JXJ8 JT["<BK6\JK9\J\J<D?+0I88 C9> ,X; Y$0A*T0B: Y2I8<(Q	*IQ(*II=Y	I>Y(*I,&<(L2>($2.NK91B*U: C"X*T2,*Z2J.YVY"8H2\Y,T+<<(+?[!N
Z
2L9H8J2L[PJ
9DAEH4Z6H:B
H5Z
N
HWXH<BKP\HK!\H\H>D8?H+?I$9D=H,XAEH4[PI$:H5Z
N
<XKHYXH<B<!\H=Q\H<)>H: \HI\HH\HI"\H[!,X,SA41A<B0!++0"Y9+0Y<B0^AXI!\2I8I9> +?0\0&: Y9L2>($2K!> *<;8A8D: A"2$0A,Y2H]X\$$R2A$$S>$ <7P4<.QA<5Q<-S =>P=1X+=.P-=;P*T$$SZ$ <	.Y/$$S^.G$$Y5: Y	: Y(.G$	EI.Z8<BM/Y:9VI0Z><B-:8 Y:$	P*MI0[KI,IBY:<BM:>(,
/E2LHP[=I:< +0EI.[]I/8AY:<BM:[EI:I
Y:I0AEXHHH9H8JHH]:Q:KE]:Q:]:Y:I0[7I,IA[EI:<B
ESEOEA:
E<B/PI?^C"G,
"9.B$ <6RMY/$!,
Y)$%I)=[QKQ<(,
I ? ,
I)AE[RKR9H8J8!I1?H,
KRH4Y*KQKS[RORY,KQKXY+I*Z1<BM+Y-2AI-?RG.GI-9DAEH4Y.I-:H5[QOQKYY/I/H?[QI.[K<B8 OQY02A.9SS^&6:K-JN^B  OK?^E$%$[,]$ =3S)Y//2K/-N/*Y)2LHE[;2AK=ZG*Q+;S/"9<B//S8!2J.BYUVVWHWRV2U,]I\1<B.LSTATDATA ERR IN J MOD: FLD: CNTR:RPC:I8>(*?I78!J	> *52L8!J>(*8J	I!,GN	0AZJ2
: Z&.C: Y82LZJ	Y7N	0AZJZ&2LH4ZM2A9VJM^D&E.FJJ> +X$$TO+Z$$TR$$TUI7AYZK"LNK2A$*$$TZJG\$RKJK^H"L.I2A$$T]J9H8J$)$$T JKIAXK"LLK$+LKXK2A$$T$I7AY8 HKIH$+$$W:8AI7XK	?LK$+$,IP[9Y$,I
[L[KO>>(*2SKCD>DAB> *2SL*	: [L>DAC> *2JZ[99VI7XK	?LK8!HKXKYI7XKO>> +CO=>(+AR+A$$WMKK$+$,0BY80B>DAD> $2<B0A,K  TALLY:>DACI\> SR/RLK<(+1[6IO[7<H$,$-I^[8K9$(K7$(IM$(LK$+S7S6+3$,2A/YS8+%+!CODE:T&TJTL>J,U8Y9Y2K?XA
>
=
<
;: 
:: 
9: 
8: 
JIHZ(K7Z*2K.YLGY&Y8HCXA$2,X0&Y2$$X&$[*EPFBLA.$$Y3$"+ [.K.8!I1?H,
K.9D8FH4[,$,
Y:$-+M:2A$+$ =3PM=6YIYLQ::P+U: $,
[.$%+K.]:2A$-IK$(K,AE9H8J$)I:$+*>: $	I0[,$,
IYI,Y:$,+U<B/+2A$$S],\^O^R.6P&P^PKYJ?J%JK<B$ AZGZHRA.A"A.I9D8F[Y"A.IKYRI.I"I.T9F8F8F[""I.TK"RT.T> *:8A0Y*0^AXIH\-L-I6< *02C,UI^<(*6I!> *8$,*:L-$(N R <(+C=+KL-> +H\$N Z L$. :R *::L-IU=+HH>=H+H+C=IL$(/TZIJI8J8HTJIT/YZTJT8J8J8JYJTY$-/";:AJ$(J8 [TII$(ST+5/-;4
K$(IK$(/9Z	2LH4ZS2AL.> *U80!N(> *J; ^(J	0&;<B.N)8!N*>(*J2TH4Z2A0BN(>(*%J+<B(D0A*NA9A$A&\];8F,[IR,OI8J8J8J":OI":SI*1AF<(.,IZ<(+GH:=HIGIK$(.:$,.:;2LHP[]2AQ3+VI4Y3H3Y5Q5M59H>X+ M5U5<B0A/JI!KJ[J+]9J8H[J2LHP[=KJ=[]K]9DK][]KJ8J8J:K]H3[J2AOJA 
J<B0A/$
?K>
=K<
;LV
:/9K8
7K6
5/4
3K2X3H

1H

0.M: I1> H>K/ZMJM
.JM
-JM2I
,2A: I1>(.VK+ZMK*2QXHXIIHHI\HK)HI\HK(HI\HHIH>XIRM*/2A.VL2TJ^=[790QY<5.+MB3QK8>(8,="$%;G+3J	Q-<06Z+WF5WE?0T*Z/YRE+6\+0JGQV<923)0I
46."+.L]I?8L&]9]O2I.W.KX	TBCSM\9GN/9UDN!XB0GN=0CN\U6	+,JSY*A^0X4]*D-[OK;CRGYMEP>936NU
$P\J"O!1MK>;3PR&Y5EY:S1PQ><V6B3?J>Y&EZ>\3YR%
GK;ERB!(MD>53*RI! MT>N7KP1$I.<+6J7YXM4>G3LR2!JI=8?4<25:W*D"Z&!,M7>Y;VV4	DH7\)*.)QU*G[;7RF!UM8C297Q^E5>!;
R^!FM9G;;8Z	%>O*D$Z!)HUGU;JZ()U3G-?*XQ,(6\3VRW!?MTG&;+ZR))Q]A
<Z
JLB"F)LUWG8D5^T/PW$I2N10]JO:DWZ%)4UXKRBWY=MUGAD>Z=)%UYO[DX"G-^WJLD"A1/UCO4D)"H1	USOMJ 04H>;;5Z6)
U3OFDK"11IY<I>E;C"F9	)T!*%1+]6OXLU&37CX6,(:-9P%)WZL6"E1T]?K1J6!]U4O L^"]1E]8W:L?"&5=
)T* 9O]"WTLI*/1G]2W,H)(P</>[DU"V1>]SW%L**Q9(!\Q^M[KBNY/I\A2E9K%VW?L" V4HCMB7%I
9TV*$93%
SQRV)<]TWT=*<9$%X
ZT
*F=]	I\C2B.%B
3T(2O9&%R
LPI07<OG:L4*59^%2
ETJ20BH);Y=U:S!V87($ :$B*-5

TT62B(5</C,JW-(	Y\52DBS->[0Z51\%3
	T]2\BD-?
9\>2%F</($":	BN-!	S\H:.BF-1	+X(8WE.OZTT2UB=-R	$\):PJ/)[!]]Z[A^X?H,CDJJ5U	>\3>RH!0UEOKLR65H/8$????????7(9$C^/SF5UG</02H?L"V??,5ECU)!E+*0![80(	XC\0Z7UW2O%O>K/QD\NBS<5^GO/+D=JKU52O!?8\,*"=]:Z)9A5,3&6
\;SN2S&1 M!2N% G5+\B7I%0 ,B">]]>,/\DPRVQY<C.;XF.K=5!K[1XIC4X.K BWI64"*$%!CH5	GS3IJLQ1<,.N:BYU(:\-VCS19MU6C+=B[QR<5.		$DCRZ]N>7AH-TD^W[8B1QR8.,8.DP3X7\1":%G;3LNP[^9!QK80"(?$.&F	55T5Z9%DGM35NJ
XDRMYBA$0=,*.A/PH\?Z;!FEO67+LNZ
!MPGXD .$.0+IJYY)E52?)EI+8C06(4,3*[-SOS;SR
]%G(;RVO
-D8Z*%	CB9[UHG&71P	\^"9)3M4>U7)T?^G	*H$X% J,$.5+^J6YGAS<]2"1IQ AP8T4R2Y5AW8D8^<CNN
7D,^O	\HO\ *U)7MAC1=NS\B+]WCM9HYH;=R<%\KPFR
W=\Q.G+9R[!TM0GC?P\>"V)BQDEE:)=
WD>Z2)0Q;E%>Z;8^H+?N35J:%%O:D-^C+1RU%GKDF&[;N*	FH3 6,T2O5(
YH9$N*\5	SIJB!&I<EHG5?,XL(D4>B?K\3.L3X^"++RP)*Q?A*EC69V]FKFFBHVW	:T0.37QXL,-6Z?<\N*>5S[%J6%[S1JE!2U)KMBC%BW!H]$[6Z?F\?.8;]Z7-A
-H(U0D<
:IBJ%*SCN????????+W20Z%R?VAT)
=AH=MX7)EZ/6<A+V>8,V[A:&&U\0
&4%	E<8/>89)	=ZH?M*3LG<,Y	+<8/	<:+(C+.I$D
!8P)7=L!W$4N	G8-1DEO*4%G:;.Z -Y[=RL1S-6/ (!U=+H:U&3XKY2F&X -]T;+K[2
&Y$&
M8$-THUN3QO:07%R	MV7)M[3XO:4P/CAX1OB*VX\[
<<5/VA"10N;T![\:=*6&S !!0FXTP[T:^.	 L%"1Q.A6X$,$$HB$ <>.L<0HF1/$%$$/2K0$*$$HC$ <0HF<;1/.Z: 	?>H,
K0Y-	>I*[	I.[*K12K	1: I)8J>P;$I!XK	=<B*/>H*/O<
;	=+R<B+D[:K9> ,K:&
8S82A*6,[8K8C7> +O[9PK*6<B,
: [9*6K7XHK6XJ	=<B+ +VPJ+^<B,
\H+VO<O58!O;/%0<B/&<B/)IYI,/,.PRI:5>AA?COCMCX5A4?4RR9RG< <B88K?XH8 I/XJLH	>WLH	>WLHXKHK	>WHK>(/=Q%	<2L<(*%K;H4Z!9VI.<B
:O9
8	<LJ[7LJ2A[6;$HJXJI^XKPK<H/=LH9H< *=<P*;K6*>K7<H8DW*0I/H>XJI*8AWI)=I[SLH<(/5[7LH	>	4\<S7+N/5	<\J2A/W[62LH4[(2AO\[3S\O\[2S\<BO6C3K2
62A/\2J/12CDCC/&2CBCAK(K*K	?8/)I,/,A?B*[HNLH[BKBC?>(*M8G*W9VKBI/[B	>OBBKK+
B2AQ:*DQ0*CB*	HDNLH[BQ:*
Q0*^B*355NLH[BQ:*+Q0**	=I)],I,H?XJI*\JHJH:XJI-\JI-/<LH<(/BSBY0OB[K$$SB/BLH[+K+$+IN$($-$ =33 3[: $+S[++VLHY:/NO[*KB	;	=	:S/0L0I+00J/.0V0Q+60R/41\/,4/&/)?8]+	?2L<(*NK>H4ZJ9VI.<B
=IS
<2AW;.Q.M:[:	9Z=J=K8?(*^S:8 *TK:> *UJ=IY=H*(> .R*;:	9Z>J=J>Z?J?KA[AJ=9F8F8FJ>[K<PRRRRRR.RIUY0IH	7Q0+F:[A/B;KASBY9/L[BKB8J8J8JAX	7KA[AKBAF	7KA[A/S[(9PI,S<BIYXKM,9SQ,PK++PJ+)2A/CA:34<B3.CS/0K,K+?8/)?:O+Z$O-Z&O57M?=R]R]R]R]R]R]R]R]??;&ZGJ]8 J?Z];ZK?
>K=
<$$;U	;*X*/I1>(*XK:
9K8
7O6C5IQ
4K3
6/2$$;^	;*X*6	1/2$$;/	;*X+C	1K0
/NF
.K0
-+F$$;"	1NF
9O,
7NE
4/20Z718F8&>P8VNE8 JB8 > *><P*?JD^FJ 7<J 9DB<ZC8D8A9V8F74J<^E7;+*O+.	0C0B<B8682K32	?3130.I3/<HET.AX\.H^$$;4	?**UI1>(*K>
=K<
;O:C9IQ
8K7
:O6
5*-$$<I	?*<H*-O4
=O3
;O2
8$$;/	?*!*+K1
0K/
./-$$<MK,
+K*
)K(
	K(
&/-K%
$K
"K!
 .6LD7    /1C^.	$%.&$(H2H),^H:=3H9$ .H8X5CISO(O&\QH7IF2K38	?37361O35<HET$$G$$:X$$:$$:<.IBI8K	=8"	<*M*T<B*<B*	;[*	<*PMAINDEC-X8-DIQAB-BREFER TO THE DEC/X8 USERS GUIDE "PREFACE" FOR ADESCRIPTION OF THE CHANGES FROM REV A TO REV B.INPUT VIA PS/8?  HSR?CONSOL
 READER ASSUMED.  PMK-02?OUTPUT VIA PS/8 USING FILE BASED DEVICE?  HSP?CONSOLE PUNCH ASSUMED.9F8F8F.Y8J8J8J.^.;N&[ER&OE"^"2OE"2SE*+CK<(.&[FKFKH> *=L.2KFKG?HKIKJKF	>.2? ?]AB?:KU	>KT	>	>/LBJBM[,K,
[+K,"^
/V[-K-C1[.K-8F8DC0K.K//
00GG9!;)??????????\ H9B"G2)GGA1NK,;;\	(]:P5.\F317W2UXPW)6^&4" -+XU1J&(8;F)($=F$:?]!*Z]62E!LE/6]7PT5* 99%"[:^CDO>IXVI4)9-NXP=]$D;
M[H
-U$PD13"3>7E=HA1*&8JV*!GKMT"3;	,YAZW2&GNMBTD3M	5YJ^X8	FO,CDE+J	4YJ^88PN4DF-K 59K.9AUNC4F	-\ >9L*:GVMDTG7 -Y =9L*[GGM<T?3

Note: Lines longer than 256 characters were wrapped