|LH@> +> +> +9!.9!*;S1)
00?6??= >#T< ?=>='<.0/;
0/=*8!
08!;8 
/.:9876554<(3251<(028!775F
	JMS I (200
	3		/ENTER OUTPUT FILE
PNTR,	7601
	0
	JMS ERROR
	TAD PNTR
	DCA PNTR2
	CIF 0
	JMS I OUT
WFUNCT,	0
	200
PNTR2,	7777
	JMS ERROR
	TAD BLOKLN
	IAC
	CLL RAR
	DCA WLENn	jb@~~p"}c~
}|0!nb(#z!nbnl`{	oob
FnnHx5zcH7f~r6lyxwrT5bD.X[fpG&v~9
o
HnFn6vc|6~
pT]lGo
Hngvc~
pu@	zvKbr$n
"
p|WD@Ho4~#
Yf%}"|Yc

n
{`zY{z	Y|Dz)zzYa>Xybx wz)Xv".u.t.YY ?	s+&@!l1.+~Y6YW6YYDrYY(OqZ OzYY4[ /PY#Y\B QzYa>Y4YYCYaNWW&; Hl})UIa(jz5U)Sl\&)5Yk@.RiT
00v_?P} #O H/~}"|0/{c0/$@z!0b!{g /b0zy&xw&vu&ut0(srrucq(pr"!wgwuDyJ0e	%!<%Ynm'lkwji'	hC(grhfs(erfdwx(?>,c	Ab"aduo
< `w	|C_
(Yz^

}I_]
P]'	\C
[GZ\0^Y+D0@ ?
pZ@}Xt. @@`60
	JMS TYPE
LISCHK,	TAD (215
	JMS TYPE
	TAD (212
	JMS TYPE
	ISZ CATLOG
	TAD I CATLOG
	SZA CLA
	JMP LISLOP
	JMP EXIT
TYPE,	0
	TLS
	CLA CLL
	TSF
	JMP .-1
	JMP I TYPE
LOOKUP,	TA