Google
 

Trailing-Edge - PDP-10 Archives - BB-H580C-SB_1981 - p.unv
There are 15 other files named p.unv in the archive. Click here to see a list.
x
,5n@P C
P C
P C
 P  C
0P 0C
@P @C
PP PC
`P `C
pPpCC\P C\gP [C&X'P  C!`P CT, `C4GP `C$\GP `C2a`P cC2e}gP 'C3GP aC3GP @C3s@P @C3$\GP C3&+GP !C7{GP C:!`P bC;fP C;uP C;I`P 
CJ)`P bCJ,@PCJ:XQMCJ:qQCJ:)XQNCJ:-qQ CJ<,rQ CJ=
<`P CNqP @CND P CND@P CNXQP CNd@P @CNkP CN'P 9CNiP cCNxzP CN{@P @CN:<P  CN-mP CNMh`P"CNlyP'COWP @CO[P CO{GP "CO\qP CO$wP  CO$\GP ~COHP CPpP cCW%
GP"E5|GPdE=GPdE&pPE&v.'P:E'PE2q`P 
GpP GtzP Gt9P Gt;wP Gt<P GtH:P GtHRP GtI1P Gt^P Gtj6P GtkP GuP GuJ:P Gu[RP Gv
WPGv)7PGv,PGvH3P GvI6P 	Gv\rPGvh6PGt'P G]PAGpPVG7@ G`pPUG" @G>{P eG>$S@P G>a`P WG>eH'P BG>hP G>mS@P G>mX P 3G>n@P BG>n'P BG>nGP NG>ngP CG>nGP !G>n
6P XG>nJ'P G>tigP #G>v;P aG>vH'P CG>vLGP XG>vlZP G?@P G?#@P fG?-mP G@@ GCHP GJ0P GO$P GP@ GWmP GW#@P G[$) @G[$) `G[$+` G[$HZ  IP I$@P $I$GP I$SGP I$XgP $I$]gP DIIc@P BI
7P I
IP I
\^'P DI
n0P I
n5P I
n5@P IYZP I[7P I\P I\tP I\wP I\xP I]8P I
P IpP UIY`P IYgP FI$P ;IH'P fIGP 4I4\GP 5Id]P Iv::P 8I[GP gIJP I;GP gIC@P I'GP I'P I'5P I'5gP I2MYP %I2M\GP %I?=c@P hIOEGP EIOEgP EIOF'P FIP@ IWC@P I\P I^4P I^MXRP"Ift'P GJ9P J9
P J9
P 2J9
 P 2J9
@P 3J9
`P 3J9
P 4J9
 P 4J9
@P 5J9
`P 5J9
P 6J9
 P 6J9
P J9
P 7J9
 P 7J9
@P 8J9
`P 8J9
P 9J9
 P 9J9
@P :J9
`P :J9
P ;J9
 P ;J9
 P J9
$P <J9
$ P <J9
$@P =J9
$`P =J9
%P >J9
% P >J9
%@P ?J9
%`P ?J9
&P @J9
& P @J9
0P J9
4P AJ9
4 P AJ9
4@P BJ9
4`P BJ9
5P CJ9
5 P CJ9
5@P DJ9
5`P DJ9
6P EJ9
6 P EJ9
@P J9
DP FJ9
D P FJ9
D@P GJ9
D`P GJ9
EP HJ9
E P HJ9
E@P IJ9
E`P IJ9
FP JJ9
F P JJ9
PP J9
TP KJ9
T P KJ9
T@P LJ9
T`P LJ9
UP MJ9
U P MJ9
U@P NJ9
U`P NJ9
VP OJ9
V P OJ9
`P J9
dP PJ9
d P PJ9
d@P QJ9
d`P QJ9
eP RJ9
e P RJ9
e@P SJ9
e`P SJ9
fP TJ9
f P TJ9
pP J9
tP UJ9
t P UJ9
t@P VJ9
t`P VJ9
uP WJ9
u P WJ9
u@P XJ9
u`P XJ9
vP YJ9
v P YJ9P 	J9P ZJ9 P ZJ9@P [J9`P [J9P \J9 P \J9@P ]J9`P ]J9P ^J9 P ^J9P 	J9P _J9 P _J9@P `J9`P `J9P aJ9 P aJ9@P bJ9`P bJ9P cJ9 P cJ9P J9P 
J9P dJ9 P dJ9@P eJ9`P eJ9P fJ9 P fJ9@P gJ9`P gJ9P hJ9 P hJ9P 
J9P iJ9 P iJ9@P jJ9`P jJ9P kJ9 P kJ9@P lJ9`P lJ9P mJ9 P mJ9 P J9$P nJ9$ P nJ9$@P oJ9$`P oJ9%P pJ9% P pJ9%@P qJ9%`P qJ9&P rJ9& P rJ90P J94P sJ94 P sJ94@P tJ94`P tJ95P uJ95 P uJ95@P vJ95`P vJ96P wJ96 P wJ9@P 
J9DP xJ9D P xJ9D@P yJ9D`P yJ9EP zJ9E P zJ9E@P {J9E`P {J9FP |J9F P |J9PP 
J9TP }J9T P }J9T@P ~J9T`P ~J9UP J9U P J9U@P J9U`P J9VP J9V P J9`P 
J9u`P 
J9vP J9v P J9P J9P 
J9 P 
J9@P J9 P J9@P J9`P J9P J9 P J9P J9P J9 P J9@P J9`P J9P J9 P J9@P J9`P J9P J9 P J9P J9P J9P J9 P J9@P J9`P J9P J9 P J9@P J9`P J9P J9 P J9P J9P J9 P J9@P J9`P J9P J9 P J9@P J9`P J9P J9 P J9 P J9$P  J9$ P  J9$@P !J9$`P !J9%P "J9% P "J9%@P #J9%`P #J9&P $J9& P $J90P J94P %J94 P %J94@P &J94`P &J95P 'J95 P 'J95@P (J95`P (J96P )J96 P )J9@P J9DP *J9D P *J9D@P +J9D`P +J9EP ,J9E P ,J9E@P -J9E`P -J9FP .J9F P .J9PP J9TP /J9T P /J9T@P 0J9T`P 0J9UP 1J9U P 1J9U@P 2J9U`P 2J9VP 3J9V P 3J9`P J9dP 4J9d P 4J9d@P 5J9d`P 5J9eP 6J9e P 6J9e@P 7J9e`P 7J9fP 8J9f P 8J9pP J9tP 9J9t P 9J9t@P :J9t`P :J9uP ;J9u P ;J9u@P <J9u`P <J9vP =J9v P =J9P J9P >J9 P >J9@P ?J9`P ?J9P @J9 P @J9@P AJ9`P AJ9P BJ9 P BJ9P J9P CJ9 P CJ9@P DJ9`P DJ9P EJ9 P EJ9@P FJ9`P FJ9P GJ9 P GJ9 P J9"P J9"P HJ9" P HJ9"@P IJ9"`P IJ9"P JJ9" P JJ9"@P KJ9"`P KJ9"P LJ9" P LJ9"P J9"P MJ9" P MJ9"@P NJ9"`P NJ9"P OJ9" P OJ9"@P PJ9"`P PJ9"P QJ9" P QJ9" P J9"$P RJ9"$ P RJ9"$@P SJ9"$`P SJ9"%P TJ9"% P TJ9"%@P UJ9"%`P UJ9"&P VJ9"& P VJ9"0P J9"4P WJ9"4 P WJ9"4@P XJ9"4`P XJ9"5P YJ9"5 P YJ9"5@P ZJ9"5`P ZJ9"6P [J9"6 P [J9"@P J9"DP \J9"D P \J9"D@P ]J9"D`P ]J9"EP ^J9"E P ^J9"E@P J9"E`P J9"FP `J9"F P `J9"PP J9"TP aJ9"T P aJ9"T@P bJ9"T`P bJ9"UP cJ9"U P cJ9"U@P dJ9"U`P dJ9"VP eJ9"V P eJ9"`P J9"dP fJ9"d P fJ9"d@P gJ9"d`P gJ9"eP hJ9"e P hJ9"e@P iJ9"e`P iJ9"fP jJ9"f P jJ9"pP J9"tP kJ9"t P kJ9"t@P lJ9"t`P lJ9"uP mJ9"u P mJ9"u@P nJ9"u`P nJ9"vP oJ9"v P oJ9#P J9#P pJ9# P pJ9#@P qJ9#`P qJ9#P rJ9# P rJ9#@P sJ9#`P sJ9#P tJ9# P tJ9#P J9#P uJ9# P uJ9#@P vJ9#`P vJ9#P wJ9# P wJ9#@P xJ9#`P xJ9#P yJ9# P yJ9(P J9*P J9*P zJ9* P zJ9*@P {J9*`P {J9*P |J9* P |J9*@P }J9*`P }J9*P ~J9* P ~J9*P J9*P J9* P J9*@P J9*`P J9*P J9* P J9*@P J9*`P J9*P J9* P J9* P J9*$P J9*$ P J9*$@P J9*$`P J9*%P J9*% P J9*%@P J9*%`P J9*&P J9*& P J9*0P J9*4P 	J9*4 P 	J9*4@P 
J9*4`P 
J9*5P J9*5 P J9*5@P 
J9*5`P 
J9*6P J9*DP J9*D P J9*D@P J9*D`P J9*EP J9*E P J9*E@P J9*E`P J9*FP J9*F P J9*PP J9*TP J9*T P J9*T@P J9*T`P J9*UP J9*U P J9*U@P J9*U`P J9*VP J9*V P J9*`P J9*dP J9*d P J9*d@P J9*d`P J9*eP J9*e P J9*e@P J9*e`P J9*fP J9*f P J9*pP J9*tP J9*t P J9*t@P J9*t`P J9*uP J9*u P J9*u@P  J9*u`P  J9*vP !J9*v P !J9+P J9+P "J9+ P "J9+@P #J9+`P #J9+P $J9+ P $J9+@P %J9+`P %J9+P &J9+ P &J9+P J9+P 'J9+ P 'J9+@P (J9+`P (J9+P )J9+ P )J9+@P *J9+`P *J9+P +J9+ P +J90P J92P J92P ,J92 P ,J92@P -J92`P -J92P .J92 P .J92@P /J92`P /J92P 0J92 P 0J92P J92P 1J92 P 1J92@P 2J92`P 2J92P 3J92 P 3J92@P 4J92`P 4J92P 5J92 P 5J92 P J92$P 6J92$ P 6J92$@P 7J92$`P 7J92%P 8J92% P 8J92%@P 9J92%`P 9J92&P :J92& P :J920P J924P ;J924 P ;J924@P <J924`P <J925P =J925 P =J925@P >J925`P >J926P ?J926 P ?J92@P  J92DP @J92D P @J92D@P AJ92D`P AJ92EP BJ92E P BJ92E@P CJ92E`P CJ92FP DJ92F P DJ92PP  J92TP EJ92T P EJ92T@P FJ92T`P FJ92UP GJ92U P GJ92U@P HJ92U`P HJ92VP IJ92V P IJ92`P !J92dP JJ92d P JJ92d@P KJ92d`P KJ92eP LJ92e P LJ92e@P MJ92e`P MJ92fP NJ92f P NJ92pP !J92tP OJ92t P OJ92t@P PJ92t`P PJ92uP QJ92u P QJ92u@P RJ92u`P RJ92vP SJ92v P SJ93P "J93P TJ93 P TJ93@P UJ93`P UJ93P VJ93 P VJ93@P WJ93`P WJ93P XJ93 P XJ93P "J93P YJ93 P YJ93@P ZJ93`P ZJ93P [J93 P [J93@P \J93`P \J93P ]J93 P ]J98P J9:P #J9:P ^J9: P ^J9:@P J9:`P J9:P `J9: P `J9:@P aJ9:`P aJ9:P bJ9: P bJ9:P #J9:P cJ9: P cJ9:@P dJ9:`P dJ9:P eJ9: P eJ9:@P fJ9:`P fJ9:P gJ9: P gJ9: P $J9:$P hJ9:$ P hJ9:$@P iJ9:$`P iJ9:%P jJ9:% P jJ9:%@P kJ9:%`P kJ9:&P lJ9:& P lJ9:0P $J9:4P mJ9:4 P mJ9:4@P nJ9:4`P nJ9:5P oJ9:5 P oJ9:5@P pJ9:5`P pJ9:6P qJ9:6 P qJ9:@P %J9:DP rJ9:D P rJ9:D@P sJ9:D`P sJ9:EP tJ9:E P tJ9:E@P uJ9:E`P uJ9:FP vJ9:F P vJ9:PP %J9:TP wJ9:T P wJ9:T@P xJ9:T`P xJ9:UP yJ9:U P yJ9:U@P zJ9:U`P zJ9:VP {J9:V P {J9:`P &J9:dP |J9:d P |J9:d@P }J9:d`P }J9:eP ~J9:e P ~J9:e@P J9:e`P J9:fP J9:f P J9:pP &J9:tP J9:t P J9:t@P J9:t`P J9:uP J9:u P J9:u@P J9:u`P J9:vP J9:v P J9;P 'J9;P J9; P J9;@P J9;`P J9;P J9; P J9;@P 	J9;`P 	J9;P 
J9; P 
J9;P 'J9;P J9; P J9;@P 
J9;`P 
J9;P J9;`P J9;P J9; P J9@P J9BP (J9BP J9BP (J9B P )J9B0P )J9B@P *J9BPP *J9B`P +J9BpP +J9CP ,J9CP ,J9HP J9JP -J9JP -J9J P .J9J0P .J9J@P /J9JPP /J9J`P 0J9JpP 0J9KP 1J9KP 1K@ K @ K0@ K@@ K
HgP QK
\P KN@ KI`P "K2NI6P K3S@P K6I`P "K7N'P 
+P K:!`P K:$h= 
u(Wz

	IFN D
uHEBUG,<EXTERNAL CO
uhRESW,KILL,KILLF,%
vATIME,%RATIM

v(
	IFDIF <A><O>,<
vH EXTERNAL %KILLA
vh,%KILFA>

	IFD
wIF <A><G><
	MOV
w(EI	TA,0
	CALLI	T
wHA,$RTIME
	MOVEM	
whTA,%RATIM+1
	CA
xLLI	TA,$TIME
	MO
x(VEM	TA,%ATIME+1
xH
	IFDIF <A><O><
xh
	MOVE	TA,CORESW
y
	TLNE	TA,%KILLA
y(
	JRST	KILL
	TL
yHNE	TA,%KILFA
	J
yhRST	KILLF
	>>>

z
	IFIDN <A><A><
z(	JRST	COBOLB##>

zH	IFIDN <A><B><	J
zhRST	COBOLC##>
	I
{FIDN <A><C><	JRS
{(T	COBOLD##>
	IFI
{HDN <A><D><	JRST	
{hCOBOLE##>
	IFIDN
| <A><E><IFE FT68
|(274,<
	SKIPE	OPT
|HSW##
	JRST	COBOL
|hO##>
	JRST	COBOL
}F##>
	IFIDN <A>
}(<F><	JRST	COBOLG#
}H#>
	;NOTE THAT T
}hHERE IS NO ENTRY 
~FOR "G", THAT'S T
~(AKEN CARE OF IN C
~HOBOLG
	;NOTE THA
~hT THERE IS NO ENT
RY FOR "O" -- TAK
(EN CARE OF IN COBOLO
	OF IN COBK:%GP hK:%@ K;$\GP K;&.'P 
K;5GP $K?`P GKBI`P #KG,P iKJP KK;r hY&E.A==:A
		.XCREFE.APK!KZ-c@PK<KZ..'PKjK^+UK@K^+[KbKc%h'P LE`P 	M%)P!MMh1P MeP Mf~(P Mv[ P  MP M0P$M^P @MwP M9P$M93P"MX@P M
Lx{P @M
v[ P MwP @MX@P M? P MdhP MdiP M}XtP$M}]rP"M~ Q  MpP FM,-3Q M8`Q  M{ Q M|Q M%P M|`Q @M|iHP#M|iIP MP$M+yP M(`Q  MF
@P MH6Q MMLqP  Mex:P M$X`P  M.LzP#!MtY`P M%Z7P  M&	9P!M"-LP!M&<;GP M&dS@P jM&dXgP %M&d[P %M&d[GP M&eI'P M&f=P 1M&tP YM&tC@P M'=P kM2
x: (Y"
	PUSHJ	PP,TST.A##
J	PM2.MPP@M2NIPPM2tY`PQM3&NQMM3<WP"M6QPM:ySPMM:&LQQM:,YPM@M:|<QM@M:}LzQPM:~=1P@M:~I@PPM>(xPPM>)1Q M>~C@P YM?@P M?`P kM?LGP MB.-rP MJ,S@P MJ,YP )MJ,[ZQ MJ,xtP$MJ,}rP"MJ-KqP MJe@Q MJ}S@P lMJ~[RP MK&=P MN
O;%yP^O<pP^O>gP^O@@^OJ,P^mOJ~\PZO^^5D(Q O^5D)Q O^5D)Q O^5D*Q @O^5D*Q  O^5F Q O^5K`P$O^G@P O^eP"O^uJ:P O^u}P$O\{P!OwP @Q,I1Q Q.*7Q @Q.kQ  Q
IgP ZQ'4P `R@P RDP RHP RLP RPP SpP GSpP StI8P 
S8pP nS:$XvP S:$^P GS:%gP [S:%h'P S:'	P HS:NC@P S:NKP S;]P nS;gP IS;-P S;H'P &S;$\G (Y
INTERN	HA
IFN DEBUG,<SIXBIT /A/>
	SIXS;$|GPS;%s@PoS;4PoS;5zgPSS<pPmS>{GP&SBHP SLpP bSN
@ YqlwP"Y
C@P pY6C@P IY3@@ qY&P Y&i`P IY&tgP IY&tS@P qY&u9gP QY' P Y'$\GP Y/kQ Y8@ Y:<;gP JY:>JP Y>3@P rY?4P `YC[GP {YNP YO P YZadP YZad(P YZae
PmYZaeKPYZaekPv[+gP~[E\P-[F=1P$[P%[l,GP&P '[?4S@P [?6; @[?6;` [?6<U `[?6=  [C<9<P [N9`P 7P  [R{YP @[SySP![S{@P"[SpP$[VfJ'P [VfLP (]hP ]n,{Q ]%GP K]
:`P ]<P r]FC@P s]{ZP 
]2NC@P>]<pP?s]>$PP?]>& 	]Ht^P$]HuRP"]N}l`P ]Vl,GP \]Vl\GP t]^MiP 
TXgPv(\GP J!`P ;pP n1`P 6NMP J8pP u:.93P :g@P @@ B-c@P 	BuX<P Bv:=P C%gP )HpP uJ<GP LRD\GP &W&
_^t\GP aP a<S@P $aP 9aP a
@ aP 7akgP 
apPaVai`PaamPa+a pP Ta&`P Ka+= +a+-\ 5@a3`P ]a3.3@P }a;&#@P  a@@ aBq`P QaJ<gP *aJMmP MaJMyP |aJM|GP aJ|3@P aJ|9'P waJ}k'P aJ~C@P aK4>'P aO%c@P *aO%igP *aO&c@P vaR
:P aRn[P aRv)9P aS\`P  aSXzP aS.9 P aSDi9P cV.Y'P cV~I'P aetC@P +e@ epP Ke
C@P 
e
LGP (e
MgP)e`Pwe]GPeh'Pe)P8e$YGPLe-C@Pxe4\GPMedP5ed:PedX'P el'P elGP ,em}GP et'P LeH'P xe|GP ]eIgP e[GP ,e\GP -e]P ^e$P *e$'P e&#@P e&\GP e4\GP ye=GP ye>-P epP We pP Te&=
gC@P {g\GP .g-3@P 
g=Y'P .gdXgP /gfMGP gmgP {gtC@P gvC@P {glwP$g\GP Ng
9'P=,gS@P /g!`P 
i(W&
	INTERNA
iHL COBOLA
 	ZZ%=
ih=0				
 IFE ONES
jEG,<IFDIF <A><B>
j(<IFDIF <A><G><ZZ
jH%==1>>>	
 IFN ON
jhESEG,<IFIDN <A><
kA><ZZ%==1>>			
 
k(IFN ZZ%,<IFDIF <
kHA><A>,<PORTAL	.+1
kh>>	
	MOVEI	TA,"
lA"
	MOVEM	TA,PHA
l(SEN##
	MOVE	PP,P
lHPOINT##
 IFDIF <
lhA><O>< EXTERNAL 
mPUREA>		


IF
m(N ZZ%,<
 IFE ONE
mHSEG,<
	MOVEI	TA,
mhKILL##
	MOVEM	TA
n,WEDIED##+1
>
	
n(MOVEI	TA,REDO##

nH	HRRM	TA,.JBSA##
nh
	MOVEI	TA,RESTRT
o##
	HRRM	TA,.JBR
o(EN##
	MOVE	TA,[P
oHUSHJ PP,UUOCAL##]
oh
	MOVEM	TA,.JB41
p##
	MOVEI	TA,XPN
p(PPL##
	HRRM	TA,.
pHJBAPR##
	MOVEI	T
phA,$APRF
	CALLI	T
qA,$APREN
 >
 IF
q(2,<	PURGE	ZZ%>

qH
 IFN DEBUG,<EXTE
qhRNAL %ATIME,%RA
rTIM
  IFE TOPS20
r(,<EXTERN	DDT>
  
rHIFDIF <A><A><IFD
rhIF <A><G><IFDIF 
s<A><B><
	TTCALL
s(	3,[ASCIZ "PHASE 
sHA
"]
 >>>
	CA
shLLI	TA,$TIME
	MO
tVEM	TA,%ATIME
	
t(MOVEI	TA,0
	CALL
tHI	TA,$RTIME
	MOV
thEM	TA,%RATIM
>M	TA,%RATIM
>gP gP gP gmmP !g"#@P +g&=c@P 0g'D-P :g'TS@P g.,:P g/h6 Y
IFN DEBUG,<JRST	.+2>
	g2:Pg~g>pPgg>tP g?C@P 
9'P agB,:'P 1gB,;GP gJP gK%YgP OgN
IP gNP gRM'P gR$gP 6gRtD'P OgR~P gR~)'P gSGP gSi`P /gV'P gVGP gVgP gVLGP gVi`P gW
GP g\@ g^|i@ 
c(VSWTEST A,ZSWTEST A,g^|iY 
hhVFSWTEST A,ZASWTEST A,g^}` 
bhVSWTEST A,OSWTEST A,g^}l` 
h(VBSWTEST A,OASWTEST A,g_]Q  tg_$:P g_$\z 
`hV
	IFLE A
a-777777,<TRB SW,
a(A>
	IFG A-7777
aH77,<
	IFE A&777
ah777,<TLB SW,(A)
b>
	IFN A&777777
b(,<TDB SW,[A]>
	>
	SW,[A]>
gcP gfl+P gft:P NghtzP ght9P ght;wP ght<P ghtH:P ghtHRP ghtI1P ghtI;P ghtKqP ght^P ghtj6P 
ghv
KP ghv
WP ghv,P ghv,P ghv,P 
ghvI6P ghvK)P ghv\rP ghvh6P'i@ iI'P iI9 
hXj
	XLIST
	TABSET NAM,900,0(,NAMTAB,2,2,0
	THABSET EOP,50,20,EhOPTAB,2,0,0
	TABSET SEC,200,10,SE(CTAB,2,2,0
	TABSHET FIL,150,50,FILhTAB,1,2,1
	TABSET DAT,800,600,DAT(AB,1,2,1
	TABSETH CON,50,100,CONTAhB,1,2,1
	TABSET LIT,500,200,LITAB(,2,2,1
	TABSET PHRO,200,150,PROTABh,1,2,1
	TABSET EXT,600,50,EXTAB,2(,1,1
	TABSET VALH,100,200,VALTAB,1h,0,1
	TABSET MNE,40,10,MNETAB,1,2(,1
	TABSET FLO,2H00,200,FLOTAB,1,2h,1
	TABSET CPY,30,30,CPYTAB,0,0,1(
	TABSET HLD,50,H20,HLDTAB,1,0,1
h	TABSET RPW,2,200,RPWTAB,1,0,1
IF(N DBMS!ANS74,<
	HTABSET USE,2,10,UhSETAB,1,0,1
>
IFN DBMS,<
	TABSE(T DBD,600,200,DBDHTAB,0,0,1
	>
IFhN MCS!TCS,<
	TAB	SET CD,200,100,CD	(TAB,2,2,1
	>
IF	HN ANS74,<
	TABSE	hT	AKT,1,20,AKTTAB
,2,2,1
	TABSET	D
(EB,2,10,DEBTAB,2,
H2,1
>
	TABSET A
hLT,20,20,ALTAB,2,2,0
	TABSET REN,(2,10,RENTAB,1,0,1H
	TABSET TAG,300h,100,TAGTAB,2,1,0

	TABSET RES,20,
(10,RESTAB,2,0,0

H	TABSET TEM,12,10
h,TEMTAB,0,0,1
	TSETBCRF,2,1000,
	LIST

	0,0
	LIi9: HY
IFN G,<hCD.A==ZZ
	ZZ==ZZ+1>
Z
	ZZ==ZieN P biS@P 2i@ i
@ i
t P i
tH@P @i
t\P  i
tx@P i
v	PPiPi@i@iS@Pi[P#iFC@Pi"`P Qi?4HP iJ
3@P iJ<0 
chVSWTEST A,CSWTEST A,iO<` 
d(V"SWTEST A,NESWTEST A,iO<h` 
g(V:SWTEST A,CESWTEST A,iO<l` 
f(V2SWTEST A,OESWTEST A,iO<n@ 
e(V*SWTEST A,ZESWTEST A,iO>@ 
dhV&SWTEST A,NNSWTEST A,iO>H` 
ghV>SWTEST A,CNSWTEST A,iO>L` 
fhV6SWTEST A,ONSWTEST A,iO>N@ 
ehV.SWTEST A,ZNSWTEST A,iSHP ic%I7P (igPP igS@P Sk-J6P 0k:h'P (k:{ZP k:NC@P xk;I9P 0k;L@P 1k;LGP k;%P ~k@pP kB$P kB}c@P kN
y'P OkN)`P kN.+GP kN=YP kNMigP mfY'P Om'P m#@P &m&	`P -m>\:P nD@ nH@ o"-c@P o'%@P o'%GP o?LgP 2o?:'P PoJNI'P qBvLzP us@P buhP  HY

IFE D,<h
IFDIF <B><0>,<IFNDEF B,<EXTERN( B>>
	>
NS.==-H1
IRP F<NS.==NSh.+1>
IFE NS.,<
IFIDN <F><0><NS.(==-1>
	>
	INTERH. A
IFN DEBUG,<hXLIST>
A:	XWD B,NS.*1B23+D*1B2(4+E*1B25+C
	XLHIST
IFGE NS.,<BYhTE	(18)F>
	LIST
	8)F>
	LISTY@ Xl
@]  Xp

$ (A,B,C,D,E,F)
	f@P)@P"0	46P 	
M`PP	&P!	dX9PP	f5PP	}lvPP	~) P 	P 	PP 
	.htP 	N)1P 	dPP 	0P"	$P  	~@P 	`P'@	EP 	0P 	&93P 	# P 	&eY6P  	&pP 	20P 	3@P @	7$P  	:}i<P 	?.@P 	BUx@P 
	C}SP"	G P 	J.9:P 	J.pP 	K%2P 	K-`P 	RMY P 		RnyP 	S'P 	[ P 	^

8`P 
@P 
4 P 
d+P 
P 
PP 
.0P3TP3YP3YPqh9P$qi1P"ah1P	ah7PakZPpP 	"aj|P "akP "alQP "alqP "alvP "alyP "al|P "am8P "amRP "amTP "amXP 2CWP 2CWP 2CYP 31dP 31eLP  31fP 31iP 31jP 31jP 31j1P @31kP 31kP 31kYP 31lXP 31m\P J!d+P J!d@P J!e P J!eIP J!fP J9hsP J9htP J9iP J9kP J9kXP J9lP J9lP J9lP J9lSP J9lTP J9lvP J9lyP J9mVP JieQP JieqP JihWP Jii1P JilpP Ki;P KkrP Wd1P WdQP WhhP WhiP WhiP WiP WiP WiP Wi1P Wj7P W!iP W!i9P W!j7P W!kP W!kxP W!lXP }[0P z~+P ~,YP 
~,}P ~.P S@P ",I1P 	"-	P ".*7P ".:=P 	".kP K><QP >}{woP