@CAT,P 1021-002-006.,///10000 @ASG,T TEMP.,///10000 @ELT,OI TEMP.1021-002-006,,,130151053241,000 )@@G@@**PF**@@@@3U@@@@@@@@@@@[@ /@@@]FE /^@@@@J@@JW@@@]F^AA=@@@@@@@@@@@@@@@@@@AA )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@AB )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@P@@@@@@@@@@@@@@@@@@@@ AC )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@AD )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@R@@@@@@@@@@@@@@@@@@@@@@@@AE )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@]@@@@@@@@@@@@@@@@@@@@@@@@AF )@@G@@@@@@@@@@@@@@@@A@@@@@@@@^@@@@@M@@@@@@@@@@@@@@@@@@@@@@@F@@@@@@@@C@@@@@@@@@AG )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@H@@@@@@@@@@@@@@@@@@@@@@@@@@@@@EAH )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@O@@@@@L@@@@@@@@@@@@AI )@@G@@@@@@@@@@@@@N@@@@@@@@@@@@@@@@@@@@@@@G@@K@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@AJ )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@S@@@@@@@@@@@@@@Q@@@@@@@@D@@@@@@@@@@@@@@@@@@@@@AK )@@G@@@@@@@@@@@@@[@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@AL )@@G@@@@@@@@@@@@@@@@@@@@@@#@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@AM )@@G@@@@J@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@B@@@@@@@@@@@I@@@@@E@@SAN )@@G@@DSECTER @@@@@@@@[@@@ @ @[@][@@@@L@@@@W@HB"AWCM$TIME AO )@@G@@@@@@@@@@]@@@ @[@[@[@@@@@I@@@@WLNJ6]NEIOSET @@@@@@@@[@@@AP )@@G@@ @ @K@ [@@@@V@@@@WZOG?^AESYNAMACRO @@@@@@@@]@@@ AQ )@@G@@@[@O@[@@@@@T@@@@W'M$G^TEPLCSAW @@@@@@@@[@@@ @ @W@ @@@@@@ @@@@[]@@@@-LNOADUFEXECMACRO AY )@@G@@@@@@@@@@]@@@ @[@@@[@@@@@C@@@@+NDF8ENFNEWNAMES @@@@@@@@[@@@AZ )@@G@@ @ @J@ @@@@@O@@@@+VCXUGGFCOPYRIGHT @@@@@@@@[@@@ BA )@@G@@@ @#@^@@@@@J@@@@+\C89[DGCOPYMAIN1 @@@@@@@@[@@@ @ @X@ @@@@[TBB )@@G@@@@@@+"C"/[PGEXCDS @@@@@@@@[@@@ @ @5@ @@@@@-@@@@=RHC^][GBC )@@G@@PLTVDS @@@@@@@@]@@@ @[@@@[@@@@[Q@@@@=8GX2]#GONUNIT BD )@@G@@@@@@@@@@]@@@ @[@@@[@@@@@P@@@@&IF:!]BGDSECTS @@@@@@@@]@@@BE )@@G@@ @[@@@[@@@@CT@@@@&@USE 1,DUMP. . DS )@@G@@______@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@DT )@@G@@@@]@@^@@@@@$@@@@[- ENDFILE 1 DU )@@G@@ @@@@[+ CALL ERTRAN (6, '@ADDDV )@@G@@,E 2. . ') ]@#^8!@ADD,E 2. . ______DW )@@G@@______@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@[ RETEB )@@G@@URN @@@@[&EC )@@G@@50 FLD (18, 18, HEAP (HEAPPT, 3)) = PTR (HASH) ED )@@G@@ @@@@[$ PTR (HASH) = HEAPPT EE )@@G@@ @@@@[* HEAP (HEAPPT, 1) = NAME (EF )@@G@@1) @@@@[( FLD (0,EG )@@G@@ STUB, HEAP (HEAPPT, 2)) = FLD (0, STUB, NAME (2)) @@@@[%EH )@@G@@ FLD (0, 18, HEAP (HEAPPT, 3)) = TNAME EI )@@G@@ @@@@[: EJ )@@G@@ @@[@[:C RETRIEVE STATUS BITS EK )@@G@@ @@@@[: EL )@@G@@ @@@@[:EM )@@G@@60 GEN = .FALSE. EN )@@G@@ @@@@[? ERR = .FALSE. EO )@@G@@ @@@@[! IN = .FALSE. EP )@@G@@ @@@@[, TNAME =EQ )@@G@@ FLD (0, 18, HEAP (HEAPPT, 3)) @@@@[\ER )@@G@@ FLD (35, 1, GEN) = FLD (33, 1, HEAP (HEAPPT, 2)) ES )@@G@@ @@@@[0 FLD (35, 1, ERR) = FLD (34, 1, HEAP (HEAPPTET )@@G@@, 2)) @@@@[1 FLD (35, 1, IN) = FLD (35EU )@@G@@, 1, HEAP (HEAPPT, 2)) @@@@[2 EV )@@G@@ @@[@[2EW )@@G@@C PERFORM UPDATES EX )@@G@@ @@@@[2 EY )@@G@@ @@@@[2 GO TO (70, 80, 90, 100), EZ )@@G@@UPNO @@@@[3 FA )@@G@@ @@@@[3FB )@@G@@70 GEN = .TRUE. FC )@@G@@ @@@@[4 FLD (33, 1, HEAP (HEAPPT, 2)) = 1 FD )@@G@@ @@@@[5 RETURN FE )@@G@@ @@@@[6 FF )@@G@@ @@@@[6FG )@@G@@80 ERR = .TRUE. FH )@@G@@ @@@@[7 FLD (34, 1, HEAP (HEAPPT, 2)) = 1 FI )@@G@@ @@@@[8 RETURN FJ )@@G@@ @@@@[9 FK )@@G@@ @@@@[9FL )@@G@@90 IN = .TRUE. FM )@@G@@ @@@@[' FLD (35, 1, HEAP (HEAPPT, 2)) = 1 FN )@@G@@ @@@@[; RETURN FO )@@G@@ @@@@[/ FP )@@G@@ @@@@@@FQ )@@G@@@@#@@ @@@@@^@@@@[/100 RETURN FR )@@G@@ @@@@[. FS )@@G@@ N8UDS<^^K]7YN8MDS<^^K]7ZN8NDS<^^K]7)/,0#+]@@@]7HFT )@@G@@@@@]7I@@@]7J@@@]7K@@@]7L@@@]7M@@@]7N@@@]7O@@@]7P@@@]7Q@@@]7R@@@]7S@@@]7TFU )@@G@@@@@]7U@@@]7V@@@]7W@@@]7X@@@]7Y@@@]7Z@@@]7)@[C@@@/,0]3%@[D@@@/,0AL%@[E@@@FV )@@G@@/K@]57/,0]T @@@CG=@[G@@@/,0[H0@@@CG$@[G@@@R@KCS\R@)CS=C@@CSG_@__.FX )@@G@@C#)CS*G_)@@]R[@CS!R[KCS?[#)CS0C#)CS&G_)__.[#)CS1C;:K@ G_)__.[#)CS2C#)CS$FY )@@G@@G_)__.[#)CS3C#)CS*G_)__.[#)CS4C#)CS(G_)__"[#)CS5C#)CS(G_)__.[#)CS6C#)CS%FZ )@@G@@G_)__.[#)CS7C#)CS:G_)__.[#)CS8C#)CS,G_)__"[#)CS9C#)CS?G_)__.[#)CS'C#)CS!GA )@@G@@G_)__.[#)CS;C#)CS?G_)__"[#)CS/C#)CS,G_)__.[#)CS.C;:K@IG_)__.[#)CS"C#)CS\GB )@@G@@G_)__.[@@CS_[@)CT@[[@CT[[[)CT][]@CT#[])CT^[#@CT [#)CTA/,0], @@@CR+@[1CSUGC )@@G@@/,0]J9@@@CR<@@@CJ=@@@CIO@@@CIO@@@CIO@[2CSU/,0]5S@@@CJ&@@@CIP@@@CIO@@@CIOGD )@@G@@/K@#-=@[3CSUC@[@@@[@@CIQC@)CR=[@)CIR[@)CIS @@CITC.@@@[[[@CIU[[@CIV @@CIWGE )@@G@@ @@CIX @@CIY @@CIZ @@CI) @@CI- @@CI+ @@CI< @@CI= @@CI> @@CI& @@CI$/,0]5=GF )@@G@@@@@CJ*@@@CI*/K@]9/K@]'Z/K@]'Z@]KCSU/,0]5S@@@CJ"@@@CI(@@@CI%@@@CI:/K@]'&@]LCSUGL )@@G@@/,0]5S@@@CK@@@@CI?@@@CI%@@@CI:/K@]'!@]MCSU/,0]5=@@@CK]@@@CI&/K@]'3/K@]'3GM )@@G@@@]NCSU/,0]5=@@@CK^@@@CI$/K@]'9/K@]'9@]OCSU/,0]5=@@@CKA@@@CIT/K@]'_/K@]'_GN )@@G@@@]PCSU(@@CIT/K@];] @@CIU/,0]BE@@@@@@@@@CI!/K@#-$@]TCSUC@@CI*[@@CI,C@)CI!GO )@@G@@[@)CI*(@@CI)/K@];JC@@CI,[@@CI)C/@@@[G@@CI*[@@CI\T@@CI*;K@@@[[@@CI0C/)@@[GP )@@G@@G@)CI,C.@@@$G[@CI,G@)@@K[@)CI1/,0] 0@]-CSUR[)CI( @ADSQ[)CS+[@@@[^C/@@@[G@@CI2[@@CI2G@@CI4[@@CI4;@@@@Q[0CS$[[@@[^[@)CTB[#)CIIC@@CI2G@@CII[@@CI2;@@@@C@E)@[HM )@@G@@[@D*Q08L@]_("8)CQ4C.@__.G[@CRCR[)CRCO[)CS.C_0@@]R[0CS&R]@CS&R]KCS,[[@@[^HN )@@G@@A[)CTB9*)CTF[[@CTD[#0CIIC@B@@[[@D@@[C@)CI,H@)CI*(@@@@I/K@#@KC/)__"G@)CI*HO )@@G@@C_)@@[R])CT[[@)@[ [#)CI4C@C@@[H@E@@[(@@@@G/K@#@IO")@@[G_)@@[8LK#@ /K@#-$HP )@@G@@C@@CI4[@B@@[O.0@@[O"@@@[O"K@@[G_0@@[8L@]_9R[)CTBC@A@@[[@@CI;*@@CI$/K@#[>HQ )@@G@@"8)CF'9*=@@@C.@@@[[[@CI2C_0@@]R])CS&R[0CS0N[@CTD[#0CIIC/@__.G@@CII[@@CTDHR )@@G@@C@E@@[[@@CI/;@@@@Q[)CS>[@)@[^C/@@@[G@@CI_[@@CI_IA )@@G@@;@@@@Q]@CS*]@@@[^9*)CTF[#)CIIC@@CI2G@@CII[@@CI2;@@@@N8QDS&^^K##)/,0]10@@@CI;@@@##)@@@CR<@@@CR&@@@CR0@ RCSUC@@CI;IH )@@G@@;@@@@@@@IIK )@@G@@9(@CG]C/)@@[[@)CJA">@CR2/H@#^L*@@@@K/K@#^V[@@CTF/,0#+*@ 0CSU/,0[G1@@[CK-IL )@@G@@@ 1CSU@@KCI;@@KCQ1'^@[&_/K@]_SC@@CF'[@@CF9"^@CR4[@@CF;R]@CI?C@)CF'[@)CJBIM )@@G@@/K@#C=C[@CR5[[CDS$C[)CR=[[*DS*/,0]:+@ .CSU/,0[G1@@[CK3@ "CSU@@KCQ1'^@[&_IN )@@G@@C@@CR6[@@CRUC@)CR6[@)CRWC@@CR6[@@CRYC@)CR7[@)CRVC@@CR7[@@CRXC@)CR7[@)CRZIO )@@G@@*@@CRA/K@#^./K@# 2C@@CR8[@@CRUC@)CR9[@)CRV*@@CR[/K@# ^/K@# CC@@CR'[@@CRUIP )@@G@@C@)CR;[@)CRV*@@CQ2/K@# F/K@# XC@@CR=[@@CRXC@)CR/[@)CRWC@@CR."@@CQ2"C@CR"IQ )@@G@@"@@CR*"K@@@G;)W@@D[@KCII/,0]10@@@CII@@@CRX@@@CR_@@@CR_@@@CR+@ATCSU*@@CQ3IR )@@G@@/K@# )/K@# 2C@@CR=[@@CRZC@)CR/[@)CRYC@@CR."@@CQ3"C@CR""@@CR*"K@@@G;)W@@DIS )@@G@@[@KCII/,0]10@@@CII@@@CRZ@@@CR_@@@CR_@@@CR+@A)CSUC@@CI;;@@@@CSUR[0CR!N.@@@[C8B*RT'^K[&;IU )@@G@@8L@#A@R])CR!N.@@@[C8E*RV'^K[&;8L@#A R]KCR!N.@@@[C8D*RX'^K[&;8L@#AEC8@CI;IV )@@G@@'^K[&;@@KCIR@@KCIS'^@[&_C@@CRD[@@CIIC@)CRF[@)CI4R[)CR!N.@@@EC@@CR=[@A*RQIW )@@G@@8L@#ASC@)CREH@)CII/C)#A)*@@@@I/K@#B R]@CIIO]@CS1C@*@@[[@)CI2/,0]10@@@CI2IX )@@G@@@@@CRR@@@CR&@@@CR&@@@CR0@B[CSUC@@CI2;@@@@G@@@/D@#D=*@@@@K/K@#D8C@BDS<[@@CJCJN )@@G@@/,0AKZ@@@@@@@@@CRC@@@@@@@@@CJE@CTCSUR])CIPC@EDS)CS#][)CF4][0CF5"-)CS#"'@CF;"()@@O"!)CTHJV )@@G@@">)CS#][)CF6][0CF7/,0[];@@@CF4@C6CSU9*@CF2"8)CF/9!@CG7">@CF."!@@@I"!@CF_JW )@@G@@".@@@K[[@CG[E[@@@K[[@CG[/,0[E!@@@CG[@@@CF/@@@CF9@C9CSU"^@CR4]@@CF8/K@#O^JX )@@G@@C@@CJ@H@@CRCG/@@@[[@@CJF;@@@@@@@CMN/K@#N_@E2CSU*@@CJK/K@#KFKW )@@G@@/K@#KYRA0CJH$'0@@#8];#KJ'^@[-2@E6CSU/K@#KM/K@#KS"8@CJL"=@CH#/G@#KR*@@@@GKX )@@G@@/K@#KY/K@#K+"8@CJL"=@CH#/C@#KX*@@@@G/K@#KY/K@#K+C@@CII[@@CJK"/)CH#[@)CJLKY )@@G@@C@@CJIG@@CIIG/@@@[[@@CJIC/)@@[G@)CJJ[@)CJJO"K@@[O.)@@]G_)@@[8L@#J+/,0]3+KZ )@@G@@@F^CSU*@@CJK/K@#K2/K@#M[C@@CF9[@@CJMC@)CJ@;@)@@@@@CMPLC )@@G@@/K@#N_@FJCSU @@CF8D@@CJM*@@@@G1@@@@G/K@#L)/,0[E!@@@CG[@@@CR4@@@CJM@FMCSULD )@@G@@"^@CR4]@@CF8RA0CJH$'0@@#8];#L='^@[-2@FNCSU/K@#L$/K@#L;C@@CQ3"^@CF8*@@@@GLE )@@G@@1@@@@G/K@#M[C/@@]V"O@CR^C@@@@H"@@CF'"^@CSE"^@CF9*@@@@G/K@#ME/,0#+*@FSCSULF )@@G@@/,0[G1@@[CMR@FTCSU'^@[&_/K@#N_C@@CQ2"^@CF8/C@#M@*@@@@G/K@#M[/K@#MERA0CJGLG )@@G@@$'0@@ 8];#M '^@[-2@F)CSU/K@#I$/K@#I,/K@#I'/K@#J[R])CIPC@EDS<[@@CJCR[0CJKLH )@@G@@O[0CS'C@$@@[G/)__"(@@@@I/K@#MP(@@CF9/K@#N2/,0AKZ@@@@@@@@@CRC@@@@@@@@@CJKLI )@@G@@@F*CSUR]@CIPC@CDSQ]@CS%[@@@[^9?C@@@LX )@@G@@"*@CF_9*C)@@8L@#PH/,0]3>@@@CN\/K@#RY@H#CSU/,0],O@@@CJS@@@CSI@@@CR+@H CSULY )@@G@@/,0]RY@@@@@@@@@@@@@@@@@@@@@CHF@@@CHM@@@CH*@@@CIC@@@CH/@@@CI]@@@CSI@@@CJSLZ )@@G@@@HACSU*@@CJ /K@#P%/K@#P!*@@CQ"/K@#P0/K@#RY*@@CQ./K@#P0/K@#RYC/@@@][@@CJQMA )@@G@@*@@CJO/K@#P5/K@#TW @@CI" @@CJTC@@CJSG/@__"/C@#P/*@@@@G/K@#Q8/,0]3+@HSCSUMB )@@G@@C/@__"G@@CJSC_0@@[[@@@[^[#0CIIC@@CI"G@@CII[@@CI";@@@@@@@CN1/K@#RY@H,CSU @@CI"C@@CJSMG )@@G@@G/@__"/C@#Q"*@@@@G/K@#RGC/@__"G@@CJSC_)@@[[@@@[^[#)CIIC@@CI"G@@CII[@@CI"MH )@@G@@;@@@@ND )@@G@@Q]@CS%R[)CR>Q[)CS![@@@[^9?A)@@9*C)@@8L@#VMC/@__"G@@CJSR]KCR,Q]KCS5[@@@[^NE )@@G@@C@D@@[[@@CJTR])CJTO])CS.C@%@@[[@()@[8L@#VURA0CJQ$'0@@#8];#V>'^@[-2@J/CSUNF )@@G@@/K@#P[/K@#P5*@@CJ /K@#V5/,0]J9@@@CR&@@@CO @@@CSJ@@@CF,@@@CIO@J_CSUC/@@@[NG )@@G@@G@@CJ^[@@CJ^/K@#-KC@@CJ^G/@__./C@#V'*@@@@G/K@#YL/,0]:+@K^CSU/,0[G1@@[COBNH )@@G@@@K CSU'^@[&_ @@CJT/,0]J9@@@CR&@@@CO/@@@CIO@@@CIO@@@CIO@KDCSU @@CI2/,0]J9NI )@@G@@@@@CR&@@@CO"@@@CSJ@@@CF,@@@CIO@KFCSUC@@CSN[@@CJYC/)@@[G@)CI2[@)CI2"9@CJ[NJ )@@G@@">@CF4".@@@K][@CJZ".)CF4[[)CJ[/,0[];@@@CF4@KKCSU9*@CF2C@)CF\/@)#WC@@CI4;@@@@C@?@@@[@)CIRC[G@@[[[@CIS9?@CH *@@@@G/C@#)5/,0[G1@@[CQROG )@@G@@@M+CSU@@KCI4@@KCIR@@KCIS@@0CH @@0CHB@@KCJ+@@KCJ-@@KCJ<'^@[&_/K@#-^/,0[G1OH )@@G@@@@[CP.@M!CSU@@KCI4@@KCIR@@KCIS@@)CJ)@@)CG[@@)CF8@@0CH @@0CHB@@KCJ+@@KCJ-OI )@@G@@@@KCJ<'^@[&_O"K@@[O.)@@[G_)@@[8L@#Z@C@@CR=[@@CIR[@@CIS/,0[G1@@[CQA@M_CSUOJ )@@G@@@@)CQ4'^@[&_/K@#O4/,0] .@@@CR(@@@CQ=@NBCSURA0CJD$'0@@ 8];#-T'^@[-2@NCCSUOK )@@G@@/K@#FY/K@#H\/K@#N1/K@#N_*@@CIZ/K@#-=/,0[G1@@[CQ$@NFCSU'^@[&_N@0#-&/K@#-!OL )@@G@@@NJCSU/,0]T @@@CQ,@NKCSUN@0#-?/K@#-!@NKCSUR]0CSV9!)CTJ9,@CTL9,)CTN9\@CTPOM )@@G@@9\)CTRR@KCTTR@)CTUR@0CTVR[@CTWR[KCTXR[)CTYR[0CTZR]@CT)R]KCT-R])CT+N[@CT[^@]"O[^@];!C8FK@][^@]"P[^@]"U[^@]/S[@@CS+C8FK@#[^@]"4OS )@@G@@[^@]"T[^@#F,C8FK@^[^@]/T[@@CS*[^@]"R[^@];,C8FK@ [^@]"S[^@#VB[^@];\[^@#T#OT )@@G@@[^@]/UC8FK@A[^@#PX[@@CS([^@#T[[^@#RO[^@#VAC8FK@B[^@#D([^@]"V[^@#G>[^@#C?OU )@@G@@[^@#F?[^@#MS[^@#O:[@@CS?C8FK@C[^@]_+[@@CSL(?G@@C/K@#=7(C@CYL/K@#>L'^@#$3;/G@@C*0G@@C/K@#>][0W@@C 4G@@C/,0#*PPD )@@G@@/K@#>D/,0#>N/K@#>L/K@#=.C0/@@C(0JCY8/K@#>BC0_CY8/K@#>#[0ZCY8 4G@@C(^@CYLPE )@@G@@/K@#>LC?W@@][@@@[]C8@@@[;*H@@@'=@@[WC@@@[]R'0@@@/KF@@[C0W@@CC^!CY8C@"@@@PF )@@G@@C@_@@@*0JCYR/K@#>)%80@@ /K@#>9 ^G@@#(4G@@#/K@#>7 @G@@ /K@#>99*)@[[C?!CY8PG )@@G@@G0\CYRC@"CZC*4G@@#/K@#>(C G@@#[[J@@@/K@#>2N/0__;*?G@@C/K@#&YC9K@@#N/0__.PH )@@G@@?5W@@#N/0__/^@_@@@^?/@@C9?)@[[C1G@@#;L@@@#%9@@@#/K@#>9C[W@@B[[W@@ 9!@CYMPI )@@G@@\[@@@J/K@#>./K@#&^[@K@[[C^KCYLP;K@@[[^KCYL:80@@Q ?G@@CC@K@[[G4\CYRC^.CY8PJ )@@G@@:@0@@I/K@#&F @J@@@G80@@[/K@#&AP;0CZC[?.CY8[^!CY8(CI@@@/KF@@[ @I@@@;/G@@CPK )@@G@@(0HCY8/K@#&UC1XCY8 @HCY8[1W@@CC@K@@L 4G@@C/KF@@[ 0G@@C @HCY8 4G@@C/KF@@@PL )@@G@@^@_@@@/KF@@@/K@@@@*^JA37/K@#$[ @@@[#CC@CZ$K8@@@D!^KCZ$/K@#$ [CKCZ$!80@@[PM )@@G@@!80@@>/K@#$B*CJA37/K@#$B[^JA37[^/@@C'^@@?3R#K@@JR#)CYKRB/@@C;/@CYQ9*KCY\PN )@@G@@*@@@[#/K@#$D9*W@@@C8@CY\'=@@[GC4)CY5/@)#&"[0\A37 @@CYQC^JA37/K@N&)C^JA37PO )@@G@@(?G@@]/K@#$B/K@N&)N/0__"/K@#&0N80@@[/K@#&0C@0C-(1@@@[#C@0C-3R;@CY\RBKCYPPP )@@G@@/K@#!NR#0C+IN80@@]/K@#$H/K@@@@ @@CYLC@:@@@C80@@QC8K@@[:@"@@@[CKCYL @@@@HPQ )@@G@@C@:@@@9!@CYM*CF@@@/K@N$MC@0CYL\[I@@@G80@@[C@,@@@[@0CYL!8)@@[!8)@@S/K@#$JPR )@@G@@G4YCYR*0ICYR/K@#$:O6"CYR/K@#$UO2"CYRC@;@@@N/K__"*?G@@CN/K__;^@Z@@@O'0@@[PS )@@G@@/K@#$U/K@@@@C9@@@YC@0C+S(@J*ZC/K@#*@?9J@@@/K@#$;/K@#$6[@K@[[C8K@#''=@@@0PT )@@G@@C@K@[[/K@#$5N^KCYR8KK#*]8KK#*^/K@#*B*@J*ZC/K@#$8/K@#*]P#0CYRC9JCZCRA.CY8PU )@@G@@[?.CY8[ HCY8G[@C+SO]0C+SN@KCYR;^0@@=M#;)@@;^0@@=C9K@@[[5XCY8/K@#$3 @@@[[PV )@@G@@/K@#*SA]0@[[ 4G@@#C0?@@CC^YCY8C@.@@@C@_@@@[@0@[#C^/@@CC1ZA37/[K#*,C9@@@[PW )@@G@@?9K@@K/K@#*%G[@@@K?9K@@S/K@#*%G[@@@K!9K@@)/K@#*/C@0@[#+-JCYR/[K#*//K@#*4PX )@@G@@C@0@[#:80@@[/K@#*4C(JCYR?9@@@#/K@#*'C?\CYRN^/@@C?8)@@C/KIN!.C=\CYR/KIN!6PY )@@G@@C@0C-./K@#!MC@0C+ /K@#!MC*\CYR/@:@@[%8)@@#/K@#(MC@0@[#C1JA37/ @#(I[@@@[]PZ )@@G@@;/@CYQ9!G@@@9(@CY\C8@CY\'=@@[GC5@CY5 @@CYQC@@@[]G8K@@[C@.@@@[[J@@@/KF@@[QA )@@G@@C[Y#, [[K#(O@@@@@@/KF@@[C@0@[#C1ZA37C9@@@K?9K@@K/K@#(X?9K@@SC9@@@O[1G@@#QB )@@G@@/\)#!-C@.@@[C@_@@@/@;@@[[C/@@^C@.@@][^/@@^*@@@[['=@@@PC??@@][@@@[]C8@@@[QC )@@G@@;*I@@@'=@@[WC@@@[]'=@@@]/KF@@@C@.@@[C[J@@@[[G@@AG8K@@[C@0@[#C1ZA37?9K@@KQD )@@G@@/K@#(/C9@@@Y!9K@@SC9@@@S[1G@@#/K@#(YC9@@@K[1G@@#C9G@@B[ G@@^C9@@@[[DG@@^QE )@@G@@'=@@@#*4G@@#/KF@@[C1G@@#:9@@@(/K@#%IC[G@@B%[G@@A/K@#%]C9@@@([1G@@#/K@#%]QF )@@G@@C9@@@K[1G@@#/K@#(Y/\)#!-C@0@[#C@!@@[C@,@@@[@?@@AC1ZA37?9K@@S/K@#%)C9@@@SQG )@@G@@[1G@@#C9@@@[[DG@@^C9@C-O[ G@@^/K@#(>C9@@@W[1G@@#/K@#(>C@0@[#C1ZA37/\)#!-QH )@@G@@C@!@@[C@,@@@G@?@@ 0@@@@IC8)@@@[@?@@ /KF@@[C@!@@[C@,@@@/@:@@[C9@@@*/C)#%4QI )@@G@@D@)@@IC9@@@([@?@@B[1G@@#'=@@@#(4G@@#/K@#%6C5G@@#%9@@@[/KF@@[C[G@@BH9@@@[QJ )@@G@@[[G@@B/ @#%6/KF@@[9!G@@@9(@C-RC^/@@C @JA37[@@@[]C@@C-U'=@@@JC@@@[]/KF@@[QK )@@G@@;/@CYQC@.@@[9!J@@@9(@CY\[@@@[]C8@CY\'=@@[GC4/@@A @@CYQ/^0#:YC80@@ 9(@C-XQL )@@G@@%)0C-Y/K@#:U; @@@A/K@#:PC@@C--'=@@@J;/@CYQ/K@#:JC@@@[]N@)@@JC^/@@C^0\A37QM )@@G@@[@@@[]9!G@@@C80@@ 9(@C-<%)0C-=/K@#:%; @@@A/K@#:>C@.@@[9!J@@@; @@@A9(@C->QN )@@G@@C40C->[40C-$C80@@,[40C->C@@C-*'=@@@JC@.@@];C@@@<[@J@@@C@@@[]/KF@@[%80@@[QO )@@G@@/K@#?OC^/@@C*0JA37/K@#?L9!G@@@C80@@ ;/@CYQ9(@CY\9(@C-X%)0C-Y/K@#?B; @@@AQP )@@G@@/K@#?][@@@[]C@@C--'=@@@JC8@CY\'=@@[GC5G@@AC@0@[# @@CYQ[1JA37C@@@[]C9@@@CQQ )@@G@@[1G@@#/K@#(YC9@@@K[1G@@#/K@#(YC[@C+T:80@@H/K@#?YG[@C+T:80@@G/K@#?YG[@C+TQR )@@G@@;/@CYQ[[@CY\C9@CY\[[G@@^C9@@@[[DG@@^C9@@@+[1G@@#'=@@@# @@CYQ/KF@@[C[@C+UQS )@@G@@%80@@IG[@C+U/K@#?YC@.@@[C@_@@@/@;@@[C9@@@*/C0#?4C9@@@(D@0@@J[@/@@B[1G@@#QT )@@G@@'=@@@#C[G@@BH9@@@[[[G@@B*4G@@#/KF@@[!9@@@[/K@#?6/KF@@[C9@@@D[1G@@#/K@#(>QU )@@G@@C@0@[#C1JA37!9@@@K/K@#!DC9@@@)[1G@@#/K@#(> @G@@ ^G@@#/KF@@[C@0@[#C1JA37QV )@@G@@!9@@@K/K@#!DC9@@@-/K@#!B @@@[#CDG@@@[ J@@#[@@@[]C@@@@J'=@@@I&;K@@[(CH@@[QW )@@G@@/:K#!TABKB^H*@@@[#/K@[+%R#@@[]'^@[+%/KF@@[C@0@[#C0_A37?80@@K/KI@@@C W@@#QX )@@G@@ @@@@K?80@@S/K@#!!W9@@@W*@@@@LG9@@@[[[@@@LG[W@@ [[W@@ ^G@@#/KI@@@/,0#>NQY )@@G@@'=@@@D/,0#*R'=@@@D/K@#!1/K@#:9/K@#?R/K@#?(/K@#?!/K@#?_/K@#!]/K@#!G/K@#*"QZ )@@G@@/K@#(Q/K@#(\/K@#%L/K@#%'^@[$3#.H@@]'^@[$>'^@[$3^T_@@]'^@[$>'^@[$3RD )@@G@@A@F@@['^@[$>'^@[$3^:\@@]'^@[$>'^@[$3^-:@@]'^@[$>'^@[$3^Z'@@]'^@[$>'^@[$3RE )@@G@@^ ;@@]'^@[$>'^@[$3 [Z@@['^@[$>'^@[$3^.-@@]'^@[$>'^@[$3^.=@@]'^@[$>'^@[$3RF )@@G@@#0[@@['^@[$>'^@[$3AEG@@['^@[$>'^@[$3AEG@@['^@[$>'^@[$3#,Q@@['^@[$>'^@[$3RG )@@G@@#\;@@['^@[$>'^@[$3#\*@@['^@[$>'^@[$3#,R@@]'^@[$>'^@[$3^J5@@]'^@[$>'^@[$3RH )@@G@@^J2@@]'^@[$>'^@[$3^D\@@]'^@[$>'^@[$3^J8@@]'^@[$>'^@[$3^EJ@@]'^@[$>'^@[$3RI )@@G@@#3[@@]'^@[$>'^@[$3^D6@@['^@[$>'^@[$3#;<@@['^@[$>'^@[$3#9.@@['^@[$>'^@[$3RJ )@@G@@#9*@@['^@[$>'^@[$3^D8@@['^@[$>'^@[$3^B/@@['^@[$>'^@[$3^CZ@@['^@[$>'^@[$3RK )@@G@@AEB@@['^@[$>'^@[$3#/+@@['^@[$>'^@[$3^(6@@['^@[$>'^@[$3 ]$@@['^@[$>'^@[$3RL )@@G@@^X%@@['^@[$>'^@[$3^X=@@['^@[$>'^@[$3^.8@@['^@[$>'^@[$3^KF@@['^@[$>'^@[$3RM )@@G@@^4;@@['^@[$>'^@[$3^K]@@['^@[$>'^@[$3 [T@@['^@[$>'^@[$3 [K@@['^@[$>'^@[$3RN )@@G@@^:,@@['^@[$>'^@[$3^:3@@['^@[$>'^@[$3#_1@@['^@[$>'^@[$3^.5@@['^@[$>'^@[$3RO )@@G@@ /R@@['^@[$>'^@[$3^FR@@['^@[$>'^@[$3^FO@@['^@[$>'^@[$3 /@@@['^@[$>'^@[$3RP )@@G@@^,)@@['^@[$>'^@[$3^UC@@['^@[$>'^@[$3^UT@@['^@[$>'^@[$3^,U@@['^@[$>'^@[$3RQ )@@G@@^,X@@['^@[$>'^@[$3^V$@@['^@[$>'^@[$3#./@@['^@[$>'^@[$3^VT@@['^@[$>'^@[$3RR )@@G@@#.M@@['^@[$>'^@[$3#.R@@['^@[$>'^@[$3#/2@@['^@[$>'^@[$3#/!@@['^@[$>'^@[$3RS )@@G@@^(9@@['^@[$>'^@[$3^JI@@['^@[$>'^@[$3 ]R@@['^@[$>'^@[$3#4_@@['^@[$>'^@[$3RT )@@G@@ ]7@@['^@[$>'^@[$3#6+@@['^@[$>'^@[$3A @@['^@[$>'^@[$3 ]^@@['^@[$>'^@[$3RU )@@G@@#7:@@['^@[$>'^@[$3 C @@['^@[$>'^@[$3#66@@['^@[$>'^@[$3 P\@@['^@[$>'^@[$3RV )@@G@@ P2@@['^@[$>'^@[$3 A2@@['^@[$>'^@[$3 BR@@['^@[$>'^@[$3 B/@@['^@[$>'^@[$3RW )@@G@@#;9@@['^@[$>'^@[$3#;_@@['^@[$>'^@[$3^C>@@['^@[$>'^@[$3#6)@@['^@[$>'^@[$3RX )@@G@@#6^@@['^@[$>'^@[$3^#S@@]'^@[$>'^@[$3#;\@@['^@[$>'^@[$3^?J@@['^@[$>'^@[$3RY )@@G@@^?M@@[@@@@@@@@@@@@K^0@@@@@@@@@\6M_________KF$S@@@@@@@@\4FZ________KF>C@@RZ )@@G@@@@@@@@K]2K_U*+ *0-K@'3"IK2R5(LK^)@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@(039H0SA )@@G@@ ARG. FOR GAMLN IS ZERO OR NEGATIVE) GAMLN ______@@@@@@@@@@@@@@@@@[SB )@@G@@K[)@@@@@@@@@K/@@@@@@@@@@K@)@@@@@@@@@@@]@@]@@F@@@@@@@@@GAMLN @]L]MM@@@@@@SC )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@KP_ZK]1)ZT">KJ;D71SD )@@G@@)>I\;(KA/$QWA*ZSDLKR!3[@,B^9UJKN*@Q=694J8#KF6%=4\/B ,!J )@@@@@@@@@0;Z___SE )@@G@@______K[!KN3G_$YTDR OX>EW _];\OJ_U#MDEXP ARG .GT. 709.089@ )@)@@@KE?OQ;SF )@@G@@JA@@@@@[@@@@K@)@@@@@@@@@K[)@@@@@@@@@\_Z_________J_%%%%%%%%%:0@Z_________SG )@@G@@J"3G3G3G3G3H0[PPPPPPPPPOJ"=========>0[Z_________J.88888888890]G3G3G3G3G2SH )@@G@@J.,+'F*,+'F(0]PPPPPPPPPOJ.$S$S$S$S$T@@@@@@L37&:2QF=F""<$\HR=OJT_2"MJ^36 SI )@@G@@MUQCLHH,MY#\K:$V+4 N'K51J]=OH^9H&2&_HY(M(DAV*G':F_R4X;@%H.\HE=PW#$ B:90)SJ )@@G@@DHF^C&&7DJ[7B9=WVFI3YR6TA(J!JC:T86/: V.@U5K.?Z,]^LYI)+Z=Y.83#D&\F%2=1 WISK )@@G@@]^FGQ?/X@4LL[[[RS$$L^L0 DLOG @@"@@@@@)@@@K@.WEJK[-&T&__;@@OK@)@@@@@@@@@SL )@@G@@__.@@S)@)@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@K[)@@@@@@@@@SM )@@G@@K[)@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@SN )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@BETAF ______BETAFL______SO )@@G@@(32H0ILLEGAL ARGUMENT IN BETAF. A,B=,2D20.10) BETAF ______J0(/Q:FUA\WOSP )@@G@@K])@@@@@@@@@KE")@@@@@@@@KL05A@@@@@@@@@@@@[K[)@@@@@@@@@KE?O@@@@@@@@@@@@@@SQ )@@G@@@@@@@@@@F@@@@@@@@@BETAF @]P@@F@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@SR )@@G@@URPRC2@@@8@@URNPAR@@#@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@NEXPB$@@#@@@@@@@@@SS )@@G@@@@@@@@@@@@@@ARG1**ARG2; ILLEGAL COMBO OF ARGS@ )@)@@@@[@@@@@@@@J*(///03ST )@@G@@1H ACCUMULATOR OVERFLOW IN INCGAM///) INCGAM______INCGAM______(014H0SU )@@G@@ ALPHA.LE.0.0) (074H0 NN EXCEEDS DIMENSION - RELATIVE ERROR TEST NOT SV )@@G@@MET IN INCGAM, REL ERROR=D20.10,2X/5X006HALPHA=D20.10,2X002HX=D20.10,2X0SW )@@G@@02HN=I8) (064H0 UNDERFLOW IN INCGAM,X TOO SMALL OR ALPHA + N TOO LARGSX )@@G@@E OR BOTH//5X007HALPHA =D20.10,2X002HX=D20.10,2X002HN=I6//5X042HALL VALUSY )@@G@@ES OF YTAB ARRAY SET EQUAL TO ZERO/)(047H0 AT LEAST ONE INCGAM VALUE IS SZ )@@G@@.LE. 0.0, ALPHA=D15.8,2X002HX=D15.8,2X002HN=I6/5X008HYTAB(N)=D20.10,2X00TA )@@G@@8HYTAB(1)=D20.10) (051H0X NEGATIVE, ALL N VALUES SET TO ZERO IN INCGAM, TB )@@G@@X=D15.8,2X006HALPHA=D15.8,2X002HN=I4) @@@@@@@@@@@@@@]@@@K *@@@@@@@@@TC )@@G@@K/@@@@@@@@@@K[)@@@@@@@@@KE:0@@@@@@@@@@@@@[@@F@@A@@@@@@INCGAM@]\@@F@@@@@@TD )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@J&%/17^SL-3\E47_>7DB@(Z=PH==5(TE )@@G@@FESV91@@@@@@@@@@@@@@@@@@@@@@@@(35H0ILLEGAL ARGUMENT IN BETANC. A,B,X=3D2TF )@@G@@0.10) BETANC______(55H0ACCURACY CRITERION NOT SATISFIED IN BETANC. A,B,TG )@@G@@X = 3D16.8)BETANC______(///032H ACCUMULATOR OVERFLOW IN BETANC ///) TH )@@G@@BETANC______@@@@@[@@@@@@@@@@@@K[)@@@@@@@@@KL05A@@@@@@@J0(/Q:FUA\WOK])@@@TI )@@G@@@@@@@@K/@@@@@@@@@@@@F@@^@@@@@@BETANC@^^]MMKE?OOY, B:-L@@F@@]@@@@@@EZP TJ )@@G@@@^G]MM@@@@@@@@@@@@@@]@=/@@@@@@@@@@@@@@@@@@@@@@@@(005HM,66,,I2,001H,,I2,0TK )@@G@@01H.) (002HL,,I2,001H.) (5X,013HJOB ABANDONED) (5X,038HWRONG NUMBER OF TL )@@G@@PARAMETERS IN CALL TO ,A6) (5X,029HPARAMETER ERROR IN CALL TO ,A6) TM )@@G@@(5X,007HITOP = ,I13,5X,009HIBOTTM = ,I13,/,5X,057HREQUIRE 0 .LE. ITOP, 0TN )@@G@@ .LE. IBOTTM, ITOP + IBOTTM .LE. 65)(5X,005HNN = ,I15,5X,025HREQUIRE 1 .TO )@@G@@LE. NN .LE. 66) (/,121H***********************************************TP )@@G@@************************************************************************TQ )@@G@@**) @@@@@]URPRTM@@@@@[URPRTL@@@@@@ @@F@@@@@@@@@URPRTM@[;]K'@@@@@@TR )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@#CA1[ERROR DETECTED WHILE CLOTS )@@G@@SING FILE OF UNIT @BRKPT @@@@@@@)@@@@@@@@@@_____"TT )@@G@@;_____@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@_^A1Y@_DA1+@_BA1:TU )@@G@@@[FA12FILE $-$ NOT ASSIGNED THE NTRAN UNIT $-$ IS NOT AVAILABLE FOR STTV )@@G@@ANDARD I/O. DRUM FILE ASSIGNED TO SYMBIONT UNIT BACKSPACE WAS ENCOTW )@@G@@UNTERED FOR THE UNASSIGNED FILE: $-$ - IGNORED. @ASG,T ,F @@@@@@TX )@@G@@@@@@@K@@@@@K@@@@@C@@@@@C@@@@@D@@@@@)@@@@@(@@@@@@@@@@@@ TY )@@G@@ @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@/K@@!/S@A8%/S@A8\VA )@@G@@UNNORMALIZED ARGUMENT@ NEGATIVE ARGUMENT@NON-POSITIVE ARGUMENT@ ABS(ARVB )@@G@@GUMENT) > 1@ARG1**ARG2; OVERFLOW@ ARG1**ARG2; ARG1=0, ARG2=0@ ARG1**VC )@@G@@ARG2; ARG1=0, ARG2 .LE. 0@ ARG1**ARG2; ARG1 UNNORMALIZED@ARG1**ARG2; VD )@@G@@ARG2 UNNORMALIZED@ARG1**ARG2; OVERFLOW ARG2*LOG(ARG1)@*SUPWB@@[@@@@@@@@EVE )@@G@@000000@@@@[_@@@/K@( 34H @@@[]Q@@[[[*@@[[[*@@[[[*@@@[]Q@@@[]Q[@][[?@@][]&VF )@@G@@@@][]?@@#[]2ERTAB '=@@@E'=@@@)'=@@@D@@@@@@@@@@@@'=@@@J'=@@@5'=@@@6'=@@@MVG )@@G@@@@@@@@ABORT$ERR$ EXIT$ CKPT$ RSTRT$CSF$ SETC$ COND$ DATE$ @@@@LC[K@@GVH )@@G@@@^EA9Y@@@@@D**ERTRAN ERROR** BAD STATUS: FOR OPERATION VI )@@G@@@^BA9%@@@@@A**ERTRAN ERROR** ILLEGAL OPERATION: @^DA93@@@@@C**ERTRVJ )@@G@@AN** BAD STATUS INDEX IN FUNCTB FOR OPERATION @@@@@@NERTRNERTRAN_@@@@@VK )@@G@@ @@@@@@@[@@@@START@CKPAR@@CKPT@@@___[M;%H [5MEZ$I!2JO*ET/O?,:VETV$8,VR+%VL )@@G@@Q:F^# ^@+DTC5@SOQ4_[3_77DSQRT @@)@@@@[@@@@@@@@@@@@@@@[)@)@@@@@@@@@ PRBINVM )@@G@@ PRSTD PRFSH PRNBN PRCHI PRPSN@@@@@@@@@@@@@@@@@@@@@@@@J!-@@QB ^VV )@@G@@(1P6G13.5) @@[[I'@@[[ID@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@T F @@@@@@VW )@@G@@@@@@@@@@@@@@@@@@@@@@[B ^)^@@@@)@)@@@@@[@@O@@[@@P@@@@@@^@@@@@@@@@@@@@@@C@VX )@@G@@K^*@@@@@@@@@KB2@@@@@@@@@KE")@@@@@@@@KI$^@@@@@@@@KL05@@@@@@@@KO.]K@@@@@@@VY )@@G@@KS&DU@@@@@@@KV\:0)@@@@@@KY;&?*@@@@@@K+>KF9@@@@@@L#:R<:1U1+@@L=2ZFD3KL$N,VZ )@@G@@M '1>J<-:>D)M$+H-6E_G=3LNC$4/$D-YUC=N(,RRQ!,899#OE5"X'<8ZU"@O:"5-8MO:II&WA )@@G@@PH==5(FESV96UT(3\2B=K@I?7N@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@WB )@@G@@@@@@@@@@@@@@@@@@@@A$\A"#A:\A"#A\\A"#A3\A"#A7\A"#A<\A"]LOCATION OF ERROR WC )@@G@@IS MARKED BY * IN FOLLOWING IMAGE. @@CA"+@@[A_=@@[A_=@@[A_=@@^A"%@@^A",WD )@@G@@@@AA"2@@[A_=@@ A"8INTERNAL TYPE AND FORMAT TYPE ARE INCOMPATIBLE. ILLEGAWE )@@G@@L OCTAL INPUT. ILLEGAL INTEGER INPUT. TOO MANY DIGITS IN INTEGER INPWF )@@G@@UT. ILLEGAL CHARACTER IN INPUT. @[DA"_@[CA_CILLEGAL FORMAT CHARACTERWG )@@G@@S WERE ACCEPTED AS BLANKS. RECORDS EXCEEDING MAXIMUM LENGTH ARE FAULTWH )@@G@@Y. @@@@@@ @@ @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@WI )@@G@@@@@@@@NBMSG$@@@@@@@@@@@@() @]DA.'@[QB^!@@[A"#@[QA"#??????@@@@@@@@@@@@WJ )@@G@@@_DB@D@_FA_!@_DA_8@_FA_!@_CB@[@_#B@MEXECUTION TERMINATED BY AN ATTEMPT TWK )@@G@@O READ PAST AN END-OF-FILE. EXECUTION TERMINATED BY AN ATTEMPT TO PASSWL )@@G@@ END-OF-TAPEA NON INTEGRAL BLOCK WAS READ FROM MAGNETIC TAPEABNORMAL I/OWM )@@G@@ CONDITION DETECTED - STATUS CODE = -- INAPPROPRIATE UNITOUTPUT SYMBIWN )@@G@@ONT UNIT REFERENCED BY A READ STATEMENT. INPUTOUTPUT WRITE READ __DB@PWO )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ SEQUENCE NWP )@@G@@ LINE N ERROR TERMINATION IN ROUTINE CALLED AT WQ )@@G@@ SEQUENCE NUMBER OF ROGRAMA COMPUTED GO TO THAT WAS OUT WR )@@G@@OF RANGE WAS DETECTED AT SEQUENCE NUMBER OF MAIN PROGRAM. ILLEGAWS )@@G@@L OP AT SPECIFIED RETURN FROM RETURN VARIABLE SPECIFIWT )@@G@@ED IN OUT OF RANGE NEGATIVE@]BB@1@]DB@8@]BB@8@@@/K@MAIN P@]EB@8WU )@@G@@@]HB[]@]BB[M@]CB[T I/ORETN 0RETN K@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@WV )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@_____"@@@@@@@@@@@@@@@@@@WW )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@[@@@@@@@@@@@[@@@@@@@@@@@@@@@@@[@@@@@@@@@@@@WX )@@G@@@@@@@@@@@[=_@@@[=_@@@[=_@@@@@@@@@@@@@@@[=_@@@@@@IOPR IGDM OFLO UFLO WY )@@G@@DIVZRORESTRTABORT RBK TS ERR$ ILLEGAL OPERATION CODE GUARD MODE VWZ )@@G@@IOLATION FLOATING POINT OVERFLOW FLOATING POINT UNDERFLOWDIVIDE QUOTIXA )@@G@@ENT OVERFLOWPROGRAM RESTART PROGRAM ABORT CONSOLE INTEXB )@@G@@RRUPT TEST AND SET INTERRUPT ERROR MODE: TYPE X, CODE XX ******XC )@@G@@******XXXXXXXXXXXXXXXXXXXXXXXX************ ERROR DETECTED AT LOCATION XD )@@G@@XXXXXXERROR LIMIT REACHED __ B#L@#AB#Y@]^B#=@[IB#QNL[HPM@@[@@@@@@@@@XE )@@G@@@@@@@@@@[@@@)@)@@@K^*@@@@@@@@@@@[@@[@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@XF )@@G@@/S@@@@/K@[$A/K@@@@/S@@@@(4@B^L/K@[$DRB@B^LO;@@@[AB@B^L 4@B^L/K@R^O XG )@@G@@/K@@@@R#KA/&A#KB^X'^@[+%/K@R^Y@@ B ^@@J___C/@@@@@@@@@@@@@@@@@@@@@@@@@@@@XH )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@HB )@@@@@@@@@@@@XI )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@XJ )@@G@@@@@@@@(012H ***** FILE ,2A6,017H IS NOT ASSIGNED.) (012H ***** FILE ,XK )@@G@@2A6,032H IS ASSIGNED TO IMPROPER DEVICE.) (034H ***** INPUT/OUTPUT ERRORXL )@@G@@ ON FILE ,2A6,007H, REEL ,A6,032H. ERROR WHILE CLOSING THE FILE./084H *XM )@@G@@**** TWO END-OF-FILE MARKS WERE WRITTEN. WHEN BACKSPACING OVER THE LASTXN )@@G@@ EOF MARK,,030H END-OF-FILE WAS NOT DETECTED.) (034H ***** INPUT/OUTPUTXO )@@G@@ ERROR ON FILE ,2A6,007H, REEL ,A6,001H.,052H END-OF-FILE INDICATION DEXP )@@G@@TECTED WHEN NOT EXPECTED./061H ***** HARDWARE END-OF-FILE MISPLACED, OR XQ )@@G@@OPERATOR RESPONDED ,H ) (034H ***** INPUT/OUTPUT ERROR ON FILE ,2A6,007HXR )@@G@@, REEL ,A6,047H. END-OF-TAPE MARK DETECTED WHEN NOT EXPECTED.) (044H XS )@@G@@***** PROBABLE ERROR IN REELS CONTROL WORD.) (052H ***** ERROR ON @ASXT )@@G@@G CARD, OR IN REELS CONTROL WORD,,022H OR TOO MUCH DATA FOR ,I2,007H REEXU )@@G@@LS.) (034H ***** INPUT/OUTPUT ERROR ON FILE ,2A6,007H, REEL ,A6,038H. XV )@@G@@TAPE BLOCK HAD FRAME COUNT THAT WAS/022H ***** NOT A MULTIPLE ,017HOF THXW )@@G@@E WORD SIZE.) (034H ***** INPUT/OUTPUT ERROR ON FILE ,2A6,013H. ATTXX )@@G@@EMPTED ,057HTO READ AREA OF MASS STORAGE THAT HAS NEVER BEEN WRITTEN.) XY )@@G@@(034H ***** INPUT/OUTPUT ERROR ON FILE ,2A6,013H TIME EXPIRED,026H ON REXZ )@@G@@AD-AND-LOCK REQUEST.) (034H ***** INPUT/OUTPUT ERROR ON FILE ,2A6,007HYA )@@G@@, REEL ,A6,026H. PARITY ERROR ON TAPE OR/083H ***** OPERATOR RESPONDED YB )@@G@@WITH 'G' TO CONSOLE MESSAGE. PROBABLE TAPE REEL PROBLEM,/011H ***** OR YC )@@G@@@,038HASG ERROR SPECIFYING INCORRECT PARITY.) (034H ***** INPUT/OUTPUTYD )@@G@@ ERROR ON FILE ,2A6,034H. PARITY ERROR ON MASS STORAGE OR/038H ***** OPYE )@@G@@ERATOR RESPONDED WITH 'G' TO ,041HCONSOLE MESSAGE. PROBABLE HARDWARE ERRYF )@@G@@OR./019H ***** PLEASE SEE A,012H CONSULTANT.) (034H ***** INPUT/OUTPUTYG )@@G@@ ERROR ON FILE ,2A6,007H, REEL ,A6,048H. LOSS OF POSITION ON TAPE DUE TYH )@@G@@O PARITY ERROR,/010H ***** OR ,044HOPERATOR RESPONSE OF 'B' TO CONSOLE MYI )@@G@@ESSAGE./053H ***** PROBABLE TAPE REEL ERROR, OR HARDWARE PROBLEM./023H *YJ )@@G@@**** PLEASE SEE A CON,008HSULTANT.) (034H ***** INPUT/OUTPUT ERROR ON FIYK )@@G@@LE ,2A6,007H, REEL ,A6,031H. ASSIGNED TAPE DRIVE IS DOWN,/029H ***** ORYL )@@G@@ OPERATOR RESPONDED ,054HWITH 'D' TO CONSOLE MESSAGE. PROBABLE HARDWAREYM )@@G@@ ERROR./046H ***** PLEASE SEE A CONSULTANT OR AN OPERATOR.) (034H ***** YN )@@G@@INPUT/OUTPUT ERROR ON FILE ,2A6,010H. CAUSE OF,016H PROBLEM UNKNOWN) YO )@@G@@(034H ***** INPUT/OUTPUT ERROR ON FILE ,2A6,007H, REEL ,A6,009H ON REEL YP )@@G@@,I2,004H OF ,I2,027H. CAUSE OF PROBLEM UNKNOWN.)(021H ***** ERROR CODE IYQ )@@G@@S ,O3,023H WHICH IS NOT EXPECTED.,036H PROBABLE SYSTEM OR SOFTWARE ERROYR )@@G@@R.) S1IOMG. UNEXPECTED I/O ERROR. ______S1IOMG ON CALL TO S1REEL. YS )@@G@@______@@[@@@@@F@@^@@@@@@S1IOMG@^N@@]@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@YT )@@G@@PAGE @@@@@@@@@@@@@@@@@@@@@@@@(45X,7A6,5X,A5,I3)(1H ) @@[@@@@@F@@@@@@@@@YU )@@G@@S1PHD @]E@@#@@@@@@@@@@@@ @@@@@@@@@@@@@@@@@@@@@@@@@ASG,T YV )@@G@@.,F17 @FREE . @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@B@@@ YW )@@G@@ @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@YX )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@K@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@YY )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@[ABIS@[ABIY@[CBI= ***** BAD CALLINGYZ )@@G@@ PARAMETERS TO S1AISJ. ***** I/O ERROR IN S1AISJ. ***** VARLST CONTZA )@@G@@AINED OUT OF RANGE VALUE TO S1AISJ. ***** ELEMENT NOT FOUND - S1AISJ. ZB )@@G@@ ***** I/O ERROR IN PFS$ - S1AISJ. ***** FILE IS NOT A PROGRAM FILE - ZC )@@G@@S1AISJ. @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ ***** MORE ZD )@@G@@OBSERVATIONS ADDED TO STJBANK THAN EXIST IN STJBANK. @@IBI_@@@BJV@@IBJHZE )@@G@@@@@@@@ ***** I/O ERROR WRITING HEADER - S1ACSJ ***** I/O ERROR WRITINGZF )@@G@@ VIS - S1ACSJ. ***** I/O ERROR READING VIS - S1ACSJ. ***** NOT EZG )@@G@@NOUGH OBSERVATIONS ADDED TO STJBANK.@[BBI#@[ BIE@[DBIJ@[FBI4@[BBJ)@@#BJWZH )@@G@@@@]BJW@@]BJX@@@0@@@[BBJ$@[BBJ,@[CBJ5@@@@@@@@@@@@@@@@@@@@@@@@(030H ***** ZI )@@G@@TYPE OF VARIABLE NUMBER,I5,016H IS OUT OF RANGE,037H AS PASSED TO STJBANZJ )@@G@@K OUTPUT ROUTINE.)@@@@@@@@@@@@@@@@@@@@@@@@@@[@@@NS@@@@ @@F@@@@@@@@@ZK )@@G@@S1BAAI@]9@@#@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@K@@@@@@@@@@@@@@@@ZL )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@B@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ZM )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@K@@@@ZN )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@B@@@@@@@@@0@IBMC@@@@@@@@@@@@ZO )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@ ***** ATTEMPT TO OPEN TOO MANY INPUT STJBANKS. ZP )@@G@@@@@@@@@@@@@@ ***** FILE @@@@@@@@@@@@ NOT ASSIGNED. ***** PROGRAM FILZQ )@@G@@E @@@@@@@@@@@@ HAS NO STJBANK @@@@@@@@@@@@ ***** I/O ERROR ON FILEZR )@@G@@@@@@@@@@@@@@ ***** FILE @@@@@@@@@@@@ IS NOT A PROGRAM FILE. ***** BAD FZS )@@G@@ILECD PASSED TO S1SJLD ***** BAD VAR REQUEST TO S1SJLD. ***** I/O EZT )@@G@@RROR FROM S1SJLD ***** BAD FILECD PASSED TO S1SJIC ***** BAD FILECD ZU )@@G@@PASSED TO S1SJIO ***** BAD FILECD PASSED TO S1SJIN @@UBL[@[EBMH@[BBMRZV )@@G@@@[FBMY@[ABM(@[CBM\@@]BMA@[ABM7@[ABM.@[ BN#@[ABNO@[ABNI@[ABNC@@F@@E@@@@@@ZW )@@G@@D4XTRA@[A]MM@@@@@@@@@@@@@@F@@]@@@@@@URTIMF@[#@@^@@@@@@SEC. @@@@@@TEST ZX )@@G@@______(033H0***** ELAPSED TIME RESET TO ZERO) (023H0***** ELAPSED TIMEZY )@@G@@ AT ,13A6) (037H0VALUE OF TIME ARGUMENT OUT OF RANGE ,I10) NS@@@@. ZZ )@@G@@@@@@@A@@@@@[@@@@@^@@@@@#@@@@@@@@[@@@@@F@@@@@@@@@S1TIMI@[2]MM@@@@@@@@@@@@AA )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@VARUSEAB )@@G@@______NVARS ______@@F@@@@@@@@@S1VLSD@[P@@#@@@@@@@@@@@@@@F@@A@@@@@@S1UNITAC )@@G@@@[-@@#@@@@@@@@F@@@@@@@@@S1USIN@[A]JN@@@@@@@@@@@@/K@RPN/KF@@E/KF@@^/KF@@^AD )@@G@@@@@@@W@@@@@W@@@@#)@@@@#)@@@@#)@@@@#)@@@@#)@@@@#)@@@@#)@@@@#)@@@@@W@@@@@WAE )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@AF )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@AG )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@AH )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@AI )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@AJ )@@G@@@@@@@@ STJ$D0STJ$D @@@@@@_@@@@@@@@@_@*[@@@@*SDFF*@@@@@@@@@@@@AK )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@AL )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@XB4:@@EB5X@@EB55@@!B6-@@PC^R@[PC /@[8CB>@]@CD,AM )@@G@@@@ECGC@@ECG+@[ICHF@BHCJ=@[]CR+@^OCYF)@LB4U)@PB5C)@IB5$)@+B5_)HDB7I)[KC^?AN )@@G@@)@OCBL)@LCDX)@UCF,)@KCGM)@ZCG?)[FCIT)@1CQ1) $CS=S1IODR______(10X,2A6,6O1AO )@@G@@2,1X,2A7,O12) SKI REA @@@@@[@@[@@[REW END WRI @@[@@@@@F@@AAP )@@G@@@@@@@@S1IODR@^B@@]@@@@@]@@F@@@@@@@@@IN @^K@@]@@@@@#@@F@@@@@@@@@OUT AQ )@@G@@@^T@@] @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@NTCDS AR )@@G@@______ @@@@@]@@]@@@@@F@@G@@@@@@D1PLTM@]6@@]@@@@@@SYSERR______(030H AS )@@G@@*****STATJOB SYSTEM ERROR IN ,15A6) (052H ***** PLEASE SEE A CONSULTANT AT )@@G@@WITH OUTPUT AND YOUR ,011HINPUT DECK./045H *****WARNING: ERRONEOUS MESSAAU )@@G@@GES MAY FOLLOW.) @@[@@@@@@@@]@@@@@_@@F@@]@@@@@@S1SERR@[W@@#@@@@@@@@@@@@AV )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@SVOB$$ @@@@@@@@@@@@AW )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@[@@@@@#@@@@HC@@@@@]@@@@@@@@F@@@@@@@@@AX )@@G@@S1SVOB@]U@@]@@@@@@S1INSJ. S1SJIT ERROR RETURN. ______ S1INSJ. S1SJIN ERAY )@@G@@ROR RETURN. ______S1INSJ. ______S1SJMN CALL.______S1SJMN VIS LOADINGAZ )@@G@@. ______S1INSJ. ERROR RETURN FROM S1SJIO. ______S1INSJ. ERROR RETUBA )@@G@@RN FROM S1SJIC. ______S1INSJ ON CALL TI S1AISJ. ______S1INSJ ON CABB )@@G@@LL S1AOSJ ______S1INSJ ON CALL TO S1ACSJ. ______S1INSJ. TOO MUCH DBC )@@G@@ATA TO ADD TO DATA SET. ______S1INSJ ON CALL TO S1ACSJ. ______@@@SU)BD )@@G@@@@[@@[@@[@@@@@I@@@@@@@@[@@F@@@@@@@@@S1IISJ@#$@@]ZZ-Y8L@@F@@]@@@@@@MINMAXBE )@@G@@@#'@@]@@@@@@@@@@@@@@@@@@MADISON ACADEMIC COMPUTING CENTER PROGRAM @@@@@@BF )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@******BG )@@G@@ @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@BH )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@RUNID ______TITLE ______DSL ______PROGNM______BI )@@G@@DATE ______IPAGE ______IDMAT ______(1H ,27X,6A6,A5,1X,2A6,2X,2A6,11X,00BJ )@@G@@4HRUN ,A2,7X,4HPAGE,I4) (1H+,27X,6A6,A5,1X,2A6,2X,2A6,11X,004HRUN ,A2,7XBK )@@G@@,4HPAGE,I4) (1H0) (24X,11A6,A2) (28X,10A6,A4,15X,2A6,5H PAGE,I4) BL )@@G@@(28X,10A6,A4,15X,2A6) (107X,2A6,1X,2A6) S1PHED. ______NTCDS ______BM )@@G@@@@[@@[@@[@@@@@[@@#@@F@@@@@@@@@S1PHED@#1@@]@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@BN )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@[@@F@@@BO )@@G@@@@@@@@S1HEDC@[;@@#@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@BP )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@) ______ ______- ______( ______BQ )@@G@@ ______* ______ 000000PARENS@@F@@@@@@@@@S1ENCI@]I@@]@@@@@@BR )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@BS )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@TEST ______OVERFL______(049H0***** ARITHMBT )@@G@@ETIC OVERFLOW IN STATJOB SUBROUTINE ,A6) (017H0***** A TOTAL OF,I5,083HBU )@@G@@ ARITHMETIC OVERFLOW CONDITIONS HAVE OCCURRED DURING ANALYSIS OF THE LASBV )@@G@@T DATA SET.)(7X,051HPLEASE REPORT THESE ERRORS TO A STATJOB CONSULTANT.)BW )@@G@@(006H0*****,I9,017H CALLS TO S1VFWT.) (023H0***** ERRORS IN S1VFW.) BX )@@G@@@@F@@@@@@@@@S1VFWA@[3@@#@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@BY )@@G@@@@F@@@@@@@@@S1GTAG@[=@@#@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@BZ )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@COMSTO______CA )@@G@@STEPREG1. ______ @@@@@@@@@@@@@@@@@@@@@@@@COVARIANCE MATRIX OF REGCB )@@G@@RESSION COEFFICIENTS CORRELATION CC )@@G@@MATRIX OF REGRESSION COEFFICIENTS CD )@@G@@@@@@@@@@@@@@@@@@@@(14H NO. NAME ,3X,12(1X,A6,A2)) (14H VARIABLE NO. CE )@@G@@,12(4X,I3,2X)) (1X,I3,1X,A6,A2,1X,12F9.3) (14H NO. NAME CF )@@G@@,5X,9(A6,A2,4X)) (14H VARIABLE NO. ,9(6X,I3,3X)) (1X,I3,1X,A6,A2,2XCG )@@G@@,9D12.5) @@@@@@ @@@___@@[@@@@@@@B_@@@@C@@@@@@@@@@@@@@@@@@@CH )@@G@@@@@@@@@@@@@@REWIND______OVERFL______NVARS ______COPIN ______CARDCO______CI )@@G@@FILECO______NOEQN ______IFRES ______PRODUC______COVARM______SUMS ______CJ )@@G@@MLE ______MX ______IPAGE ______IDMAT ______MXCOEF______SAVEXX______CK )@@G@@NOCOR ______DOUBLE______END OF INPUT PHASE______REWIND______WRITE ______CL )@@G@@END OF OUTPUT OF BASIC STATISTICS ______READ ______REWIND______READ CM )@@G@@______REWIND______(041H0***** STEPREG1 ERROR. DEPENDENT VARIABLE,I4,048HCN )@@G@@ HAS ZERO VARIANCE. NO ANALYSIS GIVEN FOR MODEL,I5) (//28X,46HD E S C CO )@@G@@R I P T I O N O F T H E M O D E L ,6H(MODEL,I4,1H)/) (28X,35HSTEPCP )@@G@@WISE SELECTION PROCEDURE ,A2,A6/28X,35HSIGNIFICANCE LEVEL FOR INCLCQ )@@G@@USION ,A2,A6/28X,35HSIGNIFICANCE LEVEL FOR EXCLUSION ,A2,A6/28X,21HDCR )@@G@@EPENDENT VARIABLE IS,I4,1X,A6,A2//28X,21HINDEPENDENT VARIABLES//23X,7HBACS )@@G@@SEVAR,17X,7HFREEVAR,15X,8HFRSTFREE/)(18X,A6,A2,2X,A3,1X,A6,A2,8X,A3,1X,ACT )@@G@@6,A2,10X,A3,1X,A6,A2) END MODEL INIT ______BEGIN STEPWISE PROCEDURECU )@@G@@______(//111H ***** STEPREG1 NOTE. MAXIMUM NUMBER OF STEPS REACHED, STECV )@@G@@PWISE SELECTION PROCEDURE TERMINATED FOR THIS MODEL.) ANAL 1______ANAL 2CW )@@G@@______(109H0*****STEPREG1 ERROR. NO VARIABLES COULD BE RETAINED IN THE MCX )@@G@@ODEL BECAUSE THE EXCLUSION CRITERION IS TOO LOW./7X,028HANALYSIS OF MODECY )@@G@@L ABANDONED.) (/112H ***** STEPREG1 ERROR. ALL SIGNIFICANT DIGITS INCZ )@@G@@ RESIDUAL SUM OF SQUARES HAVE BEEN LOST DUE TO NEAR-PERFECT FIT /23X,62HDA )@@G@@FURTHER COMPUTATIONS INVOLVING THIS QUANTITY MAY BE ERRONEOUS.) END OFDB )@@G@@ ANALYSIS OF THIS MODEL ______BEGIN OUTPUT______(079H0***** STEPREG1 ERRDC )@@G@@OR. NO INDEPENDENT VARIABLES COULD BE INCLUDED IN THE MODEL./7X,028HANALDD )@@G@@YSIS OF MODEL ABANDONED.) ANAL 3______ANAL 4______(//97H ***** STEPRDE )@@G@@EG1 ERROR. FURTHER ANALYSIS ON THIS DATA SET ABANDONED DUE TO ERRORS ON DF )@@G@@SCRATCH FILE.) WRITE ______(/28X,29HS U M M A R Y O F S T E P S/82XDG )@@G@@,9HCHANGE IN,20X,9HNUMBER OF/6H STEP,15X,100HIN OR STANDARD ERROR CODH )@@G@@EFFICIENT OF COEFFICIENT OF COEFFICIENT OF SIGNIFICANCE VARIABLES DI )@@G@@IN/16H NO. VARIABLE,6X,99HOUT OF ESTIMATE MULT. CORRELATION DDJ )@@G@@ETERMINATION DETERMINATION LEVEL THE EQUATION/) REWIND______DK )@@G@@READ ______(15H (BASE GROUP,I3,4H) ,A6,F13.4,F15.4,F18.4,F16.4,25XDL )@@G@@,I3) (22H (ALL FREE VARIABLES) ,A6,F13.4,F15.4,F18.4,F16.4,25X,I3) DM )@@G@@(1H ,2I5,1X,A6,A2,2X,A6,F13.4,F15.4,F18.4,F16.4,F15.3,10X,I3) (//28XDN )@@G@@,57HV A R I A B L E S N O T I N F I N A L E Q U A T I O N//17X,86HVADO )@@G@@RIABLE PARTIAL CORRELATION F VALUE SIG. LEVEL PIVOT VALUE DP )@@G@@ PIVOT/SS/) (17X,I3,1X,A6,A2,F12.4,F20.5,F12.4,D17.4,D15.4,2X,3A6)DQ )@@G@@(/17X,81HPIVOTMIN (MINIMUN VALUE OF PIVOT/SS ALLOWED FOR ANY VARIABLE TODR )@@G@@ ENTER EQUATION) =,E11.4) (17X,I3,1X,A6,A2,7X,31H(STATISTICS CANNOT DS )@@G@@BE COMPUTED),6X,D17.4,D15.4,2X,3A6) END OUTPUT ______(34H1THERE IS NO EDT )@@G@@QUATION TO BE SOLVED) D4ANAL. ______@@@@@@@@@@@^ @@]@@@@@@@@#DU )@@G@@K^@@@@NS@@@@@@@@@]@@@@@A__.@@@__"@@@@@[@@[@@[@@@MODEL @@@@@[DEPVAR@@@@@@DV )@@G@@@@@@@@KG@@@@BEGIN NO T USEDFO RWARD BA CKWARD0. H?GV7*MIA*@@DW )@@G@@@@@@@ GROUP J =9F,<(CXRJK[)@@@@@@@@@BACKSTEP @@@SUYKGT&T&STEP KO@@@@DX )@@G@@@@@SUZFINAL EQU @@@@@D@@@@@GF13.6 CONSTANT IN OUT ***** TOO SMDY )@@G@@ALL @@F@@P@@@@@@D4ANAL@NK@@[@@@@[=@@F@@[@@@@@@HEDMSG@NT@@[@@@@@@@@@@@@DZ )@@G@@@@@@@@@@F@@[@@@@@@S1RINT@[ @@^@@@@@@ @@@@@@@@@@@J@@@@@Q@[[#=T@@@@@@EA )@@G@@@@@@@@@@@@@@^#C@@B^#K@@B^#[@@B ^]@@B]@#@@A]@^@@A]@*@#[]@ @@[[@D@^[[@)@ BEB )@@G@@[@-@AB[@+@[[[@+@[[[@+@][[@+@][[@@[@[[@@]@[[@A^@B#@B^@B]@@@@B]@@#@B[@@@@BEC )@@G@@[@+@[[ @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@NCT***@@@@@@ED )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@EE )@@G@@@@@@@@@@@@@@SEQ***@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@EF )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@EG )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@CZ*C-P@@@@@@@@@@@@EH )@@G@@@@R#!1@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@S#!1@@@@@@@@@@@@EI )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@T#!1@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@EJ )@@G@@@@@@@@@@@@@@@@@@@@@@U#!1@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@EK )@@G@@@@V#!1@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@W#!1@@@@@@@@@@@@EL )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@X#!1@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@EM )@@G@@@@@@@@@@@@@@@@@@@@@@Y#!1@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@EN )@@G@@@@Z#!1@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@)#!1@@@@@@@@@@@@EO )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@-#!1@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@EP )@@G@@@@@@@@@@@@@@@@@@@@@@+#!1@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@FREE,EQ )@@G@@B . @@ C-P@ASG,T ,F///100 . @@AC-VER )@@G@@@USE . @@AC-+@]DC-%**NTRAN ERROR** UNIT $-$ES )@@G@@: NO PACKET SPACE AVAILABLE. @]DC-4**NTRAN ERROR** UNIT $-$ IS NOT AVAIET )@@G@@LABLE FOR NTRAN. @]BC-"**NTRAN ERROR** UNIT $-$ NOT ASSIGNED. @]CC+AEU )@@G@@**NTRAN ERROR** UNIT $-$ HAS IMPROPER DEVICE. @]DC+J**NTRAN ERROR** UNEV )@@G@@IT $-$ HAS ILLEGAL FUNCTION CODE. @@[@@@K@@@@@^@@@@@@@F@@]@@@@@@S1UIIIEW )@@G@@@[#@@^@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@EX )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@EY )@@G@@)@[C+Z-H)C+)@@@___@@@___@@@___@@@___@@@___@@@___@@@___@@@___@@@___@@@___EZ )@@G@@@@@___@@@___@@@___@@@___@@@___@@@___@@@___@@@___@@@___@@@___@@@___@@@___FA )@@G@@@@@___@@@___@@@___@@@___MAIN @@K@@^@@@@FIINPUT @@M@@^@@@@^[FB )@@G@@OUTPUT @@O@@^@@@@@#COMMON @@Q@@^@@@@@]@@@B@ @@@@FI@@@]@ @@@@^[FC )@@G@@@@@]@ @@@@@#@@@[@ @@@@@]@@@@@@@@@@@@@@@@@@@@@@@@AUSPBK DQVDJZBETAF FD )@@G@@ O!+BRBBETANC J'O^UBBLANK$COMMON@@@@@@DEXP$ C\=][CDLOG$ FE )@@G@@ E>J]#BDSQRT$ E,DFCS1PRTL H05DWCS1RCOP [ %FQES1RED FZ )@@G@@ [#P[XFS1REEL K>AAUES1RENT @]ADC6S1RINT [#R[XFS1SCANGA )@@G@@ H$[DWCS1SERR [[>FQES1SIR BX8A[GS1SJIN NH)DLES1STCHGB )@@G@@ [1:#^BS1SVOB L&'#TES1TCHS F^*DFCS1TIMI [/0 JBS1TRANGC )@@G@@ P[=#JCS1USINGD )@@G@@ M&Z]DAS1VFW K>CAUES1VLSD JZUEPES1WCOP H?/DWCTRNF GE )@@G@@ [VDERFURNPAR L,GASAURPRC2 LB=BCAURPRTM LCFBCAURRNIDGF )@@G@@ DF(]DAURTIMF B(FA[GUWCLOB EA]AUAUWERR$ C$3 CD@@@@@@GG )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@GH )@@G@@$IBANK @@@@[;$DBANK @ 1@]-@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@GI )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@GJ )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@[ K@@[@^@]4@C@@@@@@GK@@[@^@[1@E4@@@@@JK@@[@^GK )@@G@@@[V@G>@@@@@#K@@[@^@#!@I@@@@@ HK@@[@^@@ @L!@@@@ EK@@[@^@@R@L2@@@@[LK@@[@^GL )@@G@@@[-@MD@@@@[FK@@[@^@ D@N%@@@@ TK@@[@^@@ @S3@@@@@AK@@[@^@F_@S8@@@@ NK@@[@^GM )@@G@@@@B@=7@@@@ KK@@[@^@]!@="@@@@[]K@@[@^@NT@$:@@@@ WK@@[@^@AD@;^@@@@[IK@@[@^GN )@@G@@@[![[H@@@@@MK@@[@^@@2[]'@@@@[@@@@^I@@@[@^@@J[*G@@@@#V@@@[@^@BX[*V@@@@#/@@@[@^GP )@@G@@@#F[\8@@@@]E@@@[@^@@\[3#@@@@]K@@@[@^@@ [32@@@@[\@@@[@^@ W[37@@@@[8@@@[@^GQ )@@G@@@ @[9N@@@@^)@@@[@^@ W["N@@@@@9@@@[@^@@C]#\@@@@ Q@@@[@^@@E]#7@@@@^?@@@[@^GR )@@G@@@]A]^[@@@@ [@@@[@^@[K]AB@@@@^8@@@[@^@[$]BR@@@@^;@@@[@^@@S]C"@@@@#S@@@[@^GS )@@G@@@CD]DQ@@@@^]@@@[@^@@Z]LZ@@@@@V@@@[@^@AK]L"@@@@^U@@@[@^@[@]SI@@@@^&@@@[@^GT )@@G@@@#$]TI@@@@]+@@@[@^@D']W5@@@@#_@@@[@^@ H]&\@@@@#_C@@#@^@@@@C'@@@@]Z@@@[@^GU )@@G@@@]7]:/@@@@]H@@@[@^@#L],3@@@@^"@@@[@^@[(]2^@@@@]Q@@@[@^@[_]3!@@@@]QC@@#@^GV )@@G@@@@@@D@@@@@[?@@@[@^@][]5?@@@@@0@@@[@^@?X]7!@@@@@0C@@#@^@@@@C*@@@@^O@@@[@^GW )@@G@@@@D#=E@@@@[)K@@[@^@D5#=N@@@@^5@@@[@^@@I#,C@@^@[&K@@[@^@[:#,Q@@^@[RK@@[@^GX )@@G@@@@B#0[@@^@#-@@@[@^@ F#0C@@^@^2@@@[@^@[ #5N@@^@^\@@@[@^@@E#6S@@^@#%@@@[@^GY )@@G@@@@O#6+@@^@^ @@@[@^@@5#66@@^@#9@@@[@^@@<#7:@@^@^<@@@[@^@[4#8I@@^@^R@@@[@^GZ )@@G@@@]##']@@^@]T@@@[@^@@*#/ @@^@#M@@@[@^@[J#/!@@^@]*@@@[@^@]-#./@@^@]B@@@[@^HA )@@G@@@CC^@X@@^@^(@@@[@^@@?^C>@@^@][@@@[@^@[#^DL@@^@##@@@[@^@^X^EO@@^@##C@@#@^HB )@@G@@@@@@DD@@^@#P@@@[@^@@(^I1@@^@]7@@@[@^@@1^JU@@^@]1@@@[@^@^3^KF@@^@#D@@@[@^HC )@@G@@@ Y^O"@@^@#J@@@[@^@[I^UW@@^@],@@@[@^@]K^V%@@^@]W@@@[@^@G ^X'@@^@]WC@@#@^HD )@@G@@@@@@C:@@^@].@@@[@^@["^(_@@^@].C@@#@^@@@@DA@@^@ B@@@[@^@@V^:.@@^@#G@@@[@^HE )@@G@@@BS^?S@@^@#GC@@#@^@@@@DD@@^@]4@@@[@^@[M^30@@^@]4C@@#@^@@@@DD@@^@#@@@@[@^HF )@@G@@@EM^5]@@^@]'@@@[@^@]F^_O@@^@]'C@@#@^@@@@DD@@^@@!@@@[@^@@> [Z@@^@#6@@@[@^HG )@@G@@@@N ]^@@^@#6C@@#@^@@@@HL@@^@^X@@@[@^@@) ]R@@^@^XC@@#@^@@@@C.@@^@#$@@@[@^HH )@@G@@@@^ ]7@@^@^F@@@[@^@ H ];@@^@^FC@@#@^@@@@C:@@^@^C@@@[@^@J$ CC@@^@^CC@@#@^HI )@@G@@@@@@DD@@^@#A@@@[@^@=\ R\@@^@#AC@@#@^@@@@DD@@^@#AC@@ @^@@@@C:@@^@@Y@@@[@^HJ )@@G@@@^S /Y@@^@#!@@@[@^@^LA@6@@^@#!C@@#@^@@@@DD@@^@#!C@@ @^@@@@C.@@^@]N@@@[@^HK )@@G@@@ A B@@^@]NC@@#@^@@@@D#@@^@]NC@@ @^@@@@DA@@^@[O@@@[@^@@#AEG@@C@[(K@@[@^HL )@@G@@@@*#,Q@@C@["@@@[@^@^S#,"@@C@@P@@@[@^@EO#3Q@@C@ ^@@@[@^@AD#.%@@C@@%@@@[@^HM )@@G@@@]S^#3@@C@[5@@@[@^@#?^AF@@C@[;@@@[@^@@&^D7@@C@[2@@@[@^@CX^EX@@C@@S@@@[@^HN )@@G@@@C*^M'@@C@@$@@@[@^@^,^V+@@C@@=@@@[@^@[2^)K@@C@@-@@@[@^@E(^+]@@C@@3@@@[@^HO )@@G@@@O?^?:@@@@[ 0@@@@ @[RAOP@@@@[ 8@@]@ @@@@HL@@@@@G0@@]@ @@ZAP?@@@@@J0@@]@ HP )@@G@@@[AAQF@@@@@#0@@@@ @[AARL@@@@@#8@@]@ @@@@HL@@@@ H0@@]@ @@[ASR@@@@ E0@@@@ HQ )@@G@@@@[ASS@@@@ E0@@]@ @@]AST@@@@[L0@@]@ @@MASV@@@@[F0@@@@ @]$AS!@@@@[F8@@]@ HR )@@G@@@@@@HL@@@@@A0@@@@ @]FAVO@@@@@A8@@]@ @@@@HL@@@@ N0@@@@ @@[AXZ@@@@ K0@@@@ HS )@@G@@@[YAX)@@@@ K8@@]@ @@@@HL@@@@[]0@@]@ @O9AY"@@@@[X0@@]@ @@>A37@@@@ W0@@]@ HT )@@G@@@^)A4W@@@@[I0@@]@ @[EA8/@@@@@M0@@]@ @@KA'A@@@@[<0@@@@ @]DA'Q@@@@[<8@@]@ HU )@@G@@@@@@HL@@@@[U0@@]@ @@^A/Z@@@@@_0@@]@ @C.A/<@@@@^I)@@]@ @@IB )@@@@#V)@@@@ HV )@@G@@@A"B ,@@@@#/)@@@@ @@-BG?@@@@]E)@@@@ @@IBHH@@@@[\)@@]@ @],BHV@@@@[8)@@@@ HW )@@G@@@@7BKD@@@@^))@@]@ @]$BL@@@@@@9)@@@@ @@ BN$@@@@@9*@@]@ @@@@HL@@@@ Q)@@@@ HX )@@G@@@@ABN?@@@@^?)@@@@ @@4BN2@@@@^?*@@]@ @@@@HL@@@@ [)@@@@ @@SBO&@@@@ [*@@]@ HY )@@G@@@@@@HL@@@@^8)@@@@ @@KBO"@@@@^;)@@@@ @@ BPI@@@@^;*@@]@ @@@@HL@@@@#0)@@@@ HZ )@@G@@@@ BPN@@@@#S)@@@@ @) BPS@@@@^])@@]@ @@[B5X@@@@@V)@@@@ @@"B5Y@@@@^U)@@@@ IA )@@G@@@@2B6W@@@@^U*@@]@ @@@@HL@@@@^&)@@@@ @H&B7I@@@@]+)@@@@ @]1C^4@@@@]+*@@]@ IB )@@G@@@@@@HL@@@@#_)@@@@ @[:CB>@@@@#_*@@]@ @@@@HL@@@@]Z)@@@@ @@WCDK@@@@]Z*@@]@ IC )@@G@@@@@@DA@@@@]H)@@@@ @@!CD?@@@@^")@@@@ @[^CET@@@@^"*@@]@ @@@@HL@@@@]Q)@@@@ ID )@@G@@@@LCFX@@@@]Q*@@]@ @@@@HL@@@@@6=@@@@ @@UCF,@@@@^L=@@@@ @@RCGC@@@@[?)@@@@ IE )@@G@@@@OCGZ@@@@[?*@@]@ @@@@HL@@@@@0)@@@@ @G3CG3@@@@@0*@@]@ @@@@HL@@@@]^=@@@@ IF )@@G@@@@^CT&@@@@#Y=@@@@ @@*CT%@@@@#==@@@@ @#DCUM@@@@]>=@@@@ @@KCXV@@@@#3=@@@@ IG )@@G@@@@]CX:@@@@]:=@@@@ @@XCX!@@@@^O)@@@@ @@ACYE@@@@^O*@@]@ @@@@C:@@@@[)0@@]@ IH )@@G@@@^FCYK@@@@^5)@@@@ @@ C+V@@^@[R0@@]@ @@#C+)@@^@#-)@@@@ @[GC+<@@^@^2)@@@@ II )@@G@@@@'C<\@@^@^\)@@@@ @@AC=(@@^@^\*@@]@ @@@@HL@@^@#%)@@]@ @@ C=\@@^@^ )@@]@ IJ )@@G@@@@WC=4@@^@#9)@@]@ @@:C>K@@^@^<)@@@@ @@KC>;@@^@^<*@@]@ @@@@HL@@^@^R)@@@@ IK )@@G@@@@HC&F@@^@]T)@@@@ @@ C&S@@^@#M)@@@@ @@LC&X@@^@]*)@@@@ @@&C&,@@^@]B)@@@@ IL )@@G@@@]@C$O@@^@^()@@]@ @@#C(O@@^@][)@@]@ @[@C(R@@^@##)@@@@ @[XC%R@@^@##*@@]@ IM )@@G@@@@@@HL@@^@#P)@@@@ @@JC:4@@^@#P*@@]@ @@@@HL@@^@]7)@@@@ @[]C?#@@^@]1)@@@@ IN )@@G@@@[NC! @@^@#D)@@@@ @[LC,S@@^@#D*@@]@ @@@@DD@@^@#J)@@@@ @@AC\(@@^@#J*@@]@ IO )@@G@@@@@@DD@@^@],)@@@@ @@SC\\@@^@]W)@@@@ @^WC0B@@^@]W*@@]@ @@@@HL@@^@]W*@@^@ IP )@@G@@@@@@DD@@^@].)@@@@ @@WC4<@@^@].*@@]@ @@@@C'@@^@].*@@^@ @@@@DD@@^@ B)@@@@ IQ )@@G@@@@FC4_@@^@#G)@@@@ @]-C5E@@^@#G*@@]@ @@@@HL@@^@]4)@@@@ @@+C7:@@^@]4*@@]@ IR )@@G@@@@@@HL@@^@#@)@@@@ @#JC8H@@^@#@*@@]@ @@@@HL@@^@]')@@@@ @[@C;W@@^@]'*@@]@ IS )@@G@@@@@@HL@@^@@!)@@@@ @@^C/W@@^@#6)@@]@ @@]C/)@@^@^X)@@]@ @@DC/+@@^@^F)@@@@ IT )@@G@@@[EC/:@@^@^F*@@]@ @@@@DD@@^@^C)@@@@ @BIC.5@@^@^C*@@]@ @@@@HL@@^@#A)@@@@ IU )@@G@@@I0D #@@^@#A*@@]@ @@@@HL@@^@#A*@@^@ @@@@DA@@^@@Y)@@@@ @[[DN3@@^@#!)@@@@ IV )@@G@@@[5DO4@@^@#!*@@]@ @@@@HL@@^@#!*@@^@ @@@@C'@@^@#!*@@A@ @@@@D@@@^@]N)@@@@ IW )@@G@@@[1DQ(@@^@]N*@@]@ @@@@HL@@^@]N*@@^@ @@@@C:@@^@]N*@@A@ @@@@DD@@^@[O)@@]@ IX )@@G@@@@EDSU@@C@[(0@@]@ @@EC+)@@C@[")@@@@ @]:C+%@@C@@P)@@@@ @],C>P@@C@ ^)@@@@ IY )@@G@@@#CC*#@@C@ ^*@@]@ @@@@HL@@C@@%)@@@@ @@RC:F@@C@[5)@@@@ @]*C:+@@C@[5*@@]@ IZ )@@G@@@@@@G0@@C@[;)@@@@ @@WC,E@@C@@@=@@@@ @@DC,&@@C@[2)@@@@ @D]C,\@@C@[2*@@]@ JA )@@G@@@@@@G0@@C@@S)@@@@ @#BC71@@C@@S*@@]@ @@@@HL@@C@@$)@@@@ @@1C'8@@C@@=)@@@@ JB )@@G@@@@UC;(@@C@@-)@@@@ @ =C/#@@C@@-*@@]@ @@@@HL@@C@@3)@@@@ @D\D[$@@C@@3*@@]@ JC )@@G@@@@@@C*@@G@@D=@@@@ @J*DS=@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@JD )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@BETAF @@D@#NBETAFLJE )@@G@@ @@D@#)BETANC @@V@E)BYPAS$ @A/@ UDEXP @@#@@[DLOG JF )@@G@@ @@A@@[DSQRT @@!@@[D1DSP @ K@D7D1MOP @ +@B D1PLTMJG )@@G@@ @[?@ )D1RDI2 @^2@#!D1RES @ :@D!D1SELT @ *@[VD1SWP JH )@@G@@ @ >@^SD1XCHG @ Q@]CD1XPX @^F@@@D4ANAL @]K@%PD4RST JI )@@G@@ @ ,@K6D4RST1 @ ,@K9D4XTRA @[O@@AERRGET @@$@@MERRSETJJ )@@G@@ @@$@@@ERSAV$ @A%@@@ERTRAN @@%@@^EXIT @@6@@AFHS10$JK )@@G@@ @A/@@CFHS20$ @A/@@DFIELD$ @@6@Q(GAMLN @@@@]%IDJ$ JL )@@G@@ @@9@@@INCGAM @@P@^?IOCOD$ @A/@CBNBLNK$ @@6@@:NBTOD$JM )@@G@@ @@=@ CNCALC$ @@6@@2NCCC$ @@6@@/NCDOF$ @A/@ VNCNV9$JN )@@G@@ @A/@[JNCOD$ @@3@@#NDBCV$ @@6@C#NDBIN$ @A/@[HNDBLT$JO )@@G@@ @A/@]0NDBSF$ @A/@[ENDIAG$ @@6@KRNERR$ @@6@M;NERR2$JP )@@G@@ @@6@O]NERR3$ @@6@OONERR4$ @@6@OVNERU$ @@6@L.NEXB$ JQ )@@G@@ @@#@@DNEXPB$ @@M@@[NFAR$ @@6@L[NFCI$ @@6@CSDFIO KE )@@G@@ @]Z@[MSQRT @ E@@[STREG$ @@6@PZS1ACSJ @[F@# S1AISJKF )@@G@@ @[F@@@S1AOSJ @[F@[YS1AUS @ Z@ SS1AUSI @ Z@ PS1AUSPKG )@@G@@ @ T@#=S1AUST @ Z@ VS1BAAC @[I@^.S1BAAI @[I@^!S1BAAOKH )@@G@@ @[I@^8S1BAPA @ W@@SS1BAPV @ H@^#S1BDFT @#G@@>S1BUF KI )@@G@@ @]'@[-S1CADD @]7@[\S1CBUF @]7@[US1CKFL @#G@@$S1COPIKJ )@@G@@ @#A@BZS1COPS @#A@C]S1DRUM @[ @@@S1ENCI @][@].S1FACLKK )@@G@@ @[C@@@S1GDST @^"@ @S1GTAG @]B@[:S1GTCD @].@@XS1GTFNKL )@@G@@ @#$@F/S1GTNC @^O@@KS1GTOB @[2@#SS1GVAL @]B@[7S1HEDCKM )@@G@@ @["@]DS1HED2 @["@]SS1IISJ @[5@B)S1INBA @#=@]@S1INBPKN )@@G@@ @#=@['S1INCI @^]@C6S1INDC @#V@@@S1INEP @#/@[FS1INERKO )@@G@@ @#S@@*S1INGG @^ @] S1INGI @^ @[/S1INHC @#!@[\S1INHSKP )@@G@@ @#!@[4S1INIB @##@[5S1INIC @^]@C3S1INIT @^(@=*S1INLBKQ )@@G@@ @#J@[#S1INLR @#J@[@S1INOB @^(@=LS1INOP @#6@]CS1INPIKR )@@G@@ @#Y@ ES1INPK @#Y@ VS1INPO @#6@]]S1INPP @#6@] S1INP1KS )@@G@@ @#-@[FS1INRB @##@@@S1INR1 @#-@@.S1INSC @#@@@>S1INSDKT )@@G@@ @#@@@%S1INSI @#@@@ S1INSJ @[5@B&S1INSR @#@@@@S1INSWKU )@@G@@ @#$@F_S1INTF @#P@@XS1IODR @[&@A@^7S1LDBC @^U@@@S1LINE @],@@@S1LNPPKW )@@G@@ @[8@ CS1LOAD @^5@^JS1LOGI @B2@@@S1LOGP @B2@@^S1LOG2KX )@@G@@ @B2@@#S1MCOR @^I@@@S1NOPG @[8@ #S1NOPS @[8@^"S1PFS KY )@@G@@ @]4@@@S1PHD @[]@]VS1PHED @[8@^3S1PRFT @[(@@@S1PRSTKZ )@@G@@ @[(@@RS1PRTA @^X@ ES1PRTL @]1@@@S1QHED @[8@^6S1RCOPLA )@@G@@ @^<@H$S1RCPI @^<@H%S1RED @^X@#7S1REDC @^X@^WS1REDLLB )@@G@@ @^X@ [S1REEL @@/@@@S1RINT @]Q@@BS1SCAN @]'@[7S1SERRLC )@@G@@ @[\@@7S1SJAC @[5@B\S1SJAI @[5@B(S1SJAO @[5@B?S1SJICLD )@@G@@ @[L@^7S1SJIN @[L@],S1SJIO @[L@#?S1SJIT @[L@@@S1SJLDLE )@@G@@ @[L@[=S1SKIP @]'@[.S1SVOB @[2@#DS1TCHS @#D@@@S1TIMALF )@@G@@ @[U@[2S1TIMI @[U@[\S1TIMT @[U@[/S1TRAN @]:@@CS1TRRRLG )@@G@@ @]*@@1S1UIII @]W@@ES1UNIT @[)@[KS1USII @[<@@NS1USINLH )@@G@@ @[<@@IS1VFWA @]^@[VS1VFWC @]^@[YS1VFWT @]^@[-S1VFWZLI )@@G@@ @]^@[&S1VLSD @[X@[#S1WCOP @ N@ ,S1WHR @]'@[!TEMP$ LJ )@@G@@ @A/@C7TRNF @#3@@MTRNI @#3@@PUNIT$ @A/@CAURPRC2LK )@@G@@ @@G@@[URPRTM @@-@]SURRNID @@Y@@@URTIMF @[R@@CURWALKLL )@@G@@ @@$@ 2UWCLOB @@S@@[UWERR$ @@$@@Q@@@@@@@@@@@@@@@@@@@@@@@@LM )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@LASTD$ @@@D*FNTBSZ$ @@@@@>SLT$ LN )@@G@@@@@AK@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@LO )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@======@@^@@ @@@@@@@@@@@@LP )@@G@@@@ A%H@@@@@#@@]@@C@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@B5UA[G66 @@@^@@LQ )@@G@@@@@@OC@@@BC@@@@@@@@@@@@@@@@@@@@@@@@@@G-@@A@@G@ H@FB@@@@@#@@^@@@DMC@@@@@@LR )@@G@@@^@@@#@^@8@[@ @@@#K^@T@9@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@LS )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@LT )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@___)J*D_V@@@___@@@___@@@___@@@___@@@___@@@___LU )@@G@@@@@___@@@___@@@___@@@___@@@___@@@___@@@___@@@___@@@___@@@___@@@___@@@___LV )@@G@@@@@___@@@___@@@___@@@___@@@___@@@___@@@___@@@___@;5@C@@)^[^ ZB[=V)@K[#5LW )@@G@@)@M[=D)^YB#+@@@___@]UBC@@[CBE=@[VBG[@@"BJG@@EBLG@] BM1@]!BPO@@EBSG@@EBS'LX )@@G@@@]1BTM@@GBW:)@EBEU)@PBF?)[0BHW)[]BKE)[VBLQ)@YBO6)@FBS[)@=BSQ)@IBT^)@*BW#LY )@@G@@R#0@C"C[@@C./K@@C^9?0@C.AB:@@ 9*;@@@Q;0@C;A#;@@][@V@@# @F@@^;@@@@9@@C@R;@@@+:9@_8@MY )@@G@@R;@@@:/K@@G0RBD@@[T8@WWWO;@@@)/K@@G0C9@@@DC9K@@^[1U@@@/K@@F,RB%@@]O;)@@^MZ )@@G@@A#)BO4R;K@@-/,0@':/K@@HFRBG@@@A#@BO4/KEK@@C9@@M1(4E@@@/?K@;O&;)@@]&'0@@[NA )@@G@@R#'@@[C[@BEP&;@C[G&'KN@)/K@@H"C9@@M6/?K@;O0@J@@@/K@@HPR\Z@@@C[KBEQ:8K@@DNB )@@G@@G.K@@#QA_@@@N^Z@@[(@J@@]/K@@H%Q'Z@@]A]Y@@@O;)@@[&;K<[HQ;F@@@Q;V)@@9*I)@@NC )@@G@@&;KC[X/K@@H2&;KC[X0@J@@]/K@@H\O'0@@[/K@@H3Q;F@@@Q;V)@@9*I)@@9(I)@@8KK@H\ND )@@G@@(@J@@#/K@@H"Q'Z@@#A]Y@@@O;)@@[&;K<[HQ;F@@@Q;V)@@9*I)@@9(I)@@$B'@@]/K@@HRNE )@@G@@R#@BERA#I@@@O;)@@[C9@@JHR;0@I&(0E@@@/K@@IF0K@BES/K@@IFR;0@I$C9@@JIAB0@I>NF )@@G@@[ @@JGRBU@@#/KEK@@?[@@@L/KF@@@/KF@@[![@@@L/KF@@@/KF@@[(4E@@@/KF@@@AA'@@@NG )@@G@@R'0@@@ABE@@#/K@@I-(4E@@@/KF@@@AA'@@@R'0@@[ABE@@#/\@@I(R#'@@[R;@)@[(0E@@@NH )@@G@@/K@@I$/K@@I&'=@@[\RFE@@]/K@@J R#'@@[C[@BET/K@@I8R#%@@#OB\@@@E^Z@@[0@J@@#NI )@@G@@O;K@@[0@J@@]/K@@I5O;)@@[/K@@I7-[I@@@[[Y)@@8#K@I5$B'@@]/K@@I?/KG@@@RFZ@@[NJ )@@G@@R2Z@@@R#%@@#OB\@@@N^Z@@[/KH@@@C9@@@[;[D@@[-[I@@@[[Y@@@$B'@@]/K@@I;/KF@JCNK )@@G@@/\@@I(R;@@@[(0E@@@/K@@JI/K@@JH'=@@[\/KEK@@')D@K(%8K@@-/K@@J C[J@@]-[I@@@NL )@@G@@/K@@JQD[Y@@@[[Y)@@8KK@JPC[J@@#/K@@J#C9@@@[;[D@@[+[I@@@')F@JZ/K@@JM/[K@J#NM )@@G@@/ K@J#CDX@@@C X@@@K4I@@@')F@J-[5Y@@@K0I@@@')F@J-[1Y@@@K?I@@@')F@J-[!Y@@@NN )@@G@@K*I@@@')F@J-[(Y@@@K=I@@@')F@J-[>Y@@@K)I@@@')F@J-[-Y)@@8KK@JY@@@K*I@@@')F@J-[(Y@@@K?I@@@')F@J-[!Y@@@K0I@@@')F@J-[1Y@@@K4I@@@NP )@@G@@')F@J-[5Y@@@/K@@J K0I@@@')F@J-[1Y@@@/K@@J K0I@@@')F@J-[1Y@@@K?I@@@')F@J-NQ )@@G@@[!Y@@@/K@@J K0I@@@')F@J-[1Y@@@K?I@@@')F@J-[!Y@@@K*I@@@')F@J-[(Y@@@/K@@J NR )@@G@@K0I@@@')F@J-[1Y@@@K?I@@@')F@J-[!Y@@@K*I@@@')F@J-[(Y@@@K=I@@@')F@J-[>Y@@@NS )@@G@@/K@@J R7Y@@@R3Y@@@R\Y@@@R:Y@@@R$Y@@@RY@@@NT )@@G@@[-Y@@@O#)@[[0@J@@#O;)@@[')D@K(')F@K/')D@K\/K@@LECDXBCPC XBCP')D@LP')F@LZNU )@@G@@')D@LUR6Z@@@O#)@[[0@J@@#O;)@@[')D@LL!8K@["/K@@J ')F@LJ')D@LU>9K@^@/K@@J NV )@@G@@R#%@@#OB\@@@/K@@JMCXXBCPCTXBCPRZY@@@RNY@@@RVY@@@RRY@@@CXI@@@CLI@@@CTI@@@NW )@@G@@CPI@@@CXI@@[[XY@@@[LY@@@[TY@@@[PY@@@[XY@@[)9@@^@-9@@^@')D@LQ')F@LZ')D@LVNX )@@G@@')D@LL%8K@@!/K@@J /K@@JMRFE@@^/KD@L%KWI@@@')F@J-?^U@@^[XY@@@KKI@@@')F@J-NY )@@G@@?^U@@^[LY@@@KSI@@@')F@J-?^U@@^[TY@@@KOI@@@')F@J-?^U@@^[PY@@@O;)@@[8KK@L%NZ )@@G@@R7Z@@@/KH@L.KSI@@@')F@J-?^U@@^[TY@@@KKI@@@')F@J-?^U@@^[LY@@@KWI@@@')F@J-OA )@@G@@?^U@@^[XY@@@RFE@@]/K@@J KKI@@@')F@J-?^U@@^[LY@@@/K@@MEKKI@@@')F@J-?^U@@^OB )@@G@@[LY@@@KSI@@@')F@J-?^U@@^[TY@@@/K@@ME/K@@MU*@@BW)/K@@M:C[@BW-(@@@@KC9@@Q5OC )@@G@@[ @@RZC[@BW#[ @@N'[D@BE*9?@BE:R#)BE,9!@BE?[[@@Q"[[K@SH9!@@N9/K@@M19?@BE\OD )@@G@@R#)BE59!@BE3[[@@Q"[[K@SH9!@BE1A#@@N>A#K@N4A#)BE)[[@@N8[[K@RQC9@@@@R;K@@0OE )@@G@@/,0@':/K@@M"&;0@@@C1G@@@%80BE8C(G@@@[1J@@] @J@@B/,0@N]/K@KMUCDJ@@D[ J@@KOF )@@G@@CDJ@@J[ J@@J @J@@F @J@@IR#J@@A'^@[O9/KF@@@/K@@NFRFJ@@EAF@BF)R7J@@#A3@BE%OG )@@G@@RFJ@@CA#@BEYK@@BE)ABKBE=K^J@@DABKBEZOBZ@@DAFKBEZR;K@@#AFW@@[ C@BEWR3J@@]OH )@@G@@AB@@OH9?J@@IA#@BE>ABKBE&/K@KNF/K@@N-C[J@@FG9@@@[[[J@@FC[@BE*;D@@@MN@K@@KOI )@@G@@KD@BE)R#KBEYGDX@@[! Z@@D: Z@@D/K@@N2/,0@N;C[@@[[KD@BE)G9K@@#[DX@@[R#)BE=OJ )@@G@@/S@@@@&;@@@[M#?)@@A#)BE=/K@KN-/K@KN-&;@@@@AB0@S!CD@BEWG9@@@[[D@BEW9?KBEYOK )@@G@@[DH@@]CDX@@[;^K@@M;@K@@M9*KBEY%9@@@[/K@@OGR#)BE&C[@BE>[[I)@@A#)BE&/K@@O!OL )@@G@@[ Y@@[*8@@@@/K@@OM/\0@O6RB)BEZ[[I@@@0@@BF<'=@@@A*4@BF9*)BF=R;)BF)R30BE%%80@@]/K@@O>RF0BF=G80@[\;G0@@=W80@[0T80@[0ON )@@G@@AF0BF=R30BE%A\0BE%/\0@O.[[@BE>A#@BE-R;@BF)'=@@@[R#@BE-K@KBE)AB)BE=/KF@@@OO )@@G@@CDY@@]%9K@@[/K@@OSR#0@S!&B\@@D/K@@OT @@@@K&;)@@[CDY@@[H9K@@]G[I)@[8^K@O'OP )@@G@@/KJ@@@CDI@@^C!KBE%/[K@PE%9K@@]/K@@PBG9@@[\;H@@@=W9@@[0;(@@@]/K@@PEG9@@@VOQ )@@G@@;H@@@=W9@@@WG[I@@ /KJ@@@/K@@PGC J@@KH9@@@[/H@@S\[ J@@K/,0@N; CH@@[/,0@N/OR )@@G@@C9@@@#[DH@@[ C@BEW0@@BF<'=@@@A*4@BF[[J@@I[ Z@@J/K@[P(/K@@P%AB0@R-OT )@@G@@(@J@@F/K@@S&C5J@@]:9@@@#/K@@PWRB_@@@'^@[PSRB0@R-C J@@@[ @@Q5C J@@E[ @BE$OU )@@G@@[[@BEXC1J@@][ @@R;CDJ@@E[D@BFUR7J@@#A7@BE%C J@@D[ @@Q&A@KBE+A@)BEG'^@@=[R#KBHI/,0@$-RV )@@G@@R#KBHIR;)@@[%@!@@0/K@@>G(@@BHK/K@@:XR;KBK^(^H@@0/K@@:X'^@@=;R;KBK^/K@@>XRW )@@G@@'^@@V ^@BJSR;0@@@AB0@&?R;0@-IAB0@-HR;@@@@RX )@@G@@RBKBO4R'0BIO/\)@C#RB@@>#RBKBO4R'0BHW/\)@C#/K@K=;'^@@=;R;KBK^:@KBHI/K@@>ORY )@@G@@*CH@@0/K@@>=*^H@@0'^@@>?O;K@@[!@KBJG:@KBJG/K@@>IR#KBHI(^@BJS/K@@>*:8K@@@RZ )@@G@@/K@@>+'^@@>?RBK@>VRF!@@@A#KBHIA#)BJIR;K@@@/K@@>!R#!@@0P#)BHPA#!@@0/K@@>OSA )@@G@@R#!@@0O#)BHPA#!@@0/K@@>H/S@@@@ABK@>;(^@BJS/K@@>"'^@@&1/,0@&V/S@@@@R#KBHMSB )@@G@@R'0BIO/\)@COR#KBHMR'0BHWRBH@@SO;@@@@/\)@COR;K@@@(@@@@H/K@@& A#KBHM'^@@&(SC )@@G@@RBK@&?OFKBJSABK@&?R#KBHM/K@K>?R;)@-CA#)@&C/K@@&L/S@@@@AB0@&?D8@@@@A#H@@SSD )@@G@@*4J@@[/K@K&C'^@@&1/,0@&V/K@@&TR'0BIO/\)@CS*@@@@G'^@@&(R#0BHMR#J@@SOB@@>9SE )@@G@@/K@K&CR#KBHM/K@@&OR#KBHMA#!@@SR#@@@J*4I@@[/K@@&Z/K@@&)P#@BHLO;@@@[/KF@@[SF )@@G@@PFG@@@L8@@@[1@H@@@/KF@@[/KF@@@/S@@@@RF!@@@AF)BJOR;0@@@AB0BJSR;@BJO'=@@@[SG )@@G@@/K@K&(/S@@@@0@@BJR'=@@@ARBKBJRR7)BJR/@)@&"%8)@@^/K@@:,R\)BJR/@)@&"%8)@@ SH )@@G@@/K@@:,P;K@@[RB)BJS:CY@@@/K@@$ !CY@@@%8K@[&/K@@:*RFY@@@(8@@@@/K@@$EK@)@@HSI )@@G@@P;0@@]/K@@$MP;K@@^K8)@@[O#0BHP @@@@KG[J)@[8#K@$I%[J@@[/K@@:%C @RHMG9@@@[SJ )@@G@@% I@@@/K@@:;[ @RHM/K@K&1/S@@@@R;KBK^ABK@$W/,0@$-R;K@@@:@KBJG/K@K$SO;K@@[SK )@@G@@/K@@$UR;0@@)RF!@@@0@@BJW'=@@@AAF)BJT ^H@@@A30BJWR;@BJT'=@@@[/KF@@@/S@@@@SL )@@G@@RBKBJHO;K@@]%^KBHG'^I@@@'^@@=[R#@BW+R;0@@@/K@K$:/S@@@@R;)@*J'^@@$:?4J@@[SM )@@G@@/K@[P(R#J@@A'^@[O9'^@@$S/,0@$/R#KBJGA#KBHIA#KBHJRF!@@@A#)BJIR;)@=+AB)@-FSN )@@G@@R;KBK /K@@=!/S@@@@R;)@*\'^@@$:!4J@@[:4J@@[/K@[P(RB)@>#AB\@@K/K@@:X/S@@@@SO )@@G@@'^@@=E(C@BHU/K@@*VRF)BHUR;KBK^%^KBHUAF!@@0O;K@@[%@KBJG/K@@*P C@BHUR#KBHISP )@@G@@R#.@@0P#0BHPO;0@@[A#.@@0K8K@@[:@)BJGR;)BK^%^)BHU/K@@*:(CH@@0/K@@*(O;)@@[SQ )@@G@@/K@@*-A#KBHUAF0BHUA#)BHICDI@@@[[@BJI/K@K*J/S@@@@R#J@@A'^@[O9'^@@=E'^@@=[SR )@@G@@R#KBHIR;)@@[A#!@@0K8K@@[A#)BHIRF,@@@A#)BJI/,0@$-R;0BG%RBZ@@KP;K@@[ABZ@@KSS )@@G@@(@@@@H/K@@*G/K@K*\/S@@@@'^@@(8/K@K(#/S@@@@/,0@:J0@@BHO/K@K(AR;KBK K8K@@[ST )@@G@@:@)BJGR;)BK^O#)BHPA#)BHU/,0@:O/K@K(A/S@@@@'^@@(8R;0BG%RF\@@D:8)@@] @@BHKSU )@@G@@*@@BHKP;)@@[AB)@>#AB\@@K/K@K(M/S@@@@/,0@:J0@@BHO/K@K(XR;KBK^*@@BHKO;K@@[SV )@@G@@/,0@:O/K@K(X/S@@@@ @@BHKR;K@@E/,0@':/K@@(?A#KBHKRF\@@DP;)@@[AB)@>#R;KBK#SW )@@G@@C9K$C [DX@@[ @H@@1O;K@@[G9K@[@8#)@(1A#KBJG/K@K(&/S@@@@'^@@%CAB0@$2C Z@@DSX )@@G@@[DKBJS[ K@<;C Z@@C[ K@=_C9K@=R[ K@&Z'^@@(&R#J@@A'^@[O9'^@@$S @@BHO/K@K(8SY )@@G@@/S@@@@R;K@C9K@-O[ K@-PC[Z@@E[[KBHNSZ )@@G@@R'0@-QR;@@=LR;K@@#R;)@&=C9@@:[C9K@%//K@@%$C[KBW#[[KBHLC9K@-O*@@BW-C9K@)?TA )@@G@@[ K@-PR'0@)+R;@@=PR;K@@]R;)@&-C9@@%8C9K@%4AB@@=KABK@>9AB)@&)[ @@:X[ K@$/TB )@@G@@AA_@@# ^@@$ R;K@@0/,0@':/K@@%3*?G@@@ABK@$ /K@K%CC9K@)8C[@BHT[[@@)&/K@@%_TC )@@G@@C[@@GR;) A0/K@@:2R;) A1C[@BJ1R#0BJ1/K@@:5TG )@@G@@R;) A2/K@@:\R;) A3/K@@:\R;) A4/K@@:5R;) A5C9@@@@/K@@:.R;) A6C5@BJMRF0BJJTH )@@G@@'^@@?>AB)BJ6A#0BJ2[[@BJ3R;@BJ+'=@@@C'=@@@)H I@@@R;) A7[[@BJ0RF0BJOAF0BJXTI )@@G@@C5@BJR'^@@?>E@KBJ0!8K@@A/K@@:?[[@BJ(A#0BJ*AB)BJ?R;@BJ>'=@@@CRFKBJ\%8KGO TJ )@@G@@'=@@@)R;K@&2ABK@&(R#KBJ0P;K@@[(@@@@H/K@@&,#@KBJ-R;)@@(1@@@@HR;)@@*A3)BJ)TK )@@G@@R;@BJX'=@@@#(4@BJ)/K@@?)R;)@A8C5@BJ)RF0BJX/K@@:4R#KBJ-P;K@@[/@K@&,A#KBJ-TL )@@G@@/K@@?T/S@@@@C9K ;(K@@M;H@@@#'L@BO!;(@@@#;!@@@#G9@@@0;!@@@G[[@BJ(AF0BJ7TM )@@G@@R;@BJ7'=@@[/S@@@@C9@@@@R;K@@?/,0@':/K@@!AC W@@@[ K@\*/K@@!S ^@@\*R;KBLITO )@@G@@O#KBHPR;)@[+ @H)@@8#)@!ER;K@@E/,0@':/K@@!SC[W@@@;(K@@A[DKBLIC9@$C R;K@@HTP )@@G@@/,0@':/K@@!S9?WK@@/,0@1G[D@BK^'^@@%C ^@BK^R;K@@*/,0@':/K@@!?C[G@@@+[@BO,TQ )@@G@@H9K@@[R;K@@%/,0@':/K@@!-C G@@@H9@@@[R;K@@(/,0@':/K@@0IR;0@7?R#)BO,/K@@0+TR )@@G@@R;K@@:/,0@':/K@@\*RB?@@@C[Y@@[H9K@@[[[KBM]AB)@!'R;K@@U/,0@':/K@@!9'^@@1NTS )@@G@@/K@@!''^@@')R#K@!'A#KBMTRBKBJHABK@&?R;KBK^A#KBHM'^@@2)RFY@@ ABK@<;R#KBHMTT )@@G@@'^@@3PR#KBM_A#KBNPR;@BN.'=@@@CR;K@@X/,0@':/K@@\^RBKBJH(@H@@A/K@@,MR\!@@]TU )@@G@@%8)@@A/K@@,OR;)@E3/K@@:>C H@@[H9@@@[*@@@@K/K@@,8R#!@@AA#!@@]C H@@ RF!@@#TV )@@G@@;C)@@AP;)@@[A3!@@#;C)@@AA7!@@#C[X@@#;(K@@S;LK@@SH9K@@[RF.@@^;C0@@AP3.@@[TW )@@G@@1@@@@J/K@@,2C[X@@#;(K@@G;DK@@SO\.@@^R\!@@^A:!@@#;C)@@AA\!@@#[-X@@#;DK@@ATX )@@G@@[>X@@#A3.@@^;C0@@AA7.@@^H9@@@[[ H@@[ @H@@AR#!@@BA#!@@C @H@@BRB!@@^AB)@'[TY )@@G@@/\0@'SR;K@9_ABK@[DG@@@R;)BLGTZ )@@G@@/\0@<^AB@@8W'^@@8QRFKBLIP;K@@[ABK@7 R3KBLH%^K@>#/K@@'>(@@BLO/K@@2FR\KBLOUA )@@G@@O;KBK^ABK@'FRBKBLOABK@'GRFKBLO;CK@@AABK@'JRBK@-OABK@'MR;K@'CABK@-OR;K@)4UB )@@G@@*@@BW)R;K@'PABK@'H/K@@2F(8@@\*/K@@\;RB@@\*R;)BLGC9@@[>/\0@<^R;KBLG/\0@'SUC )@@G@@R;K@@V/,0@':/K@@\5'^@@1N/K@@\6'^@@')R#KBLI%@KBNW/K@@'$/,0K:X/K@@\MR;K@@GUD )@@G@@/,0@':/K@@0G'^@@1NR;K@@V/,0@':/K@@0AR#KBNWA#KBLI/,0K:X/K@@2FR#KBO\O#KBLIUE )@@G@@A#KBLI/,0@9I'^@@8Q/K@@2FC9K@@@C9@@@@R;0@5DR;K@@T/,0@':/K@@0N/\)@01AB0@4"UF )@@G@@R;0@46R;K@@D/,0@':/K@@0VR#KBH[T^W@@@A#KBH[R;K@@C/,0@':/K@@!%R#G@@@+@@BO,UG )@@G@@T@KBHL+@KBO,A#)BH[AB0@4\[ @@3"[[KBLK/\)@04R;0BG;R#@BH['^@[O9R;K@@AAFKBLGUH )@@G@@R;K@@AA\KBLIR#K@9*KBN9;[@@@A[>@BN8;-@@@AUK )@@G@@R#@BO0'=@@@J/KF@@@/S@@@@C9@$D R;0BK R;K@@G/,0@':/K@@1QR#)BJ1AB@@1ZR#WK@@UL )@@G@@A#Z@]P[DJ@@@/,0@1GR;@@1ZR;K@@G/,0@'(/K@@1&G9@@@[O;0@[@/K@@1UAB0BJGP;0BK^UM )@@G@@AB0@>#A30BLH'^@@12/\)@01/\0@1/'^@@4B/,0K$/C9K@48[ K@-F/K@K1N/S@@@@R;KBG;UN )@@G@@ABK@$2R;K@[>AFKBLGR;K@3=ABK@&ZR#KBO1A#K@8./K@K12RFKBH#R;@@@@RB)@>#O;)@@#UO )@@G@@W@@@@IAB@BH^AF@BJSP;)@@]T@@@@IOB@BH#AF@BH#RB@BH#AB@@=_/\)@04/KJ@@@'^@@=;UP )@@G@@ 4@BJRR;KBK RB)@>#P;)@@[0@@@@I/K@@>+ ^H@@@(@H@]P/K@@2YA#KBHMAB)@2X'^@@2)UQ )@@G@@RBKBHMR;)@@@AB)BHM'^@@>?ABK@2TR;)@@@O;K@@[/K@@2J/S@@@@RF.@@@'^@@?>A#0BM_UR )@@G@@RBKBHMR#H@["O;@@@[A#H@["R#!@]PA#)BN^/,0BGG[ KBN]0@@BJR'=@@@A9?KBJR9*KBN;US )@@G@@RFKBJOABK@3DR;@BO@'=@@@CRBKBHM'^@@&(0@@BJR'=@@@ARB)BJSR#Y@@]A#KBNFRBI@@[UT )@@G@@/,0BGG[ KBNDR#KBN^%@KBNF/K@@3IRBKBN]%^KBND/K@@3I'^@@&1RF0BLLRB)BJS?C"@@ UU )@@G@@/K@@9GR;K@@@AFKBJO9?@BN;9*@BJR/K@K2)R#KBM_A#KBN R#KBHM'^@@8\R;@BO#'=@@@CUV )@@G@@/K@@22/S@@@@C[H@]P[[@BNLR#H@["/,0BGG[ KBNJR#KBHM'^@@8\RF0BJT'^@@?>A#0BNGUW )@@G@@R;@BOA'=@@@CR#KBHM/K@K3PAA0@=ZAB@@33C H@@@[DH@@0'^@@3PRB!@@SC9@@@8:5I@@[UX )@@G@@/K@@=Z CI@@[R;@BJT'=@@[XRBKBHM'^@@2)RA0@=ZR;@@@@/K@@&)/S@@@@'^@@4BR#)BWQUY )@@G@@:@)BLK/K@K35R#0BLKO;0@@[A#0BLJA#)BLKR;@@@@O;@@@[AB@@3"O;@@J*/,0BGG[ KBLIUZ )@@G@@/,0@9I'^@@8Q/K@K35/S@@@@RF)BLLAB)@<;RFKBH#OF)BH#/\@@<9 4@BJM ^@BLHR;KBK^VA )@@G@@A#KBHIRFX@@@A#KBJIR;K@8@ABK@=DR#KBW#ABK@->/K@K4B/S@@@@RBKBJHO;K@@]:^KBHGVB )@@G@@/K@@4?'^@@=E'^@@83R#@BLJ/,0BGG[ @BM5[[KBM6R#@BWQA#@BLK/,0BGG[ @BM7[[KBM8VC )@@G@@RB@BLIAB@BM2R;@BOD'=@@@CR;0BG;R7J@@[?@@BW+/K@@4\R#@BH['^@[O9R;0BG;R#KBHLVD )@@G@@ABK@->/K@[P(C9K@@A/K@@4;'^@@=E'^@@83C9K@@B[-KBNVR;@BOG'=@@@C/K@@4"/S@@@@VE )@@G@@R;0BG;'^@@(&'^@@12C9K@7-[ K@4"/,0K$/R;K@7*ABK@-F/K@K4_'^@@4_ @@BLM9?@BH#VF )@@G@@AB@@=_AFKBJSR;@BOJ'=@@@CRFKBLIAFKBN5 ^@@5& ^@@51RFKBK^AFKBN4RBK@3"A#KBLJVG )@@G@@ABK@6QC @@>#[1@BLHL9@@@[T @@>#!@K@@K/K@@5WP#K@@KD8@@@@W@@@@LOBK@>#ABK@6)VH )@@G@@ABK@6B ^@@6]R;@@@@O;@@@[AB@@5&/,0BGG[>KBN+;[K@@A[ KBN+R;@BOM'=@@@CR;@BOPVI )@@G@@'=@@@C*8@@51/K@@5'RFKBN5AFKBN2O;K@@[AFKBN5RBK@6QABK@5. ^@@6QRB@@51O;@@@[VJ )@@G@@AB@@51:8@@5. ^@@51O;@@J*/,0BGG[ KBN2R;@@6]RFWBK AFKBN1O;@@@[AB@@6]:8@@6BVK )@@G@@/K@@6GR;@BOS'=@@@C/K@@51(^@@51*^@@6Q/K@@6QR#KBNWA#KBN5R;K AFKBN4R;@BOVVL )@@G@@'=@@@C/K@@6)R;@@6QO;@@@[AB@@6QO;@@J*/,0BGG[ KBN5R;@BOY'=@@@CRBK@>#/K@@5=VM )@@G@@C9K@@@ @@BLK ^@BLHR;)BK [ K@7C @I@["RF@BLK;C@@@A*@@@@G/K@@67RFKBLIABK@7 VN )@@G@@O;K@@[AFKBLIR#KBLJ;*K@@G;CK@@SA\KBLKRBKBLJ;*K@@GABKBLJ;CK@@MA\KBLJRF@BLKVO )@@G@@O;@@[@AF@BLK;C@@@AR#KBLJ;*K@@G;CK@@S%@@@@H/K@@7] 0@BLK 4@BLKO;@@J*/,0BGGVP )@@G@@[ Y@]PR;0@7 AF"@]PO;)@@[C9K@7CH9K@@[*@@@@L/K@@6=RF@BLJO;@@[@AF@BLJ;C@@@AVQ )@@G@@/,0BGG;-K@@A[[KBN+RF@BLK;C@@@A*@@@@G/K@@7VRB@BLJ;*@@@S(@@@@G/K@@4'RB@BLJVR )@@G@@O;@@@[AB@BLJO;@@J*/,0BGG[ KBLIR;@BO-'=@@@CRB@BLJ;*@@@S(@@@@G/K@@0]/K@@0DVS )@@G@@'^@@=E'^@@83C K@>#/K@@6+C9K@@A/K@@7/R;KBK^O;K@@[A#KBHM*^H@@@'^@@3P?@KBJGVT )@@G@@/K@@7\'^@@83RBKBLK:^K@'[/K@@7;R;)@E2/K@@:>C9K@@B[>KBNTR;@BO='=@@@C/K@[R3VU )@@G@@RFKBHG*4H@@[/K@K=[RBKBJH*4H@@[/K@@A#0BM9R#KBLIA#KBM"RB@BLH/,0BGG[ KBM/R;@BO$'=@@@C/K@K8Q/S@@@@VY )@@G@@R;0@@-/,0@$+/K@K8\/S@@@@C KBK^[-KBLK;DK@@A[>KBLKC KBLH[ KBLLR#KBLIA#KBLMVZ )@@G@@/,0@9I/S@@@@'^@@=[R#KBHI'^@@8\R#KBM9A#KBNGR#KBM/A#KBNJR#KBM"A#KBNLR;@BO%WA )@@G@@'=@@@CR;@BJT'=@@[X/K@K83R;)@E1/K@@:>RB)BJHCD@BLGR;@BLG/\0@<^AB)@8W/KF@@@WB )@@G@@/S@@@@R#0BLOA#0BLNR#0BHMA#0BLO(@@@@J/K@@9&L80BK^[!@BLOC Z@@@?9K@@]CDZ@@0WC )@@G@@[ KBLORB@@8NPBJ@@SA3@BLO;C@@@AA7@BLOR;@BK RBKBJHC[@BLNC[KBLO[[H@@B[[X@@CWD )@@G@@C[G@]PC[W@["(@@@@K/K@@98RB/@@@!80@@]/K@@95*@@@@JH9K@@[H9K@@[(@G@@SC9@@@@WE )@@G@@[[H@[I[[X@@7:@@BJG/K@K9OO;@@@[O;K@@[/K@@9?0@H@@[/K@@' %9@@@@/K@@R;)@E5WI )@@G@@/K@@:>R#@BO2/K@@'?R#@BO3A%9K@@ /KF@@@(^G@@#/KF@@@C[W@@A[ W@@^;[K@@M[[W@@A[ W@@D'=@@@[R#W@@DWT )@@G@@/K@@;?R#W@@AABW@@^ABW@@D;@K@@M'=@@@#C[W@@ GDW@@B[[W@@ C5W@@#/[K@/;%9K@@ WU )@@G@@/KF@@@(^G@@#/KF@@@ABW@@^;@K@@MA#W@@A'=@@@[/KF@@[0@G@@#'=@@@AC[W@@ GDW@@BWV )@@G@@[[W@@ /KF@@@/,0@DK@@@BRM@@@BQ#@[^BRUC@@BRN[@@BQ^C/)@@[H@)BQ#(@@@@I/K@@"RWW )@@G@@C/)@@[D[@@@@*@@@@K0@@@@K @@@@IC.@@@[D[)@@@*@@@@M0@@@@M @@@@K)@)@@K/=0@":WX )@@G@@C@)@@@G@)@@@G/)_""/G)@.+*@@@@I/K@@":/,0[+:@@@BQ[@@@BQ @[GBRUC/@@@@'^K[/;WY )@@G@@C/@@@@'^K[/;'^@[/_/,0@DF@@@BRM@@@BQ[@[LBRUN@0@.1/K@@_P@[MBRU/,0@DK@@@BROWZ )@@G@@@@@BQ#@[PBRUC@@BRP[@@BQ^C/)@@[H@)BQ#(@@@@I/K@@"RC/)@@[C.@@[]H[@@@@*@@@@KXA )@@G@@1@@@@K @@@@IC.@@@[D[)@@@/D)@"B*@@@@M @@@@K)@)@@K/=0@":/,0[+:@@@BQ[@@@BQEXB )@@G@@@[VBRUC/@@@@'^K[/;'^@[/_/,0@DF@@@BRO@@@BQ[@[ZBRUN@0@"Q/K@@_P@[)BRU/,0[+1XC )@@G@@@@[BQ/@[-BRU'^@[/_/,0[+1@@[BQL@[XR )@@G@@;G@@@AA#@BU1;CK@@YR#)BU0)@)BSGO#)BU5A#)BU0;?)@@0)@)BTMR#)BTQ9*%BS'O])BU6XS )@@G@@RBXBU9'^H@@@/K@[[E/K@@@@'^@[[K8K@@#ZH )@@G@@R#K@@JO;0@@#?9@@@X/K@[DUO;0@[!/K@[DW!9@@@SO;0@@TC9@@@@W[@@@JT[@@@HR;0@[0ZI )@@G@@T@0@@GO#0@@IP#0@@LH[@@@J0@@@@K/KF@@@/KF@@[ @@BWYR;K@@S/,0@':/K@[D?AFKBWYZJ )@@G@@R;K@@T/,0@':/K@[D2*C@BWY/K@[S?AFKBWYR;K@@U/,0@':/K@[D8*C@BWY/K@[S?AFKBWYZK )@@G@@R;K@@V/,0@':/K@[D"*C@BWY/K@[S?AFKBWYR;K@@W/,0@':/K@[E]ABKBWYR;K@@X/,0@':ZL )@@G@@/K@[EC*^@BWY/K@[S?ABKBWYR;K@@Y/,0@':/K@[EI*^@BWY/K@[S?ABKBWYR;K@@Z/,0@':ZM )@@G@@/K@[EO*^@BWY/K@[S?ABKBWYR;K@@$/,0@':/K@[EU*^@BWY/K@[S?ABKBWYRB0BWYCD@BWYZN )@@G@@C5KBXE:80@@W/K@[E3:80@@Y/K@[E3:80@@X/K@[E,:80@@Z/K@[E,%80@@$/K@[E/:9@@@VZO )@@G@@/K@[F[%9@@@S/K@[S??9K@@#/K@[S?/K@[F[:9@@@S/K@[E::9@@@U/K@[F[/K@[S?:9@@@SZP )@@G@@/K@[E9%9@@@T/K@[S?/[K[S?/K@[FY?9K@@#/K@[S?/K@[FY*@@@@K:9@@@S/K@[FY:9@@@TZQ )@@G@@/K@[E7R#0BW\[DZ@@DR#KBW0ABZ@@@RBKBW^PBKBWFABZ@@CP#KBW#ABZ@@ERBKBWFAFZ@@CZR )@@G@@R;)@@ZA#)BW+'^JK@[/K@[FJRA0BXUS8)@@SRBFBXDS8@@@#O#0@@HRBFBXDS?FBXDS8K[F@ZS )@@G@@R;K@@@W@K@@JS8K@@DW8K@@ES@K@@L/K@[FJC5KBXEG1KBXE C@BWH/[K[G6*@@BW)/K@[F?ZT )@@G@@R;K@#C;GK@@=W@KBW#*@@@@IO;K@@[T@KBW#O;K@@^/K@[F0R#KBW#O;K@@A?8K@#CR;K@#CZU )@@G@@ABK[F5G9K@@]RB@BWF;G@@@=W@@@@L!8@@@@/K@[G#RB@BWF;G@@@=W^@[F5P;@@@]?4@BXEZV )@@G@@/K@[G@P7@BXEA3@BXE/K@[G]A7@BXE 0@BXERB@[F5R#KBW#O;K@@A?8K@J*/K@[GDR#@@@HZW )@@G@@/K@[GF!8@@J*R;@@J**@@BW)/K@[GMP;@@@^;G@@@=W@@BW#T@@BW#O;@@@^AF@BWHR#)@@GZX )@@G@@C[K@@GH9K@@^*@@BW)H9K@@]'^@[FJA#)BWIC[@BXB/ @[GZC[@BX#(@@@@KC @BWFC5KBXEZY )@@G@@G1KBXE[ KBWD?9K@@]/K@[G6%9K@@]/K@[G\RF0BWY:80@@T/K@[G6R#)BWIO#)BWI![@@@IZZ )@@G@@/K@[G6RFKBW,/K@[G"H9K@@[?[@BWI/K@[G8R#)BWIT@)@@L?[@@@I/K@[G! @@BW!/K@[HIAA )@@G@@R#)@@KT@)@@L!@)BWI/K@[G!R#)BWIRBKBW,A#KBW!A#)BWT(0@BXE/K@[HI @@@@I9?"RX)AB )@@G@@9*0BXXRB0BXEAB0BXWO;0@[@AB0BXER;@BXV'=@@@JO;)@@[%0)BXE/K@[H# C@BWD C@BWMAC )@@G@@RB0BWFPF0BWHPF0BWHC[KBXB/[K[H!;DK@@[?[KBX#[[KBX#R#)BX#RF@BW T8@@@#?@)@@GAD )@@G@@/K@[IW9!@BXA/,0[C*/K@[I)AF@BWDAF)BWJ[[@BWC9?@BXC9*@BXXR;K$B,ABKBXWR;@BXVAE )@@G@@'=@@@JRB0BWFT8)@@#P#0@@IPF0BWDAB0[II9!@BX]/[K[I+RB)BWFS@)BX[W8)@@FRB0[IIAF )@@G@@/,0[C*/K@[IU:C@BWM/K@[INAF@BWMAB)BWJ[[@BWLRB0BWFT8)@@#P#0@@IPF0BWDP#0@@GAG )@@G@@AF0BWKC@)BW#*@@BW)C@)BW)S@0@@IG8)@@[*@@BW)G8)@@[W@0@@IS@0BX[W80@@ET@0@@GAH )@@G@@!@0BWL/K@[INR;0@@@9!@BX]/,0[C:/K@[IL/K@[H69?@BX^9*@BXXR;K$A,ABKBXWR;@BXVAI )@@G@@'=@@@J/K@[I<(@@BXB/K@[I+9!@BXA9(@BX]9!@BXC9(@BX^ @@BXB/K@[H!AF0BWKC9K@@[AJ )@@G@@[[KBYMR#0BW:[5Z@@[R;@@@[A7J@@]RB@BW^PB@BWFRFKBWKABZ@@DK@K@@GP#@BW#A#@BW=AK )@@G@@R;@@@@C[@BW#G9@@@[W@@@@KS@@BW#A#Z@@AC9@@@](C@BWM/K@[JRRB@BE9(@@@@G/K@[S#AL )@@G@@R#@BW?ABJ@@@A#0@@HA#@@@JAFZ@@@G9K@@[[5Z@@[[5J@@]AF\@@CRB@BWJABJ@@DRF@BWMAM )@@G@@AFJ@@DR#@BWLA#J@@ARB@BW^PF@BWDPF@BWMAFJ@@J @@@@IR#KBX]!8K@@SR;)@@[!8K@@XAN )@@G@@R;)@@]A7\@@#G9@@@[(C@BWD/K@[J8RB@BFE(@@@@G/K@[S#R;@BFDABJ@@@A#0@@HR#0@@GAO )@@G@@AFZ@@@G9K@@[[5Z@@[[5J@@]RB@BW^PF@BWDAFJ@@JRFKBWJABZ@@DT8K@@#P#@@@HAFJ@@CAP )@@G@@R#KBWCA#Z@@ARFKBWDAFZ@@D @@@@IR#KBXA!8K@@SR;)@@[!8K@@XR;)@@]A7\@@#C9@@@#AQ )@@G@@R#@BW!(@@@@G/K@[KKR#@BW!ABJ@@@A#0@@HA#@@@JRBJ@@[(@@@@G/K@[S#AFZ@@@G9K@@[AR )@@G@@[5Z@@[[5J@@]RB)BW^PF)BWHPF)BWHAF\@@CRF@BWHABJ@@DRB@BWDAFJ@@DR#@BWIA#J@@AAS )@@G@@RF@BWYR7)BXE:8@@@T/K@[KR!8)@@#%8@@@S/K@[LDR#@BW\ABJ@@@A#0@@HA#@@@JAFZ@@@AT )@@G@@RBJ@@[(@@@@G/K@[S#RFKBWY%8K@@S/K@[K>AF\@@DR#@BW0ABJ@@@G9K@@[[5KBWO[5Z@@[AU )@@G@@R;@@@#A7J@@]R;K@@F/,0@':/K@[L@RB?@@@!C)BWH/K@[L@(@@BW)/K@[K5L8)@@AA#0@@LAV )@@G@@/K@[K;P;)@@^R;K@@@W@KBW#S@KBW#A#)@@LO;)@@^AB)BWH'^@[FJR#0BW\RBKBWH/K@[L]AW )@@G@@RFKBWHR#)BWIABZ@@DA#)BWNRB)BW^PB\@@DPB\@@DAF\@@C/K@[LH[5KBWOR#@BW0ABJ@@@AX )@@G@@AF/@@@R#KBY%A#KBWSAB0BWU @@BWRAB0BWOC[KBY%[[Z@@G @J@@H 0J@@[R#@BW=ABJ@@EAY )@@G@@O#@BW#ABJ@@C'^JK@[RB0BWOR7J@@[RF_@@@%8@@@[/K@[LLR#K[OH(^@BWY/K@[L;R;K@@%AZ )@@G@@/,0@':/K@[SDRB?@@@;*)@@S;K)@@SA#)BWO#@BWRA#0@@I/K@[O(P#J@@AR7Z@@[:8K@@[/K@[O,RF_@@@/K@[O*R#0@@IA#J@@GBQ )@@G@@?@@BWS/K@[O3/K@[O=A#@BWSR7\@@[A3)BWO/K@[O=A#@BWSA3)BWO/K@[O'O#@BWR/4@[O.BR )@@G@@R#@BY%A#J@@GR7\@@[RB0BWU/K@[P[R7Z@@]?8K@@]/K@[O7?@J@@G/K@[PG%@J@@G/K@[PEBS )@@G@@!4\@@[/K@[PGR#J@@GR7\@@[RF_@@@/K@[P[:4KBWO/K@[PMRB_@@@/K@[PUCD@BWY*^@BWYBT )@@G@@/K@[P=%9@@@TR#0BW0/K@[P=/K@[PSRF\@@@R7Z@@[!@KBW+/K@[P=&;0@@@:@0BW?/K@[P=BU )@@G@@:80BFD/K@[P=(0J@@[/K@[PIR;K@@[A3Z@@[AB"@@@'^JK@]/K@[PS(@J@@H/K@[P2R#J@@GBV )@@G@@P#@BWRO#J@@H @J@@HAB0[P1'^@[O9R;0@@@(C@BWY/K@[NPR7J@@[%4@BWO/K@[P/R#KBWBBW )@@G@@A#KBWAR#KBW'=@@@NC[KBWQCA )@@G@@/ K[Q%C9K@@[P#@BX.T8@@@E;G@@@=W@@@@L/,0BGG[!KBX6;DK@@A[5KBX6;DK@@A[-KBX5CB )@@G@@;DK@@A[>KBX5R#@BWQ/,0BGG[[KBX8[-@BX7;D@@@A[>@BX7R#@BW&/,0BGG[5KBX;;DK@@ACC )@@G@@[[KBX'[5@BX';D@@@A[-@BX9R#)BWR;G)@@=(@@BWQ/K@[RKW@)BWQO;)@@[RF0BWK;G0@@=CD )@@G@@W@0@@IC[@BYM%9@@@[/K@[ROC9@ [-@BX/C9KSEQ/K@[RZR#@BWQ;G@@@=W@@@@J*@@@@HCE )@@G@@O;@@@[T8@@@E;G@@@=W@@@@K/,0BGG[-KBX/;DK@@A[(KBX/;[K@@A[!KBX/;-K@@A;DK@@GCF )@@G@@[1KBX//K@[R!C[@BY![[@BX1R;@BX0'=@@@CC[@BY,[[@BX1'=@@@CR#@BY\(4@BWP'=@@@JCG )@@G@@R]0BP@R#F@@@AB@[R/R;@[R"AB@[QUR;@@'"AB@[S3R;@EJ]*@@BY*'=@@@= @@BY*'^@@;DCH )@@G@@/K@[R/'=@@@DR#[@@@A#@BYN/,0[S=@[BBYN'=@@@)C9@@C1/?K@;OC9@@M5/?K@;OC9@@B1CI )@@G@@/?K@;OC9@@B2/?K@;O9?@BY09*@BW7R;@BW7'=@@[GR7W@@A;CK@@#%8K@@#/K@[S+RB?@@CCJ )@@G@@T8)@J*R;@EJ]K8@@@[AFKBW^A#KBO5AF)BW O#@@@IO#K@@IABKBW^O;@@[,A#@BY*'=@@@[@)B)/C8)@@0 @@B-#[4)B-#'^@[V]:8)@@D[0)B-#:8)@@T[?)B-#:8)@@F[*)B-#CU )@@G@@/K@[ULC8K@@S/,)[ZAC8K@@C/,)[ZAC8K@@D/,)[ZAC8K@@E/,)[ZA/K@[S.'^@[V]'^@[Y!CV )@@G@@&;)A@@A#:)@@/K@[S.'^@[V]'^@[Y!&;)1@@/K@[U>'^@[V]'^@[Y!&;)2@@/K@[U>R;)@@3CW )@@G@@A7:)@@/K@[S.'^@[V]'^@[Y!&;)4@@/K@[U>R7?@@@R3?@@@R\?@@@R:?@@@R$?@@@R:8)@@./K@[V2:8)@@;/K@[V9CZ )@@G@@ @@B)" @@B)_[@0B).9!@B-[; @@[]9(@B-[A<)B-]/K@[V#*@@B- /K@[V+[@0B- [@0B)"DA )@@G@@ @@B)_/K@[V# @@B- [@0B)"/K@[V4(@@B)_/K@[V% @@@@H @@@@I/K@[V][@0B)_*@@B)"DB )@@G@@/K@[V0*@@B)./K@[V4/K@[V# @@B)"/K@[V#(@@B)./K@[S.9?KB-[ @@B). @@B-[ @@B-]DC )@@G@@/K@[V]'^@[V;/K@[V#/K@[V;(@@B)//K@[W[ @@B)/C@)B-#[@:)@@R;F@@@!8@B)-/K@[Z-DD )@@G@@R#@B-RR;KB-SN8K@@IM#H)@@C@@B)-'=@@@H @@B). @@B)" @@B)_ @@B-[ @@B-]R]@B-TDE )@@G@@R#@B-R/K@[V;C8)@@S[4:)@@'^@[W)/K@[S.C8)@@T[4:)@@'^@[W)'^@[V](@@@@I/K@[S.DF )@@G@@'^@[Y!&;)F@@[@:)@@/K@[S./K@[W)'^@[W\'^@[V](@@@@I/K@[W*'^@[Y!&;)C@@[@:)@@DG )@@G@@'^@[V](@@@@I/K@[S.'^@[Y!&;)D@@[@:)@@/K@[W)/K@[W\'^@[V]&;)E@@[@:)@@/K@[W\DH )@@G@@C8)@@U[4:)@@'^@[W\'^@[V][@KB-#*4@B-#/K@[W";?K@@AG8)@@ /K@[W8C^0B)+&;0H@@DI )@@G@@[@;)@@&;0@@[[@Z)@@[@\)@@[^0B)+'^@[XF/K@[S.C8)@@V[4:)@@'^@[XF/K@[S./K@[XFDJ )@@G@@'^@[V][@)B);C^)B)+&;)G@@[@:)@@C@KB)+C@)B);[@!)@@[@KB)+/K@[XGC8)@@W[4:)@@DK )@@G@@'^@[X<'^@[V]'^@[Y!A#:@@@R;)@@(A7:)@@/K@[S.C8)@@Y[4:)@@'^@[X'=@@@4C@@[)M[@FK@@/KF@@]@@@@@@@@@@@@/S@B-&9?:@@@C8@@@[C@,@@@C[J@@@EA )@@G@@/[@[)!E@0@@I!80@@]/K@[)-/^)[)Z @@@@G/H@[)\E[@@@K+@0@@K/H@[)?/-@[)&U@@@@IEB )@@G@@/^@[)4;^@@@>;D@@@[/[F@@#U@)@@I/^)[)4;^)@@>/K@[)+ @@@@G/^:@@#/K@[)\A#)BR+EC )@@G@@[[@BR<'^@[@K@@@[[B/KF@@#9?:@@@R#,@@@R#_@@@9*)BR+'^@[@K@@@[[ /KF@@#/S@B+*ED )@@G@@C8@@@[[@@B+$/S@B+(C@F@@@R#/@@@(CG@@@/K@[+[C8K@@ +@0B+%%[@B+:/K@[-E;)0@@AEE )@@G@@8#K[-^/K@[6:R#KB+?N8K@@D2@.$-//K@[-LC8.@@@RBJB-$/KG@@@A#0B+V'^@[9JD9K@@@EF )@@G@@C@@B+N/K@[-_C[ZB-1[[K[-S@@@@@@/K@[-ZC^F@@[[@@@@IC[ZB-1[[K[-Y@@@@@@&,_B-$EG )@@G@@R7ZB-$!8K@@Q/K@[+B')HB+ R#@@@L(@@B+$/K@[-( @@B+$/K@[-!/@@[-!/G@[-\:8K@@[EH )@@G@@/K@[+D/SF)@@/KF@@['^@[9J'^@['TA#@B+JR#@@@L;C@@@M'^@['TA#@B+I9?@B+B;O0@@=EI )@@G@@W80@@E/@0[-/;*0@@AO;0@:@O;W@@@G9J 0[ H@@@'=@@@I/K@[6:/G0[6:?80@@E/K@[-JEJ )@@G@@9?@B+N'^@[9J/K@[-79?@B+W/K@[+ R#,@@@:@)B+!/K@[-\:@)B+,/K@[+L;C)@@A%@)B+\EK )@@G@@/K@[-!+@@B+0/@K[-!/K@[-\C^F@@[C^G@@@C[ZB-1[[K[+S@@@@@@/K@[-ZC^V@@[C[ZB-1EL )@@G@@[[K[+X@@@@@@[@H@@@/K@[-ZC[ZB-1[[K[++@@@@@@A#K@@K9?V@@[A#H@@@[[I@@@/K@[-ZEM )@@G@@C80@@G[@0B%//K@[+3C V@@@[ KB+1O'0@@[C80@@H[@0B%//K@[+3C80@@F[@0B%/AA0B%ZEN )@@G@@NC;@@@N^:@@@C9K[4+[ K[.@^^)B>='^@[=VN8K@@EC@KB+.C@)B+"M#!)@@C@K@[#O'.@@[EO )@@G@@AA0[/;C[@B+2[[@B:PC[@B%/:9@@@F/K@[\ @@B%+EQ )@@G@@/K@[, /K@@@@R#@B+3'=@@[SC^K[K/K@[&)/K@[:O/K@[:$/K@[::/K@@@@RFKB:PRB0B:P!80B:?/K@L>^')H[38EY )@@G@@8#K[>IO;0@@[R;K@@ AB0B:PAFKB:P/K@L>^[[KB='^@[=+A#0B*EZ )@@G@@*@@@@LH9K@@[[DKB>0C9@@@@W9@@@A;[@@@MD[K@@LG9K@@ ; @@@MG @B:\[[@B:P C@B>!FA )@@G@@'^@[41/K@[>N'^@[41C[KB1C9KB<^C^)B%2C9K@@B[[KB<#C KB>*?[KB<#/K@[>/H[KB<#R;)@@ '^@[>^8^K[>7FC )@@G@@C[KB<#H9K@@[C^)B%^;@)@@Y8^K[&]R7)B>$FD )@@G@@:8)@@^/K@[&7/K@[>=C@K@@LT8K@@A;@!@@@/K@[&#D[@@@K'^@[%BR7KB>$:8K@@^/K@[&7FE )@@G@@'^@[41C^KB%*/H@[&H/ @[&Y?@Y@@@/K@[&HFF )@@G@@'^@[:H/K@[&J'^@[41C KB>*?9K@@H/K@[&(H9K@@HR;)@@ '^@[>^8^K[&>C9K@@GR;K@@#FG )@@G@@T@K@@LC^)B%^8^K[&\FH )@@G@@/K@[&)'^@[41R3KB%<:8K@@[/K@[&N:8K@@ /K@[>*/K@[&_'^@[41DHKB>0] KB%Q/HK[$#FI )@@G@@C9K@@@HDKB>*H9K@@^ @@@@IR7KB>$:8K@@[R;)@@[%8K@@^/K@[$IR3KB%<:8K@@#R;)@@[FJ )@@G@@H[K@@IG KB>*/HK[$/C^KB%<0@H@@@/[K[$/[DKB<[CDKB>*GHKB>0/HK[$//[K[$/[ KB<[FK )@@G@@'^@[*KCD@B<['^@[("(G@B%R/K@[*#RJ)B%SPJ)B>0#^)B%S/@)[$=/G)[*[R;)@@+'^@[>^FL )@@G@@RJKB%S'^@[;V @GB%] @GB%#C9@@@#R7)B>$:8)@@[/K@[$6%8)@@^/K@[$3R3)B%<:8)@@#FM )@@G@@/K@[$6C9@@@]?9G@@@/K@[$8'^@[%%/K@[$.R;)@@*'^@[>^'^@[>^/K@[$.'^@[:HR7KB>$FN )@@G@@%8K@@^/K@[&"/K@[&7R;)@@-/K@[$>R;)@@ C9K@@]R7KB>$:8K@@[/K@[*G%8K@@^/K@[*HFO )@@G@@R3KB%<:8K@@#C9K@@#'^@[>^8^K[*H/K@[$./K@@@@RB)B%$:8K@@[/K@[*9%8K@@^FP )@@G@@/K@[*UR3KB%<:8K@@#/K@[*9R3KB%<%8K@@#/K@[*)94"@@@980[(B/K@[*$/KG[*>/K@[*//K@[(@DH@B%S/[@[*?/D@[*/GD@B>*/H@[*/FR )@@G@@DH@B%SGD@B>*R#0B>*A#0B+_P;0@@#[D@B>*AB0B>*C9@[(J[ @[*KRJ0B%S/K@[(]94"@@@FS )@@G@@/,0[;=/K@[*.9?0B0OJ0B%SAB0B%SOF0B>*AB0B<[ @@B%[FT )@@G@@/C0[*/ ^@B%R @@B%S @@B%[R;K@@OABKB(_/K@L*K'^@[41'^@[*KCH@B%S/H@[(0/[@[(PFU )@@G@@DH@B%S] @B%Q/K@[(X*C@B>*/K@[(VD9@@@[[ @B(_] @B%Q/K@[(X[ @B%QD9@@@@H9@@@[FV )@@G@@HD@B>*G @B>*/H@[:FC^)B%<0@I@@@/[@[:F'^@[("C5@B>$:9@@@^/K@[((/K@[(HC[@B+_FW )@@G@@[[@B>*R;)@@ C9K@@]'^@[>^8^K[(!/K@[&7(@@B%[G9@@@[/H@[(4D9@@@@[ @B%S(C@B>*FX )@@G@@/K@[(RDH@B%S!D@B>*CD@B>*] @B%QC9@@@[] @B(_/K@[(W/K@@@@'^@[%E0G@B%Q/K@[% FY )@@G@@R;)@@.'^@[>^CD@B>*'^@[%7/K@L("/K@@@@ ^@[%E/K@[%F/K@@@@/[@[%=H9@@@]R;)@@ FZ )@@G@@/H@[%L'^@[>^8^@[%JC^KB%$:80@@ /K@[%+R30B%<:80@@[GA )@@G@@/K@[%+:80@@#/K@[%)>@KB@KB^CH@B%Q/H@[:]GB )@@G@@(^@[%E/K@[%?'^@[%7/K@L%E/K@@@@ ^@[%BR#@@@K/K@[%3R#?B%]!@@B^8#@[%,*^@[%B/K@L%B/K@L%%/K@@@@R#@B(_/K@[%_R#?$%]!@@B^8^@[%'AB@B(_/K@L%7D@@@@KGD@B>*R;)@@.'^@[>^R;)@@0/K@[:D'^@[>^8#@[:CGE )@@G@@/K@L%E'^@[:H/K@[(>/K@@@@C KB>*R;)@@*/K@[:M'^@[>^8^K[:L/K@L:H%8)@@'/K@[:^/K@[:QR#KB>&A#KB&GG )@@G@@/K@[,:/,0[3('^@[>^8^K[:^8^K[:*/K@[,:C9KB+;[ KB>=/K@[,BGH )@@G@@/K@@@@ @@B=] @@B=# @@B<_/K@L:,/K@@@@*4@B=]/K@[?^+8)@@JR#)B=#T8)@@EO#0@@IGI )@@G@@A#0B=#R#)B=](4@B=#/@)[:3T8)@@EO7)B=# 4@B=#R#0B=#A#)B=]/K@L:3R#)B<_O;)@@[GJ )@@G@@A#)B<_9?)B=]/K@L:3/K@@@@9!@B=]'^@[?R/K@L?D/K@@@@9!@B=]'^@[?R/ K[?HC9K@@[GK )@@G@@/K@L?H/K@@@@9!@B=@'^@[?R/K@L?N/K@@@@/[@[?R!9@@@)/K@[?Y;(K@@A;H@@@A/K@L?RGL )@@G@@RB)[?R:8)[?K/K@@@@R;)@@HA\)B%Y;C)@@AA3)B%YR;)B%_AB)B%YR;K@@A'^@[4B/K@L?RGM )@@G@@/K@@@@9?)B=]9*)B=@R#)B<_A#)B<"'^@[:,/K@L?% @@[?.AA0[?'N@KB*K @@B*K/K@[!TGN )@@G@@;G0@[C*^@[?."/0@@J'^@[!%/K@@@@ ^@[?./K@[!@/K@@@@C @[?.[ @[?'9!@B=]'^@[?RGO )@@G@@R\KB=^=8K@@)D[K@@LR#K@@LPJKB=^O#KB<"E[K@@H!9K@AK'^@[!\N@KB*K @@B*K9?0B=@GP )@@G@@980[!Q;(@@@A;W0@@J;G0@@[R;)@K7P#)@@L9)0B$ @@B>0GU )@@G@@C9K[0_[ K[?)C[KB%=[[KB%$C[KB><[DKB%\C9K@@_[1KB= C9K[3"[ K[/"C[KB>=[[KB>&GV )@@G@@R#)@@LR#,@@@%@)B>1/K@[,&R;)B#LR#@B%/%8@@@H/K@[,=8@@@#R;)B#L/^,@@@/,0[3(%8)@@(/K@[,&C[KB>&[[KB>(R;@@@@ @@B>* *@B>$GX )@@G@@'^@[:,C9@@@@/,0[3(/KI[,2/KG[\6/KG[\6/KG[\6/KG[\6/KG[\6/KG[\'/K@[\2/KG[\6GY )@@G@@/KG[\6/KG[0]/KG[0]/KG[\"/KG[\"/KG[0A/KG[0E/KG[\6/KG[\6/K@[\2/KG[\6/KG[\6GZ )@@G@@/KG[0J/KG[0N/KG[\6/K@[\2/KG[\6/K@[\2/KG[\6/KG[\6/KG[\6/KG[0R/KG[\6/KG[\6HA )@@G@@/KG[0V/KG[0Z/KG[03/KG[\6/KG[\6/KG[\6/KG[\6/KG[\6/KG[\6/KG[0+%8@@@#R;)@@A/KG[\"HD )@@G@@/K@[0_/K@[0_/K@[0_/K@[=U/K@[,0/K@[,0/K@[,0/K@[=N/K@[1M/K@[1X/K@[1(/K@[=UHE )@@G@@/K@[1M/K@[1X/K@[1(/K@[=R/K@[10/K@[15/K@[18/K@[=U/K@[1I/K@[1T/K@[1>/K@[=UHF )@@G@@/K@[0%/K@[1K/K@[1V/K@[1$/K@[=U/K@[1_/K@[2^/K@[2B/K@[=U/K@[2D/K@[2H/K@[2KHG )@@G@@/K@[=U/K@[2(/K@[2*/K@[3M/K@[=U/K@[3O/K@[0_/K@[0_/K@[=P/K@[2M/K@[2=ABKB%YR;K@@ A\KB%Y @@@@H'^@[57 0@B%\/K@[,0HK )@@G@@/,0[3Z/K@[,:'^@[3$'^@[?HHL )@@G@@[DKB>!R;@@@[/K@[,,R;0@@ /K@[1ZR;0@@B/K@[1Z;G)@@#;C0@@-A30B>$/,0[3ZR30B>$HM )@@G@@A70B>$C9K@@[/K@[1QR;0@@ /K@[1:R;0@@B/K@[1:;G)@@#;C0@@-A30B>$'^@[3$D[K@@L[ KB>0/K@[,:/,0[3ZC9K@@[HP )@@G@@/K@[2]'^@[3$!8)@@]R;)@@[R#0B>&H9K@@[A#"B>%[ YB>?O;)@@[A$)B>$!8)@@]/K@[,:HR )@@G@@ 4@B>$A<)B>$A#0B>([DKB>?/K@[,:/,0[3ZC9K@@[/K@[2N'^@[3$HS )@@G@@/@)[20C YB>:P;)@@[8^K[3IA$)B>$/K@[,:C4)B>$/@)[=M'^@B%&C@)B%<[@)B%+C[KB>(HT )@@G@@[[KB>&R<)B>$A$)B>$/@)[2/CDKB>?[ KB>?'^@[/7C @B>\%9@@][/K@[,:C9@@@@C[KB>&HU )@@G@@/,0[3(%8)@@//K@[3BG9@@@[/K@[3[[[KB>&/[@[,:[1@[3HC@@[3H'=@@@I/K@[,:@@@@@@HV )@@G@@[ YB>?C[YB>%[[KB>&/K@[,:'^@[3$/K@[,,/,0[3Z/K@[2/'^@[3*R;@@@]/K@[,,AA0[3<'^@[?H[ KB>*/K@[3&/K@@@@'^@[?D[DKB>*HX )@@G@@C[KB>+R7)B>$/K@[=CRFKB>&RB0B>&')H[328#K[30R;K@@ O;0@@[AB0B>&AFKB>&/KF@@@HY )@@G@@R<\@@@R$\@@@R:\@@@R\\@@@R3\@@@R7\@@@A<\@@@A$\@@@A:\@@@A\\@@@A3\@@@A7\@@@HZ )@@G@@AB@B%2'=@@@IR#@B>3'=@@@IR;@B>4IB )@@G@@N8K@@QM#W)@@RF@B%"RB0B%"P;0B%_R;)@@*')GB=AR#@B>5'=@@@IR;@@@#A3@B= /K@L4BIC )@@G@@'^@[/7/S@@@@CDKB%\: KB%\/K@[40*0@B%\/K@[4:C@@B>J'=@@@I*?@B%\/K@[4\C@@B>KID )@@G@@'=@@@I'^@[8%/K@L/_/K@J__RF)B>!/@)L3!C@)B%+/@)[4;[@)B%< @@B%+IE )@@G@@/K@[4/'^@B%&R3)B%>RF)B>0OB)B>*?@)B>\/K@[5KAF)B>0R;)@@]A7)B%YIF )@@G@@RB)B>\A\)B%Y;C)@@AA3)B%YR;)B%_AB)B%Y @@@@H'^@[57RF)B>0 ?@B%\AF)B>0/K@L41IG )@@G@@CD@B>0G[@@@L[D@B>0/KF@@@/K@@@@AB@B%Y9*KB>7C4W@@#AFKB%Y;GK@@#O;K@@0A7KB&9C8)@@#[4)B%Y'^@[57II )@@G@@'=@@@I9?KB>7/K@[8%C@@B>"/K@[5$RBW@@#/@K[5&AFW@@^ 4G@@#9?KB>7/K@[5Q @@B%YIJ )@@G@@/K@[5&/K@@@@RA0B%Z&'0@@[C!V@@@/[KL57:9K@@[/K@L57CDF)@[/[@[5"H9K@@[H9K@@[IK )@@G@@?9K@@@/K@L57CC:@@[C^;)@[/@K[6G!8K@@^/K@[6G%8)@@]/K@[6[/KJ@@@%8)@@#/K@[6[IL )@@G@@/KJ@@@R#WB&0A#KB&$R#WB&2A#KB&!R#@B&4'=@@@I/K@[8%'^@[9JR;F@@@L8@@@[RB!@@@IM )@@G@@?8)K@@/K@[6YP;)K@@RB,@@@P;)@@[RB,@@@N@"@@@R#K@@GRF!@@@/^)[6&O;K@@[/K@[6+IN )@@G@@:8)/K@/K@[6=P#K@@GABK[6Q/K@[6!/K@[6Q'^@[9JR;V@@@OBKL6:A#KB&"^@0B$B^@0B$EIO )@@G@@RFX@@@R#@B$7'=@@@IR#@@@HN80@#C'^@['TA#@B$KRBKB&"9!@B&_0@H@@@/K@[7J(^H@@@IP )@@G@@/K@[7%RBH@@@RF/@@[?80@[@9!@B$[9(@B$HR#G@@@A#@B$MR#@B$8'=@@@IR#@B$MA#@B$EIQ )@@G@@RBKB&"RBX@@@'^@[7NA#KB&"/K@[679!@B$[9(@B$HR#@B$9/K@[7,/K@@@@RFH@@[?8@@[@IR )@@G@@/K@[7-R#@@@HP;@@@]RBG@@@P;@@@[O;K@@[RBX@@@O#K@@GRFH@@@8K0L7N/K@[708#@[7VIS )@@G@@O;K@@[R#X@@@RFH@@@/@@[7*%8@B$'/K@[7YO;K@@[/K@[7=9(@B$HR#@B$;A#@B$MR#@B$/IT )@@G@@'=@@@I'^@[8< @@[<5'^@[<6/K@@@@'^@[9JRF@L72'^@['TA#@B$)R#@B$.RBKL72/@K[8]IU )@@G@@'=@@@IL8K@@]N@.@@@RA.@@[RB,@@@P;)@@[AB)[6Q/K@[6!&;@@]K/K@[7,'^@[9J/\0[9#IV )@@G@@A#@B$%A#@B&.R#@B$"'=@@@I/K@[8R'^@[9J/\0[9#A#@B$29?@B$3/K@[8O'^@[9J/\0[9#IW )@@G@@A#@B$29?@B$59*@B$:R#@B$_'=@@@I(^@B&"/K@[7:R#@B$8'=@@@I'^@[8@@B%U")0[/C98;@@@"0@@@JH8@@K@JO )@@G@@/@F@@@S@@B("AA0[/^/^@[;0E@@@@G/K@[;4[^@B%SD@K@@G/,0[?1RJ@B%S9?K[/ 9=K@@JJP )@@G@@98K[/]/GK[;;"*0B%VH8@@@[/K@[;49?K[/B9=K@@J98K[;_/CK[/#G8@@@["?0B%V/K@[;4JQ )@@G@@G9@@@[[^@B%S/K@@@@J.3G3G3G3G3GK[)@@@@@@@@@@@@@@@980[/3"0K@@JP;K@J5;?!@@@JR )@@G@@[ KB%R?9K@@B @@@@J!9K@@OC9K@@NC@@B%T ^@B(_C@K@@IU8K@@E/@0[/Y;C0@@[U80@@EJS )@@G@@;*0@@[[@0B%[9)KB%@C@0@@K[@W$%];C)@@[8^K[/P @@B%[G8K@@ H@@B%X/K@[/*C@WB%]JT )@@G@@G8K@@[[@WB%]?8K@@E/KF@@@H8K@@E[@WB%]8#@[/>C8K@@[[@KB%[G^KB%S[^KB%S[^@B(_JU )@@G@@/KF@@@[ KB%RC8K@@O[^KB(_/KF@@@/K@@@@'^@@@@ C@B>0/K@L/7/K@@@@A]0B%ZC^)[/;JV )@@G@@/K@@@@/K@@@@/K@J__R#)B%-AB)[/"R#)B%>A#)B%$/K@[//R#)B%=A#)B%$/K@R%&RB@[/;JW )@@G@@R]0B%Z*4G@@@/KG@@@R;?@@[R#G@@@+@@B:0O#KB:1A#K[.MR7@@@@AB)[/;/K@[/"/K@@@@JX )@@G@@[^@B%B?\/,0]N0@@@B:4KH )@@G@@@[&B?\C_)@@[N[@B?5[#)B?LC@@B?LT/@@@EG/@@@E[@@B?5/,0AB8@@@B:2@@@B?)@@@B:4KI )@@G@@@@@B?5@@@B?=@[%B?\G_)@@[8L@[_LC@@B?MT/@@@EH@@@@@(@@@@G/K@[_8C/@@[=H@@@@@KJ )@@G@@/C@[_(*@@@@G/K@[_8C@@B?MT/@@@E[@@B?5G/@@@OC@)B?5H@)@@@]@)B?5[@@B?7/,0AB8KK )@@G@@@@@B:2@@@B?)@@@B:4@@@B?7@@@B?5@[0B?\/,0AB8@@@B?H@@@B?)@@@B:4@@@B?>@@@B?&KL )@@G@@@[1B?\C/@@[=C@)@@GH@)@@@1@@@@IC@@@@@[@@B?5*@@B?K/K@]@G/,0AB0@@@B:4@@@B?)KM )@@G@@@@@B?V@[3B?\/,0]N0@@@B:4@[4B?\R@KB?+N.@@@PC@@B?<[@[$:38L@]@L/,0AB8@@@B?EKN )@@G@@@@@B?)@@@B:4@@@B?Z@@@B?$@['B?\/,0AB0@@@B:4@@@B?*@@@B?X@[;B?\C/@@@[[@@B?NKO )@@G@@C_0@@[N[@B?2[#0B?LC/@@@[H@@B?L;O@@@=W/@@@EH/K@@[]@KB?7/,0AB8@@@B:2@@@B?7KP )@@G@@@@@B:4@@@B?(@@@B?)@]@B?\C@@B?L;O@@@=W/@@@E*@@@@H/K@][WC/@@@[H@@B?L;O@@@=KQ )@@G@@W/@@[=C@@@@H;O@@@=W/@@@EH/@@@[]@@B?7/,0AB8@@@B:2@@@B?7@@@B:4@@@B?%@@@B?)KR )@@G@@@]#B?\C@@B?L;O@@@=W/@@[=*@@@@H/K@][WC/@@@[H@@B?L;O@@@=W/@@J*C@@@@H;O@@@=KS )@@G@@W/@@[=H/@@@[]@@B?7/,0AB8@@@B:2@@@B?7@@@B:4@@@B?:@@@B?)@]AB?\R@KB?NO@KB?3KT )@@G@@N8L@@@^^K][-/,0AB8@@@][-@@@B?)@@@B:4@@@B??@@@B?5@]CB?\/,0]N0@@@B:4@]DB?\KU )@@G@@C/@@@[H@@B?J*@@@@G1@@@@G/K@]]GC/@__.G@@B?JC_)@@][@@@[ [#)B?OC/@@@[H@@B?OKV )@@G@@T/@@[=[@@B?7G/@__"]@@B?8N8L@@@^^K]]^C@@B?7G@@@@@C@)@@GG/)_"V1@@@@IC/@@[=KW )@@G@@[@@B?7/,0]O^@@@]]^@@@B?8@@@B?7@@@B??@@@B?)@]JB?\G_)@@[8LK][3C@@B?NG@@B?IKX )@@G@@[@@B?NG_0@@[8L@]@=N@0]]N/K@]]O@]QB?\R]0B?09\)B?9R@KB?;N[@B?/N[KB?.*4@R?!KY )@@G@@/K@R?!/K@[8^AA0B?09:)B?9A@KB?;^[@B?/^[KB?.C@VK@@[@KB?4C@VK@][@KB?6C8FK@#KZ )@@G@@[^@]@#[^@[_,[^@[_>[^@][.[^@["$[^@]@[[^@["C[^@[.4[^@[_-/K@[.>C@@@@@"^@B!!LA )@@G@@/C@]]5*@@@@G/K@]]8N@0]]7/K@]#X@[#B!3/,0 IM@@@B!,@[^B!3/,0[+1@@[B?"@[ B!3LB )@@G@@@@)@@@@@KB!6@@KB!7'^@[/_/,0]]W@@@@@@@@@@@@@@@@@@@@@@@@@[FB!3C@@B!\"@@@@@LC )@@G@@[@@@@@C@@@@@"^@B!!*@@@@G1@@@@G/K@]#NN@0]#M/K@]#X@[IB!3/,0 IM@@@B!0@[JB!3LD )@@G@@/,0[+1@@[B!X@[KB!3'^@[/_N@0]#W/K@]#X@[NB!3R]0B!4*4@R!1/K@R!1/K@[8^AA0B!4LE )@@G@@C8FK@@[^@]##[^@]]"C@VK@[[@KB!6C@VK@][@KB!7C8FK@#[^@]#F[^@]]0[^@]#E[^@]#DLF )@@G@@C8FK@^[^@]#^C8FK@ [^@]# C8FK@A[^@]#A/K@]]0C/@__"G@FK@@C@)B0HG/)__2C9FK@]LG )@@G@@G.@__1[@@B0I[@)B0J[[@B0KC/@@@[(@FK@^ @@@@GC_)@@[R@KB0JN[@B0I[@@B0L[#)B,[LH )@@G@@C@@B,[[@@B,]C@@B0L/)@]^GC@[@@H[@@B,]C@@B,]T/@@@IG@@B0K(@G@@@/K@]^)O/K@@[LI )@@G@@G_)@@[8L@]^ *@@@@@/K@]^V/,0[+1@@[B,E@[RB0E'^@[/_/K@]^:/,0[+1@@[B,K@[VB0ELJ )@@G@@'^@[/_/K@]^:(@@@@@/K@]^$/,0[+1@@[B,W@[+B0E'^@[/_/K@]^:/,0[+1@@[B,"@[&B0ELK )@@G@@'^@[/_C/@@@[(@@B0M @@@@GC_)@@[R@KB0JN[@B0I[@@B0L[#)B,[C@@B,[[@@B,]C@@B0LLL )@@G@@/)@]^9C@[@@H[@@B,]C@@B,]T/@@@IG@@B0KC@?@@@[@)B\'C[G@@B[[@B\;C@)B0@C@0B\;LM )@@G@@0@@@@JD@)@@I"))B0@9*)B!.(@@B\'/K@] &*@@@@@/K@] Q[@@B0N/,0[+1@@[B\U@[6B0ELN )@@G@@@@L@@HR@)B0NC8]@@['^)[/;@@+@@]@@KB\''^@[/_/K@]B=C@@B,]T/@@@IG@@B0K[@@B0NLO )@@G@@/,0[+1@@[B\>@["B0E@@L@@HR@)B0NC8]@@['^)[/;@@+@@]@@KB\;@@KB\''^@[/_/K@]B=LP )@@G@@C@@B,]T/@@@I[@@B0NG/@@@[G@@B0KR@)B0KO@)B0NR@0B0]R[@B0#Q[@@@GN.K@@#C@^)@]LQ )@@G@@[@#$\;8LK] 1C@+@@C[@)B,^C[]@@D[[@B, C[+@@E[[)B!;C]]@@F[]@B!/C]+@@G;+)@@@@@M"!@B!.][@B!_LU )@@G@@][KB,@9?@B!_"=@B0^*@@@@G1@@@@G/K@]A%9?@B0^9*@B!_ @@B,C9?@B0A"=@B!.*@@@@GLV )@@G@@1@@@@G/K@]A69?@B0A"=@B!.9?)B!_"?)@@G"/)@@I]@)B,C/,0[Z>@@@B,C@]?B0E[@@B,DLW )@@G@@*@@@@@/K@]BKC@@B,]T/@@@IG@@B0K[@@B0O/,0[+1@@[B\1@]\B0E@@L@@HR@0B0OC8#@@[LX )@@G@@'^)[/;@@<@@]@@)B!'@@)B!9@@)B,A@@)B,B@@)B,C@@)B,D'^@[/_/K@]B=C@@B,]T/@@@ILY )@@G@@G@@B0K[@@B0O/,0[+1@@[B\5@]/B0E@@L@@HR[@B0OC8^@@['^)[/;@@=@@]@@KB\;@@)B!'LZ )@@G@@@@)B!9@@)B,A@@)B,B@@)B,C@@)B,D'^@[/_O/K@@[G_)@@[8L@]^2N@0]B(/K@]B%@#FB0EMA )@@G@@R]0B0F9!)B0P9,@B0R9,)B0T9\)B0VR@KB0XR@)B0YR@0B0ZR[@B0)N[@B0-N[KB0+*4@R0CMB )@@G@@/K@R0C/K@[8^AA0B0F9()B0P9%@B0R9%)B0T9:)B0VA@KB0XA@)B0YA@0B0ZA[@B0)^[@B0-MC )@@G@@^[KB0+C8FK@[[@@B0HC8FK@#[^@]A'[^@] C[^@]^)[^@]^OC@VK@^[@KB0M/K@]#5R8VK@@MD )@@G@@C@[@@@[@@B0&R8VK@]C@-@@@[@)B0=R@KB1 C[[@@@[[@B0$R@KB1AC[-@@@[[)B0* @@B0>ME )@@G@@H@)B0$H/)__"[@)B0(C]@B0.[]@B0%*@@B0*/K@]C/,0AB0@@@@@@@@@B0:MG )@@G@@@@@B01@[QB1]C/@@@[H@@B0:]@@B0:C/)@@]H@)B0?]@)B0?C@@B0:[@@B0!C@@B0&;C@@@[@@B0>ML )@@G@@C/@@@[H@@B0:]@@B0:G_)@@[8L@]DC*@@B0[@@B0>C/)@@[H@)B0:]@)B0!C@@B0*H@@B0_*@@@@G/K@]E0/,0AB0MO )@@G@@@@@@@@@@@B0!@@@B07@[.B1]C@@B0!H@@B0((@@@@G/K@]EZ/,0AB0@@@@@@@@@B0(@@@B09MP )@@G@@@[_B1]/K@]E0C@@B0=[@@B0:C/)__"G@)B0$[@)@[^/,0AB0@@@@@@@@@B0:@@@B0;@] B1]MQ )@@G@@C/@@@[H@@B0:]@@B0:8L@]E>C@)B0$[@)B0>N@0]E2/K@]E9@]DB1]R@KB1BC@@B0>[@[@@@MR )@@G@@N@0]E8/K@]E9@]IB1]R]0B1#9!)B1C9,@B1E9\)B1GR@KB1IN[@B1J*4@R1@/K@R1@/K@[8^MS )@@G@@AA0B1#[^@B1@9()B1C9%@B1E9:)B1GA@KB1I^[@B1J/KH@@@C8@@@A/\K]F]C8FK@[[^@]D/MT )@@G@@[^@]E&[^@]EV[^@]EM[^@]E#[^@]D<[^@]C0C8FK@#[@@B1 C8FK@^[@@B1A/K@]CHC8@@@]MU )@@G@@/\K]F]C8FK@@[@@B1B/K@]E3C@FK@@[@@B1K[@@B1L[@@B1MG/@@@[T@FK@@;K@@@[[@@B1NMV )@@G@@[@@B1PC/)@@[[@)B1Q @@B1RC[@@@@" @B2)(@@@@K/K@]F3C[@@@@" @B2-(@@@@K/K@]F"MW )@@G@@/K@]MXC/@@@E[@@B1SC@)@@@"^)B2)(@@@@I/K@]GDC@)@@@"^)B2-(@@@@I/K@]GG/K@]MXMX )@@G@@C/@@@ [@@B1SC@)@@@"^)B2)(@@@@I/K@]GJC@)@@@"^)B2-(@@@@I/K@]GQ/K@]MXC/@@@[MY )@@G@@[@@B1T/K@]GSC/@@@][@@B1T/K@]GSC/@@@#[@@B1T/,0[+1@@[B1Z@[2B2('^@[/_/K@]GSMZ )@@G@@C/@@@^[@@B1T(@@@@@/K@]MURA0B1T$'0@@ 8];]GX/K@]G+/K@]G=/K@]H /K@]G=/K@]H NA )@@G@@'^@[72@[8B2(C/@__"G@@B2\C/)__"G@)B1PC[@B2?G.@__"C[)B20G.)__"C]@B2,G"@__"NB )@@G@@C])B2!G")__"R@KB2+Q@K@@MR@)B2+Q@)@@QR@0B2+Q@0@@K[@@@[^[@)B21[]@B22 @#)@[NC )@@G@@C@@B2Q[@])@[C@)B2S[@-)@[8L@]G9R@KB2+Q@KB22N[@B21 @[)@[8L@]H]/K@]MUC/@__"ND )@@G@@G@@B2\C/)__"G@)B1PR@)B2@B2_/D@]IWNK )@@G@@*@@@@K @@@@I+@@@@I/=K]I$/,0[+1@@[B19@]-B2('^@[/_C/@@@[[@@@@@N@0]I&/K@]M=NL )@@G@@@]=B2(C/@@@[G@@B1R[@@B1RC/)@@^H@)B1Q/C)]I\*@@@@I/K@]MXR@KB1QH@[B1J*@@@@GNM )@@G@@0@@@@G/K@]I.C/@@@[G@@B1Q[@@B1Q @@B1RC/)@@[H@)B1U(@@@@I/K@]I$/K@]MURA0B1QNN )@@G@@$'0@@ 8];]J@/K@]J /K@]JB/K@]J?/K@]K\/K@]L2'^@[72@]\B2(RA0B1T$'0@@ 8];]JENO )@@G@@/K@]JJ/K@]JL/K@]JR/K@]JY/K@]J>'^@[72@]0B2(R@KB1RO@KB2'C@#@@["@[@@[[@[@@[NP )@@G@@/K@]MQC@@B1R;@@@@'^@[72@#CB2(R@KB1RO@KB2.A@KB3[R@KB3[C@[@@["^#@@[*@@@@G1@@@@G/K@]L^NY )@@G@@C@#@@[[@[@@[/K@]MQC@@B1R;@@@@B2(R]0B2%9!)B3]9,@B3^9,)B3A9\@B3C9\)B3ER@KB3GR@)B3HR@0B3IN[@B3JOH )@@G@@*4@R2$/K@R2$/K@[8^AA0B2%[^@B2$9()B3]9%@B3^9%)B3A9:@B3C9:)B3EA@KB3GA@)B3HOI )@@G@@A@0B3I^[@B3J/KH@@@C8@@@J/\K]M1C@VK@@[@KB2\C8FK@[[@@B2?C8FK@][@@B2!C8FK@#OJ )@@G@@[@@B20C8FK@^[@@B2,C8FK@ [@@B27C8FK@A[@@B23C8FK@B[@@B24C8FK@C[@@B26C8FK@DOK )@@G@@[@@B25C8FK@E[@@B28C8FK@F[^@]G^[^@]F9[^@]F5[^@]G@C8FK@G[^@]F,[^@]F%C8FK@HOL )@@G@@[^@]GS/K@]FYC8@@@]/\K]M1C8FK@@[^@]I<[^@]HZ/K@]HZ/,0[<0@@@B3KN@0]N%/K@]N:OM )@@G@@@[#B3N*4@R3L/K@R3L/K@[8^AA0B3O/K@]N&C@:@@@C4I@@@C@KB3U[4Y@@@:8@@@1/K@]O@ON )@@G@@:8@@@0/K@]O]:8@@@+/K@]N"C@@B3QQBF@@@'=@@@I/KF@@]C@@B3R/K@]N;C@@B3S/K@]N;OO )@@G@@C@@B3T/K@]N;[[@B33A])B34N8K@@E9?@B31C@)B359*I)@@8KK]ODC@FK@[H8@@@[;G@@@=OP )@@G@@W8@@@AG8FK@@C@:K@#H8)@@[;G)@@=W8)@@AG8)B3V&;@@@[&;K@@[&;)@@[&;0@@[N@VK@]OQ )@@G@@8KK]OV')H+O%')J+O38KK]OVC@FK@^;*@@@AG8@@@Q;*@@@MG8@B3V'=@@@IC[@B33R])B34OR )@@G@@/KF@@AC-G)@@C@KB36/KE@@@C5G@@@C1G@@@C!G@@@C(G@@@C>G@@@/,)]O$[-I)@@C@0B36OS )@@G@@/KE@@@[5I@@@[1I@@@[!I@@@[(I@@@[>I@@@/,)]O09*@B4#9*)B4 9(@B4B^@0B4DA])B4EOT )@@G@@9?FK@@9?:K@[9*@B379*@B4F9*)B39C@FK@]C8VK@#[@@B4L!8@]WK/K@]QD?8@@@[/K@]QDOU )@@G@@[@KB4MC8FK@^C8VK@ [@@B4O[@KB4N[^KB4JC8@@@K[W@B4IC8@@@W[C@B4JC8@B37'=@@[ OV )@@G@@/^)]QFC@@B4[[@@B4KC8@B4F'=@@@#*4@B4I/K@]QH[^@B4JN@0B4L8K0]P)C@@B4M&;@@@[OW )@@G@@C@KB4NC[X@@[C@0@@LC[H@@#G@0@@K[@0B4RC@!@@^?[W@@@C[W@@@,@?)@@/K@]QJ8K0]P(OX )@@G@@[[KB5;/H@]QDC@!@@Q[@)B4Q;G)@@=W8)@@W[@)B4V/^0]QDC@H@@O/G@]QD/@@]QDG@@B4KOY )@@G@@[@@B4KC@)B4RT@)B4V[@)B4PC@H@@][@@B4U/@@]QD @@B4S @@B4T9!@B4B9?@B4#9?)B4 OZ )@@G@@N@0B4DR])B4E/KF@@CC@@B6T/K@]QKC@IB4V/K@]QKC@@B6U/K@]QKC@@B6V'=@@@I9?@B4#PA )@@G@@9?)B4 9!@B4BR])B4EN@0B4D/KFK@A9*@B4#9*)B4 9(@B4B^@0B4DA])B4E @@B5GC@@B4SPB )@@G@@K8@@@[!@@B4Q/,)]Q3[@KB4SC@)B4TK8)@@[!@)B4U/K@]R2[@0B4TC8VK@@&;K@@[G@@B4OPC )@@G@@&#@B4QN@KB4LM#H)@@9?@B4#9?)B4 9!@B4BN@0B4DR])B4E/KF@@#C@@B4K[@@B5C @@B5HPD )@@G@@ @@B5JC@KB4M&;K@@[C@!@@@C8@@@[[@)B5D @@B5IN@0B4L8K0]Q_8K0]R[/K@]RI8K0]R#PE )@@G@@/K@]RDG8)@@[%@!@@[/K@]RJG8@@@[/VH)@@8K0]R#]^@B5HG8)@@[%@!@@[/K@]RJG8@@@[PF )@@G@@]^@B5JC@)@@GT@)B4Q[C)B4JC@)B5IT@)B4QG@)B4O[^)B4JC8)@@C[W)B4IC@)B5DH8)@@[PG )@@G@@T@)B4VG@)B5C[@)B4KG@@B5I[@@B5IC8@B4F'=@@@#*4@B4I/K@]R4*@@B5J/K@]R?C@!)@[PH )@@G@@C8@@@[[@)B5D*@@B5H/K@]RI8K0]R#/K@]RDC@)B5CG@)B4P[@)B4KC8@@@@C8K@@[/KE@@@PI )@@G@@C@@B6W/K@]R7C@@B6X*@@B5G/K@]UI'=@@@I9?@B4#9?)B4 9!@B4BR])B4EN@0B4D/KFK@[PJ )@@G@@9*@B4#9*)B4 9(@B4B^@0B4DA])B4E]^@B5G*@@B4S/,)]Q3C@@B4T%@@B4U/K@]UHC@KB4NPK )@@G@@C@!@@MC80@@I%@.@@N'=@@@)G@)B4[[@)B4K[@)B5CC@KB4M&;K@@[C8@@@[C@.@@@[@0B5DPL )@@G@@ @@B5I @@B5H @@B5JN@0B4L8K0]SV8K0]SX/K@]S?8K0]SZ/K@]S&K80@@[%[H@@[/K@]S!PM )@@G@@G8@@@[/VH)@@C@0@@K8K0]SZ]^@B5HK80@@[%[H@@[/K@]S!G8@@@[C@0@@K]^@B5JC[K@@GPN )@@G@@C[@B5DH9@@@[;D@@@[G[@B5C[[@B4KC@)B5D/=)]S'/)0]S8C[@B6Y/K@]S/C[@B6Z/K@]S/PO )@@G@@/)0]TFC[@B6)[[@B4JC9@B57[ @B59C[@@@GT9@@@IG[@B6-[D@B59C9@@@<[X@B4IC8@B4FPP )@@G@@'=@@@#*4@B4I/K@]UF @@@@K/K@]TGC9@@@[C@@B5IT8@@@IG8FK@@[^@B59C@@B5IG@@@@LPQ )@@G@@[@@B5IT9K@@I[DKB59C8@@@H/[@]TUC@@B59[@@B4JC8@@@C[W@B4IC8@B4F'=@@@#*4@B4IPR )@@G@@/K@]UD*@@B5J/K@]T*C8@@@[C@.)@[[@0B5D*@@B5H/K@]S?8K0]SZ/K@]S&C@KB4N'=@@@?PS )@@G@@[@H@@AC@H@@#G@H@@[C@)B5;[@!@@[[@:K@[H@@@@I[@H@@#[@FK@]C@!@@S)@:K@#[@.@@SPT )@@G@@C8@@@C[W@B4IC8@@@W[C@B4JC@@B4[[@@B4K[^KB4JC8@B4F'=@@@#*4@B4I/K@]UB9?@B4#PU )@@G@@9?)B4 9!@B4BR])B4EN@0B4D/KF@@AC@@B6X/K@]UIC@@B6+/K@]UIC@@B6G8@@@[!8@@@#/K@]VF[@FK@][@@B6>T8@@@UG8@B6GR])@@G9?FK@@9*@B7U9*E@@@PX )@@G@@9*E@@A9?FK@[9*E@@CC8;K@#[@'@@O[^'@@^C8@B7U'=@@[GC4@B7)/@@]VX;G@@[C9*E@@GPY )@@G@@C8E@@A'=@@[ /^)]V-C@E@@K[@E@@ C8@@@W[CE@@^C8@@@K[WE@@#C8E@@@'=@@@#*4E@@#PZ )@@G@@/K@]V:C@J@@[[@E@@SG@J@@#[@E@@RC@J@@Q[@E@@Q9?@B7=9?)B7&9!@B7*N@0B7%R])B7 @@@@G2@E)@@/K@]VPP')@@UC@@B6>H@@@[[[@FK@]/K@]U/K@]V:/K@]V\9?FK@[9*@B8G9?FK@@9*@B8BC@@B9]/K@]V29?FK@@9*@B8MC@@B9#QD )@@G@@/K@]V29?FK@@9*@B8QC@@B9^ @E@@@C@VK@]%@KB6>/K@]VQH8K@@[[@KB6>/K@]VQA])B7/K@]W !@@B6>/K@]W7T8@@@UQF )@@G@@G8@B6GR])@@G(@E@@@/K@]W7C@'@@OC@FK@[/@@]W_/G@]W_C@VK@]/@K]W_/GK]W_?@K@@GQG )@@G@@/K@]W_:@U@@S/K@]WR!@U@@S/K@]W_H@K@@GG8K@@[T@Z@@N[CU@@^C8VK@#[^U@@^/=@]W>QH )@@G@@C8K@@<[WU@@#C@U@@^[@KB7?C@KB9 [@U@@^/K@]W$C8K@@K[WU@@#C@U@@KG@Z@@MH8@@@[QI )@@G@@;C@@@[G@K@@G[@U@@ C8E@@@'=@@@#*4E@@#/K@]X[R])B7<9?@B7=9?)B7&9!@B7*N@0B7%QJ )@@G@@/KF@@AC@@B9A'=@@@IR])B7<9?@B7=9?)B7&9!@B7*N@0B7%/KFK@^C@@B9B/K@]W8C@@B9CQK )@@G@@/K@]W8A])B7<9*@B7=9*)B7&9(@B7*^@0B7%C@FK@@/@@]X9/G@]X9:@@B6>/K@]XJ!@@B6>QL )@@G@@/K@]X9T8@@@UG8@B6GR])@@G(@E@@@/K@]X9C@'@@OC8FK@#[^E@@MC@J@@OG@E@@KC@VK@[QM )@@G@@H8K@@[T@U@@Q;GK@@=W8K@@WG@@@@H[@E@@ C@VK@]H@VK@[G8K@@[[@U@@ST@U@@Q[CU@@^QN )@@G@@[CU@@MC8VK@#[^U@@^C@U@@QT@U@@R;GK@@=W8K@@W[^U@@P CE@@PC8K@@K[WU@@#C@Z@@]QO )@@G@@[@U@@TR])B7<9?@B7=9?)B7&9!@B7*N@0B7%/KF@@AC@@B9D'=@@@IR])B7<9?@B7=9?)B7&QP )@@G@@9!@B7*N@0B7%/KFK@^A])B7<9*@B7=9*)B7&9(@B7*^@0B7%C@FK@@/@@]Y'/G@]Y':@@B6>QQ )@@G@@/K@]YH!@@B6>/K@]Y'T8@@@UG8@B6GR])@@G(@E@@@/K@]Y'C@E@@T/@@]Y4H8@@@[[@E@@TQR )@@G@@C@'@@OC8:K@[&;)@@[(CE@@P/K@]Y%CCE@@PL@E@@QE@K@@HG^U@@M&#U@@QH8@@@[[CE@@PQS )@@G@@N@U@@SM#!)@@R])B7<9?@B7=9?)B7&9!@B7*N@0B7%/KF@@ C8E@@@'=@@@#*4E@@#/K@]Z]QT )@@G@@C@E@@ G^E@@P[@E@@ C@E@@Q[CE@@P/K@]YVR])B7<9?@B7=9?)B7&9!@B7*N@0B7%/KFK@]QU )@@G@@C@@B9E'=@@@IR])B7<9?@B7=9?)B7&9!@B7*N@0B7%/KFK@#9?E@@@9*@B70C4E@@#[@@B7'QV )@@G@@/,0AK6@@@B70@@@B7'@@@B7;]ZE]ZE/K@]Y/A])B7<9*@B7=9*)B7&9(@B7*^@0B7%C@FK@@QW )@@G@@/@@]Z(/G@]Z(:@@B6>/K@]ZS!@@B6>/K@]Z(T8@@@UG8@B6GR])@@G(@E@@@/K@]Z( @E@@@QX )@@G@@C@FK@@%@@B6>/K@]ZR])B7<9?@B7=9?)B7&9!@B7*N@0B7%/KF@@#C@@B9FQY )@@G@@'=@@@IR])B7<9?@B7=9?)B7&9!@B7*N@0B7%/KFK@[9?FK@@9/@B9\/K@]Z6C@@B91[@FK@@QZ )@@G@@9*@B9G9?FK@[9/@B9\/K@]Z/C@@B92[@FK@[9*@B9I9?FK@]9*@B9MC8@B9G'=@@[ /^)]) RA )@@G@@C@@B9Q[@FK@#/KF@@A/KI]) /K@])F/K@])H/K@])J/KFK@^/K@])LC@@B93/K@])MC@@B94RB )@@G@@/K@])MC@@B95/K@])MC@@B96'=@@@I/KFK@^C@@B'#[@@B97;O@@@=W/@@@A[@@B98T/@@@ARC )@@G@@H@@B'#(@@@@G/K@]))C/@@@[G@@B98[@@B98C/@__"G@@B98R@KB9;Q@KB'][@@@[^C@@B9/RD )@@G@@[@[)@@8L@])>C/)@@[[@)B9'N@0])?/K@]-<@[KB9_C/@@@[H@@B9']@@@@@N@0])2/K@]-C8FK@@[@@B'MC@VK@[[@KB'K/K@]+CC8@@@#/\K]<>RU )@@G@@C@VK@@[@KB'J/K@]+HC8@@@]/\K]<>C8FK@@[^@]+X/K@]+WC8@@@#/\K]<>C@VK@@[@KB'LRV )@@G@@/K@]+-C8@@@#/\K]<>C8FK@@[^@]C8FK@@[^@]A3@B'X @@B'WC@FK@C[@@B'ZR#FK@#AF@B'YR#F@@[AF@B')R#F@@]AB@B')SB )@@G@@R#FK@^AF@B'-T8@@@WAF@B'YR#FK@AAB@B'-R#F@@ AB@B'+R#@B'&AF@B'+AF@B'QR]0B'T/KF@@ER]0B'T/KF@@BR;@B'UA]0B'T/,0@.@R]0B'T/KF@@[R;@B'USD )@@G@@A]0B'TR#V@@]ABKB'+C@)B'$[^K]>>C^0B'-H/0@@[[@\@@@8#0]>>/,0@;V/K@]>1/K@]>3SE )@@G@@R]0B'TC@KB'*:@KB'=/K@]>50@@B'=/K@]>Z/KF@@^R]0B'T/KF@@@R]0B'T/KF@@[C@@B'(SF )@@G@@'=@@@I/KFK@@ ***** SDFFILE INPUT IS A PROGRAM FILE, NOT A DATA FILE. SG )@@G@@C9K@@V(4@B'"/K@]$QC@KB;]G8K@@[[@KB;]RJKB'%/^K]&" @@B'!R;)]&VR;@@@KB'! @@B'.RB@B':AB@B'/SL )@@G@@P;K@@[AJKB'%9?@B'/RB:@@@&;)@@[NKKB'?DG0B'?:80@@A8KK]$B9?/)@@')HB',A#")@@SM )@@G@@8KK]$BOJKB'?/CK]$LO;K@@ADG0B'?%80@@AP;@@@[9*@B'/C[KB'![[VK@[/[V@@^/KF@@]SN )@@G@@[5KB'!/K@]$M[-KB'!/K@]$M[!KB'!/K@]$MC@@@@HG@@B;]H8@@@[[@@B;#[@KB;@A]0B'_SO )@@G@@CKKB'%[@KB; CGKB'%[@KB;AC^KB':[@K]$!/,0]#-@@@B;[@@@B;]@@@B;#@@@B;^@@@@@@SP )@@G@@@@@B;A@@@B; ______C9K@@VR]0B'_C@KB;@/K@]&; G@B'%/KF@@[ G@B'% 4@B'" @@B'!SQ )@@G@@ @@B;[ @@B;] @@B;^C9K@@V9?FK@@9*@B;B9*@B'4R;@B;B'=@@[GR7@B;H/@@]*-!8@@@KSR )@@G@@/K@]*-RBV@@[ABKB':R#VK@]AFKB':R#;K@#AN0B'%;O0@@=W80@@AAN0B'?H9@@@A[H@B'?SS )@@G@@C[FK@^/[@]*V/\)]&G/@@]*U:8@@@[/K@]*N%8@@@^[>KB'!8^@]*N[5KB'"C[KB'![[VK@ ST )@@G@@ @@B'!/[V@@C/KF@@A[-KB'!/K@]*WC/@__"G@FK@BC/)__"G@:K@EC[@CA(G.@__;C[)CA%SU )@@G@@G.)__;R@KCA(C]@CA(G"@__9R@)CA%C])CA%G")__9R@0CA?C#@CA?G_@__'R[@CA!C#)CA!SV )@@G@@G_)__9R[KCA:[#)CA\C#)CA,G_)__'[@@CA0[@)CA1[[@CA2[[)CA3[]@CA4[])CA5[#@CA6SW )@@G@@[#)CA7/,0AU@@@@B/>@@@B/L/K@]8G/K@]8G@[CCA&/,0AD2@@@B/$@@@CAA@[DCA&*@@@@@SX )@@G@@/K@]6G @@B/M/,0AU@@@@B/0@@@B/M/K@]8G/K@]%]@[HCA&/,0AT4@@@B/2@@@B/N@@@B/OSY )@@G@@@@@B/O/K@]8G@[ICA&/,0AD'@@@CAB@[JCA&C@@B/M;@@@@CA&R[)CACN.@@@#C@@CAE[@A$;Q8L@]%BTC )@@G@@/,0AT4@@@B.F@@@B/R@@@B/S@@@B/S/K@]%T@[?CA&C@@CAF[@@B;RC@)CAG[@)B;SC[@CAHTD )@@G@@[[@B;TC[)CAI[[)B;U/,0[+1@@[B.L@[3CA&C.)@@[*@^@@@C9)@@@R[)CACN.@@@#[[)CA8TE )@@G@@C8A$;Q'^K[/;8L@]%+'^@[/_C@[@@@G/@@@[[@@B/TG/@@@[[@@CA9/,0AD'@@@CA9@[/CA&TF )@@G@@/,0[+1@@[B.S@[.CA&'^@[/_C/@__.G@@B/T(@[@@@/K@]:)]!+C[?@@^[[)B;MC]G@@ []@B;NTU )@@G@@/,0[+1@@[B"[@#:CA&@@KB/UR[0CACN.K@@[C8B$;L'^K[/;8LK]!*C8A@@^'^K[/;@@Q@@ TV )@@G@@@@KB/V@@KB/WR[0CACN.K@@[C8B$;J'^K[/;8LK]!2'^@[/_O.)@@A8L@]!C/K@],@/,0AD'TW )@@G@@@@@CAN@#_CA&/,0[+1@@[B.H@^@CA&'^@[/_C/@@@[C@-@@@H@+@@@*@@@@IC8@@@@C/)@@[TX )@@G@@C[]@@@H[ @@@*@@@@KC8)@@@+@@@@IC/)@@[*@[@@@C8)@@@C@@@@H+@@@@I/=K],-/,0AD'TY )@@G@@@@@CAN@^ CA&C/@@@[H@@@@@(@@@@G/K@],X/,0[+1@@[B"A@^CCA&'^@[/_/K@],-/,0[+1TZ )@@G@@@@[B"N@^HCA&'^@[/_/,0AD'@@@CAA@^NCA&/,0[+1@@[B"-@^OCA&'^@[/_C/@@@[(@[@@@UA )@@G@@C8@@@@C/)@@[(@#@@@C8)@@@)@@@@IC/)@@[(@]@@@C8)@@@C@@@@H)@@@@I/=K],./,0AD'UB )@@G@@@@@CAA@^TCA&/,0[+1@@[B"$@^UCA&'^@[/_/K@]1W(@[@@@/K@]\GC@[@@@G/@@@[[@@B/TUC )@@G@@R[0B/TO[0CA4C@$@@ [@)B/UC[@CAS[[@B;OC[)CAT[[)B;PC]@CAU[]@B;QC@]@@@G/@@@[UD )@@G@@(@]@@@/K@]\W[@@B/T[@@B/UR[)B/TO[)CA5C@&@@ [@)B/UC[@CAV[[@B;OC[)CAW[[)B;PUE )@@G@@C]@CAX[]@B;Q*@#@@@/K@]0IC@@CAJ[@@B;KC@)CAK[@)B;LD[@B/U/D@]\&*@@@@K/K@]\%UF )@@G@@C[@CAL[[@B;KC[)CAM[[)B;LE@@B/U[@@CA8C^@CA8[@@B/U;@@@@@C]CA&R[0CACN.@@@HC8B$;U'^K[/;8L@]4R'^@[/_/K@]4^/,0AU@@@@C[$VF )@@G@@@@@B/Z/K@]8G/K@]8G@CFCA&C/@__"G@@B/LC_)@@[[@@@[^[#)B/QC/@@@[H@@B/QT/@@@IVG )@@G@@]@@B/)R[)B/ZO[)B/)(@AD_U/K@]42G_)@@[8L@]4&/K@]58/,0AD2@@@C[(@@@CAA@CQCA&VH )@@G@@C/@@@[[@@B/PR[0B/ZC/@@@$G@@B/PC@)B/L[@)B/-[@@CA8A[0CA9C@@CA8H@@B/-*@@@@GVI )@@G@@1@@@@G/K@]5AC@@CA8[@@B/-C/@@@[[@@B/+C@)B/-H@)B/PC#)B/P[@)@[^[@)CA8[#)B/QVJ )@@G@@R[)B/+C@@B/Q[@AB;*C/)@@[G@)B/+[@)B/+G_)@@[8L@]5HC[@CA8G.@@@#[[@CA"/,0AD'VK )@@G@@@@@CA"@C=CA&/,0[+1@@[C[1@C>CA&'^@[/_R[0CA9N8RD_U^^K]5(C@@CA8G/@@@[[@@CA8VL )@@G@@/,0]B8@@@CA8@@@B;(@@@]5(@@@@@@@@@B/P@C*CA&C@@B/-H@@B/L(@@@@G/K@]58/,0AE[VM )@@G@@@@@CA<@C:CA&C/@@@*G@@B/P[@@B/P/K@]48C/@@@[C/)@@^H@)@@@*@@@@IC8@@@@C/)@@[VN )@@G@@*@ @@@C8)@@@)@)@@G/=0]6D/,0AD'@@@CA)@C1CA&/,0[+1@@[C[2@C2CA&'^@[/_N@0]6FVO )@@G@@/K@]8M@C6CA&C/@@@^H@@@@@(@@@@G/K@]7;C/@@@[H@@@@@(@@@@G/K@]72C@@CA/;O@@@=VP )@@G@@W@@CA;[@@B/@D]CA&@@K@@@@@KB/<'^@[/_/K@]62/,0[+1@@[C#[@DDCA&'^@[/_/K@]62/,0[+1VR )@@G@@@@[C#K@DICA&@@K@@@'^@[/_C@@CA/;O@@@=W@@CA;[@KB/=(@@B/=/K@]6"/,0[+1@@[C#%VS )@@G@@@DQCA&@@K@@@@@KB/='^@[/_C/@@@[H@@@@@(@@@@G/K@]7M/,0AD'@@@CAN@DYCA&C/@@@]VT )@@G@@H@@@@@(@@@@G/K@]7I/,0[+1@@[C^[@D-CA&'^@[/_/K@]7M/,0[+1@@[C^I@D&CA&'^@[/_VU )@@G@@C/@@@[C/)@@#H@)@@@*@@@@IC8@@@@C/)@@[*@@@@@C8)@@@)@@@@I/=K]7H8@@@[;O@@@=W8@@@AG@@CB=WU )@@G@@[^@CB%H8K@@ #^KCB:R@KCB%R@)CB:C[3@@#C[^)@@:90@@E/K@]_4:90@@A/K@]_4/[@#@]WV )@@G@@ @@@@ @@CB( @@CB*/D@]/XE[@@@KC9K@@-[[KCB(:90@@#/K@]/=:90@@]/K@]"0:90@@ WW )@@G@@/K@]_\/K@]"AC[)CB>*@#@@^H9)@@[*@@CB(H9)@@[D@#@@^/@@]/,G8@@@]&;@@@[[@@@@ WX )@@G@@R#)CDAN8K@@(![@CCP/K@]/4Q;)@@@N8K@[H5[I*B2O;)@@[&;)@@@H8)@@$%90@@#/K@]"1WY )@@G@@C@#@@ G@#@@^G@)@@GL/)@@[?[)@@J/K@#@G/G)#@C?8)@@D/K@].PH8)@@CH@@@@IH[)@@IWZ )@@G@@H8)@@[C9K@@0')]<@-/(K].G8#)].C/K@].PC9K@@.')]<@- @@@@ 8#)].B/K@].P"D@CB2XA )@@G@@/K@].R"D@CC"H8@@@&!8@@@$/K@].NG8@@@&/G@].L"DGCB2"[@CDB"[@CDC"K0@@K/V@@@@XB )@@G@@;-J@@D:90@@]/K@]_Q;P@@@=W9@@@EG9K@@0')]<@-/(K].(/[@].?8^)].-/K@#@EC9K@@.XC )@@G@@ @@@@ /K@].=(@@@@ /K@].4C9K@@0/K@].2')]<@-/(K].(8^)].0/K@#@GC[KCB(/[K].'XD )@@G@@')]<@-/K@].'C9K@@ ')]<@-8^)].8*@@CB*/K@]_*O80@@A8K0];"R@KCC_R@)CD@R@0CD[XE )@@G@@R[@CD]R[KCD#9!)CD^/KF@@D/K@]/,C/@__;C8K@@#G@N@@^,@@@@I/K@]"YC@#@@^H@@@@IXF )@@G@@0@@@@G @@@@GG@)@@G/^@]"PC9K@@.')]<@-/K@]"S]@@@@ O9K@@]&9K@@[C[)CB>H9)@@[XG )@@G@@(@@CB(/K@].[H9)@@[/K@]/.C90@@]/K@]"3C9K@@1')]#@)C[KCB(/[K]">')]<@-R@KCB%XH )@@G@@R@)CB:C9K@@4')]<@-C9K@@0')]<@-C9K@@+')]<@-C9K@@.')]<@-/K@]../K@]/,%90@@]XI )@@G@@/K@]"B[@)CBH8@@@#*@@CB(H8@@@[![)@@G/K@#@G[[@@[[E[@@@IXJ )@@G@@;P@@@=W9@@@EG9K@@0')]<@-K9@@@0')]<@-C9K@@+0@@CBH[<@@^H9)@@#*@@CB(XM )@@G@@H9)@@[/K@].4C9K@@1')]#@)[[KCB*/K@]_WC[@CB*@@CB(H9)@@[/D)].-/K@#@GC[K@@KC@@CB>L8@@@A!8@@@AC8@@@ ;[WSB?XO )@@G@@')]<@-;[K@@A8#@]_'/GK]..C9K@@ ')]<@-8#K]__/K@]..C@KCB>/H@]_"C9K@@0')]<@-XP )@@G@@8#K]_"/K@].. @@@@K/K@].-:90@@^/K@]")R@KCB%R@)CB:C@FK@^H@@@[#H8@@@[;O@@@=XQ )@@G@@W8@@@=G8FK@BC9@@@[;[H@@[)[G@@@[[W@@@C9@@@[G[FK@A[[FK@AC9K@@*C[)CB>')]<@-XR )@@G@@8^)#@X/K@]..[5L@@[[-L@@@[>L@@@[(L@@@[!L@@@[1L@@@'^@#@$@@@@@@[5L)@@Q8)@@@XS )@@G@@/K@N@$R@KCGF/,0 "M@@@CF)@@@CE]@@@CD\@@@CD\@@@CD\@[DCGCC/@@@[*@@@@@ @@@@GXT )@@G@@C/)@@[C.@@@[H[@@@@*@@@@K @@@@I+@@@@IC/)@@[C.@@@[H[@@@@(@@@@K @@@@I;^@@@=XU )@@G@@)@@@@I/=K#E9R@)CF-N.@@@HC@@CF+[@]*DC8L@#[AC@)CF<[C)CDDC[@@@@;D@@@SC[KCDDXV )@@G@@;-K@@Y;H@@@G;[K@@M[[KCDDC[@CF=[[@CDE/,0AB0@@@CDD@@@CF>@@@CEA@[QCGCC/@@@LXW )@@G@@[@@CD1C/)@@^H@)@@@(@@@@I/K@#[\C/)@NVC@0CDF;G)@@G;@0@@S[@0CDFC/)ARS[C)CDGXX )@@G@@/,0]FE@@@@@@@@@CDD@@@CF&@@@CF$@@@CEC@[WCGCC/@@@V[@@CD1C/@@@[H@@@@@(@@@@GXY )@@G@@/K@#]DC@@@@@T/@@@#N8WCD+^^K#[_N8WCD)^^K#[;[@@CGG/,0AB8@@@#[;@@@CF*@@@CDDXZ )@@G@@@@@CD1@@@#[_@[-CGCR@)CGGC@]CD+G@@CD1[@@CD1C/)@@^H@)@@@(@@@@I/K@#^NC/@@@[YA )@@G@@H@@@@@(@@@@G/K@#]@@@CF*@@@CDDZC )@@G@@@@@CF8@@@CF%@#OCGC/,0]FE@@@CD;@@@CDD@@@CF9@@@CF6@@@CF*@#PCGC/,0AB0@@@CDDZD )@@G@@@@@CF'@@@CE*@#QCGC/,0]FE@@@CD/@@@CDD@@@CF;@@@CF6@@@CF*@#RCGC/,0AB0@@@CDDZE )@@G@@@@@CF/@@@CE%@#SCGC/K@#CP/,0AB8@@@CE?@@@CF*@@@CDD@@@CF\@@@CF)@#VCGC/,0]FEZF )@@G@@@@@CD9@@@CDD@@@CF&@@@CF6@@@CF*@#WCGC/,0AB0@@@CDD@@@CF.@@@CE\@#XCGC/,0]FEZG )@@G@@@@@CD'@@@CDD@@@CF8@@@CF6@@@CF*@#YCGC/,0AB0@@@CDD@@@CF"@@@CE1@#ZCGC/,0 "MZH )@@G@@@@@CF)@@@CE3@@@CF!@@@CDD@@@CD\@#-CGC/,0[+*@@[CE^@#+CGCR@)CF-N.@@@HC8]*DCZI )@@G@@'^K[/;8L@#C-'^@[/_C/@@@[G@@@@@[@@@@@(@[@@@/K@#E9 @@CD7C/@@@[[@@CD.C@)CF_ZJ )@@G@@[@)CD"C.@__"G[@@@@C_)@@[R@)CGF[[@@[^[#)CD_C/@@@[C@+@@[H@)CF+*@@@@I @@@@GZK )@@G@@C/)@@[C[]@@@H[@CF+*@@@@K @@@@I+@@@@I/=K#E[C/@@@[G@@CD7[@@CD7R@0CD7;@@@@@^9CGCC/@@@L[@@CD1C/)@@[H@)@@@(@@@@IZW )@@G@@/K@#G-C/)@@^H@)@@@(@@@@I/K@#F%/,0AB8@@@@@@@@@CF*@@@CDD@@@CF\@@@CG[@^_CGCZX )@@G@@C/@@@Y[@@CD1C_)@@WN.@@@F[#)CD0/,0ABT@@@CDD@@@CD0@@@CE@@ ^CGCC@@CE@H@@CF+ZY )@@G@@*@@@@G/K@#G-C/@@@[H@@CD1]@@CD1G_)__"8L@#FU/K@#G-C_)@@[N.@@@F[#)CD0/,0ABTZZ )@@G@@@@@D9[@@@CD0@@@CE@@ JCGCC@@CE@H@@CF+(@@@@G/K@#G@/,0AB0@@@CDD@@@CD1@@@CE@AA )@@G@@@ MCGCC/@@@[G@@CD1[@@CD1G_)@@[8L@#F?/,0AB0@@@CDD@@@CD1@@@CFG@ RCGCC/@@@[AB )@@G@@G@@CD1[@@CD1C_)@@[N.@@@F[#)CD0/,0ABT@@@D9#@@@CD0@@@CE@@ WCGCC@@CE@H@@CF+AC )@@G@@(@@@@G/K@#GY/,0AB0@@@CDD@@@CD1@@@CE@@ ZCGCC/@@@[G@@CD1[@@CD1G_)@@[8L@#GEAD )@@G@@C/@@@[G@@CD1[@@CD1/,0AT4@@@CFI@@@CE[@@@CD\@@@CD\/K@#G3@ &CGCR@0CE[N8ND_UAE )@@G@@^^K#G?/,0AB8@@@#G?@@@CF*@@@CDD@@@CD1@@@CG]@ $CGC/K@#H,/,0AB8@@@CFK@@@CF*AF )@@G@@@@@CDD@@@CD1@@@CG#@ %CGCC/@@@CG@@CD1[@@CD1G/@@@][@@CGG/,0]FE@@@@@@@@@CDDAG )@@G@@@@@CGG@@@CF6@@@CF*@ ?CGCC/@@@#G@@CD1[@@CD1/,0AB8@@@CFN@@@CF*@@@CDD@@@CD1AH )@@G@@@@@CG^@ ,CGCC/@@@SG@@CD1[@@CD1/,0AB8@@@@@@@@@CF*@@@CDD@@@CD1@@@CG @ 0CGCAI )@@G@@C/@@@]G@@CD1[@@CD1/,0AB8@@@CFS@@@CF*@@@CDD@@@CD1@@@CF(@ 2CGCC/@@@^G@@CD1AJ )@@G@@[@@CD1/,0AB8@@@@@@@@@CF*@@@CDD@@@CD1@@@CG#@ 4CGC/,0[+*@@[CE^@ 6CGCR[@CF-AK )@@G@@N.@@@HC8^*DC'^K[/;8L@#H3'^@[/_C/@@@[G@@@@@[@@@@@/,0 "M@@@CF)@@@CFU@@@CF!AL )@@G@@@@@CDD@@@CD\@ .CGC/,0 "M@@@CF)@@@CFW@@@CD\@@@CD\@@@CD\@ "CGC/,0 "M@@@CF)AM )@@G@@@@@CFY@@@CD\@@@CD\@@@CD\@ _CGCN@0#IL/K@#IM@A@CGCR]0CGD9!)CGJ9,@CGL9,)CGNAN )@@G@@9\@CGP9\)CGRR@KCGTR@)CGUR@0CGVR[@CGWN[@CGXN[KCGY*4@SGA/K@SGA/K@[8^AA0CGDAO )@@G@@9()CGJ9%@CGL9%)CGN9:@CGP9:)CGRA@KCGTA@)CGUA@0CGVA[@CGW^[@CGX^[KCGYC8FK@@AP )@@G@@[^@#FC[^@#^%[^@#[3[^@#FG[^@#]A[^@#[W[^@#],[^@##3[^@#@8[^@#[0C8FK@[[^@#A+AQ )@@G@@C8FK@][^@##@[^@#]*C8FK@#[^@##J[^@##F[^@##D[^@#]=C8FK@^[^@#A'[^@#A1[^@#A,AR )@@G@@[^@#A8[^@#^E[^@##8C8FK@ [@@CGFC8FK@A[^@#[$[^@#C0C8FK@B[^@#H*C8FK@C[^@#@"AS )@@G@@[^@#H@C8FK@D[^@#FKC8FK@E[^@# \[^@# AC@VK@F[@KCGHC8FK@G[^@#]U[^@#]E[^@#A4AT )@@G@@C8FK@H[^@#[F[^@#HO[^@#EJ[@@CGIC8FK@I[^@#H8[^@#E8[^@#E7[^@#C&[^@#^*[^@# =AU )@@G@@[^@#H9[^@#A-[^@#A)[^@#^$[^@# >[^@#C$C8FK@J[^@#@4/K@#@:C/@@@BH@FK@@]@@CGZAV )@@G@@C/)@@]H@:K@@]@)CG)C[FK@@[[@CG-C5)CG1[5)CG+C1)CG1[5)CG< @@CG=C[:K@[[[)CG>AW )@@G@@N@0#K^/K@#K"@[ECG, @@CG&C/@@@[G@@CG=[@@CG=C/)@@[H@)CG2]@)CG$C.@__"G[@CG3AX )@@G@@[[@@[^C/@@@[G@@CG&[@@CG&C@)CG$G@)CGZ[@)CG4/,0AB0@@@@@@@@@CG4@@@CG+@[OCG,AY )@@G@@C@@CG$G@@CGZG/@@@[[@@CG4/,0AB0@@@@@@@@@CG4@@@CG<@[PCG,C@@CG$G@@CG)[@@CG4AZ )@@G@@/,0]FE@@@CG=@@@@@@@@@CG4@@@CG(@@@CG%@[QCG,C@@CG$G@@CG-[@@CG4/,0]FE@@@CG&BA )@@G@@@@@@@@@@@CG4@@@CG:@@@CG%@[RCG,C@@CG$G@@CG>[@@CG$8L@#KJN@0#K./K@#K"@[SCG,BB )@@G@@R]0CG\9!)CG5N[@CG7*4@SG?/K@SG?/K@[8^AA0CG\[^@CG?9()CG5^[@CG7/KH@@@C8@@@ BC )@@G@@/\K#L^C@VK@][@KCG1C@VK@#[@KCG3/K@#J3C8@@@#/\K#L^C8FK@@[^@#KZ[^@#K2[^@#K*BD )@@G@@[^@#KQC@VK@[[@KCG2/K@#K @@CG8N@0#LX/K@#LY@[ CG;*4@SG9/K@SG9/K@[8^AA0CG/BE )@@G@@/K@#LU/K@#S=/,0AT4@@@CJ@@@@CIZ@@@CI-@@@CI-/K@#Y:@[SCN1C/@@@EG@@CIZ[@@CI+BF )@@G@@/,0AT4@@@CJ]@@@CI<@@@CI-@@@CI-/K@#Y:@[UCN1R@KCI(@@@@I/K@#MJ/,0[+1@@[CND@[>CN1'^@[/_/K@#O!R@KD*5R@)CIQ@KCI<[[)@[^C8[(_U'^K[/;BO )@@G@@8L@#NS'^@[/_/,0^G)@@@CI:/K@#O!@]@CN1R@)D*5N8MD_U^^K#N=/,0^K)@@@#N=@@@CI>BP )@@G@@@@@CG"@][CN1D@@CG"/=@#N,/,0^U4@@@CN&@]^CN1/K@#O!C/@@@[G@@CI>[@@CI?C/)@@[BQ )@@G@@C.@@@[H[@D*!(@@@@K @@@@IC.@@@[C.)@@[H[)CI**@@@@M @@@@K+@)@@K/=0#OHRA0CI?BR )@@G@@$'0@@G8];#O['^@[72@]DCN1/K@#OX/K@#O>/K@#OX/K@#R^/K@#O_/K@#P /K@#P /K@#OXBS )@@G@@/K@#OX/K@#RH/K@#OXRA0CI?$'0@@G8];#OL'^@[72@]ECN1/K@#OX/K@#PF/K@#PK/K@#PPBT )@@G@@/K@#PK/K@#PK/K@#PK/K@#PK/K@#PK/K@#PK/K@#PK/,0^U4@@@CN&@]FCN1/,0[+1@@[CKSBU )@@G@@@]GCN1'^@[/_/K@#O!/,0[+1@@[CK>@]JCN1'^@[/_/,0[+1@@[CK,@]LCN1'^@[/_R@KD*5BV )@@G@@N8LD_U^^K#O1/,0^L @@@#O1@@@CI>@@@CG"@]NCN1/,0[+1@@[CK5@]OCN1'^@[/_ @@@@@BW )@@G@@C/@@@[[@@@@@N@0#O"/K@#Y5@]SCN1/,0 IR@@@CN&@]TCN1/,0#4R@]UCN1/K@#O(/,0 IRBX )@@G@@@@@CN&@]WCN1/,0#4R@]XCN1/K@#O>/,0[+1@@[CND@]ZCN1'^@[/_/K@#O>/,0[+1@@[CNDBY )@@G@@@]+CN1'^@[/_/K@#O!C/@@@[H@@CI*/C@#PU*@@@@G/K@#OXR@)D*5C@]D_W;)@@@S;C@@@SBZ )@@G@@G/@_''*@@@@G/K@#P7C/@@@#G@@D*5[@@CI!C/)@@GG@)D*5[@)CI,H@@CI,R@KCI!]@@@[^CA )@@G@@A@KCI\C@[D_UH@@CN$*@@@@G/K@#P7O/K@@[8L@#P%C@]D_$;C@@@SG/@_''*@@@@G/K@#P7CB )@@G@@/K@#Q8 @@CI0C_)@@[N.@@@"[#)CI\R@KCIQ@K@@GN.@@@HCH )@@G@@C@[(_T[@]*IJ8L@#Q"C/)@@][@)CI*/K@#N)/,0 IR@@@CN(@#RCN1/,0[+1@@[CJH@#SCN1CI )@@G@@'^@[/_/K@#Q(/K@#O!R@KCI&R@)D*5N8LD_U^^K#RUN8MD_U^^K#RO/,0#*;@@@#RO@@@D*8CJ )@@G@@@@@CG_@@@CN%@@@CH:@@@CI2@@@#RU@#YCN1R@KCI&(@@CI2/K@#R$N8LD_U^^K#R+/,0#)ACK )@@G@@@@@#R+@@@CG_@@@CN%@#-CN1/K@#RGC@@CH?[@@CI3/,0[+1@@[CJT@#=CN1R@)CN*N.@@@HCL )@@G@@C8]*IJ'^K[/;8L@#R,'^@[/_(@@CH!/K@#R/ @@@@@/,0^U4@@@CN&@#,CN1/,0[+1@@[CLNCM )@@G@@@#\CN1'^@[/_ @@CI4C@@CH3H@@CN:*@@@@G/K@#S#C/@@@[[@@CI4C@@CH3H@@CN?*@@@@GCN )@@G@@/K@#SDC/@@@][@@CI4*@@CI4/K@#SN @@@@@/,0^U4@@@CN&@#9CN1/,0[+1@@[CL&@#'CN1CO )@@G@@'^@[/_(@@@@@/K@#RG/,0[+1@@[CJX@#"CN1@@KCH3@@KCH\@@KCH,@@KCH0@@KCH1@@KCH2CP )@@G@@'^@[/_(@@CI(/K@#S=N@0#SCW )@@G@@@@@CG"@^YCN1C@@CG"/=@#N%RA0CI>$'0@@B8];#T''^@[72@^-CN1/K@#U[/K@#UD/K@#UDCX )@@G@@/K@#U)/K@#U[/K@#UD/,0^U4@@@CN&@^+CN1/,0[+1@@[CML@^(@@@@G/K@#RG/,0[+1@@[CK>@^,CN1'^@[/_/K@#RGR@KD*5R@)CI&DA )@@G@@N8MD_U^^K#U!N8LD_U^^K#U$/,0#*;@@@#U$@@@D*8@@@CHL@@@CN!@@@CH:@@@CI2@@@#U!DB )@@G@@@^1CN1R@)CI&(@@CI2/K@#U'N8MD_U^^K#U5/,0#)A@@@#U5@@@CHL@@@CN!@^4CN1/K@#RGDC )@@G@@C@@CH?H@@CI3(@@@@G/K@#VA/,0^U4@@@CN&@^8CN1/,0[+1@@[CM'@^9CN1'^@[/_/K@#RGDD )@@G@@C@@CH!H@@CI)(@@@@G/K@#VM/,0^U4@@@CN&@^"CN1/,0[+1@@[CMV@^_CN1'^@[/_/K@#RGDE )@@G@@R@KCN*N.K@@DC@[CH![@[*H78LK#VO/,0]N)@@@@@@@ BCN1*@@@@@/K@#RGG_)@@[8L@#T$DF )@@G@@ @@CI8R@)D*5N8MD_U^^K#V@@@CG"@ HCN1C@@CG"/=@#N%RA0CI>DG )@@G@@$'0@@B8];#V!'^@[72@ KCN1/K@#V4/K@#WS/K@#V4/K@#W /K@#V4/K@#WD(@@CI8/K@#V;DH )@@G@@/,0[+1@@[CM0@ MCN1@@KCI8'^@[/_/,0 IR@@@CN&@ PCN1/,0#4R@ QCN1/,0[+1@@[CK>DI )@@G@@@ RCN1'^@[/_/K@#RGC/@@@[G@@CI8[@@CI8/K@#VZ(@@CI8/K@#WK/,0[+1@@[CM0@ XCN1DJ )@@G@@@@KCI8'^@[/_/,0 IR@@@CN(@ )CN1/,0[+1@@[CK>@ -CN1'^@[/_/K@#RG(@@CI8/K@#WZDK )@@G@@/,0[+1@@[CM0@ >CN1@@KCI8'^@[/_/,0 IR@@@CN)@ *CN1/,0#4R@ (CN1R@KD*5C/@@@[DL )@@G@@H@@D*!(@@@@G/K@#W;N8LD_U^^K#W?/,0#4D@@@#W?@@@CI>@@@CG"@ ?CN1C@@CG"/=@#N%DM )@@G@@C/)@@AH@)CI>(@@@@I/K@#W;/,0[+1@@[CJ7@ 1CN1'^@[/_/K@#RGR@)D*5*@@CI8/K@#RGDN )@@G@@N8MD_U^^K#X[/,0^L @@@#X[@@@CI>@@@CG"@ 8CN1C@@CG"/=@#X_C/)@@FH@)CI>*@@@@IDO )@@G@@/K@#X_/,0 IR@@@CN(@ .CN1/,0#4R@ "CN1C/@@@[G@@D*5R@KD*5R@)CN*R@0CN>Q@0@@GDP )@@G@@N.@@@HC@#(_T[@]*I[8L@#XRN8LD_U^^K#XX/,0^L @@@#XX@@@CI>@@@CG"@A^CN1R@)D*5DQ )@@G@@R@0CI< @@D([C@@CG"/=@#N%C/)@@#H@)CI>*@@@@I/K@#PKC@)CN$[@C8FK@A[^@#TKC8FK@B[^@#VSEH )@@G@@[^@#VU[^@#O;[^@#M(/K@#L9*@CO*9*@CO,C8@COR'=@@@U*4@COX/K@#+KC@@CPN'=@@@J0@@@@G/KFK@[EP )@@G@@C8@COR'=@@@UC8@@@RC8K@@Z,4@COX/KFK@[C8@CO*'=@@@#(4@CO:/K@#+WC4@CO:%8@@@ EQ )@@G@@/KFK@[ @@CO4C@@CO4G8@@@][@@CO49?VK@@9*WCO3C8@CO,'=@@@#*4@CO1/KFK@[/KF@@#ER )@@G@@9?@CPO/K@#+]9?@CPL9*@COR9*@CO*/\0#+19?@CPO9*@COR9*@CO*/\0#+1/KF@@#C8@CORES )@@G@@'=@@@U(4@COX/KJ@@@C8@CO*'=@@@#*4@CO:/KFK@[C@@CO4;C@@@[H8@@@[N@K@@GC@@CPQET )@@G@@9?VK@@9/W)@]8KK#+_9/W@@@/KJ@@@/KFK@[C@@D*\/=@#G@@CQ=C@)CQ>G@)CQ<[@@CQ>[@)CQ&C/@@@DG@@CP/[@@CP_C@@CP'H@@CP_*@@@@GFD )@@G@@1@@@@G/K@#='C@@CP'[@@CP_C@@CP.[@@CQ@R@KCQ@O@KCQ+C@-@@][@)CPTG/@@@[[@@CQ@FE )@@G@@C.@@@[[[@CQ[R@KCQ>R/)@@]R@0CQ&N.K@@EA@)CQ]R[@CQ@O[@CQ+A[@CQ$R[@CQ$C4^@@]FF )@@G@@[@@CQ#G/@__Z(@@@@G/K@#&EC/@@@ H@@CQ#*@@@@G/K@#>TR[@CQ$C0^@@][@@CQ#C/@@@GFG )@@G@@H@@CQ#(@@@@G/K@#>;C/@@@AH@@CQ#*@@@@G/K@#&:C@#@@@H@@CQL(@@@@G/K@#>0R[@CQ[FH )@@G@@C@[@@@[@^CP=R[@CQ@O[@CQ+C/)@@[G@)CQ[[@)CQ[C[^@@][[]CPS/K@#&#R[@CQ[C@@CPRFI )@@G@@[@^CP=C@)CPS[@=CP>C.@@@]G[@CQ[[[@CQ[C[)CQM[[+CPS/K@#&#*@[@@@/K@#>>C@[@@@FJ )@@G@@;C@@@>/K@#>0C/@@@[G@@CQ@[@@CQ@O/K@@[O/)@@[O/0@@[8LK#>CFK )@@G@@R[@CQ]R@KCQ@O@KCQ+C@[@@][@^CPSC/)@@[H@)CQ[]@)CQ[H/)__"]@)CQ$/,0[+1@@[CPTFL )@@G@@@]HCQQ@@KCP9R@)CQNN[KCQ$C8]*P='^)[/;8LK#&U'^@[/_C@@CQL[@@CP9C/)@@[G@)CP_FM )@@G@@[@)CP/C.@@@GG[@CP.[[@CP.G_)@@[8L@#=$N@0#&%/K@#&1@]SCQQ/,0AMU@@@CQF@]TCQQFN )@@G@@N@0#&0/K@#&1@]UCQQR]0CQR9!)CQ*9,@CQ%9\)CQ?R@KCQ,R@)CQ\R@0CQ0R[@CQ1N[@CQ2FO )@@G@@N[KCQ3*4@SQO/K@SQO/K@[8^AA0CQR9()CQ*9%@CQ%9:)CQ?A@KCQ,A@)CQ\A@0CQ0A[@CQ1FP )@@G@@^[@CQ2^[KCQ3C8FK@@[@@CQ-C8FK@[[@@CQ)C@VK@][@KCQYC@VK@#[@KCQXC8FK@ [@@CQZFQ )@@G@@C@VK@A[@KCQW/K@#=EC8FK@@[^@#<:[^@#<%[^@#C8FK@[FU )@@G@@[^@#$&C8FK@][^@#$?[^@#$R@KCR5C@[CR%T/@@@ G/@__'[@@CR7G/@@@[FW )@@G@@R@KCR;Q@K@@GR@)CR;Q@)CS[N.@@@^C@[*R][@])@@8L@#*ZN@0#*=/K@#*:@[RCR"/,0AMUFX )@@G@@@@@CR8@[SCR"N@0#*%/K@#*:@[SCR"R]0CR_R@KCS]R@)CS#N[@CS^*4@SR//K@SR//K@[8^FY )@@G@@AA0CR_A@KCS]A@)CS#^[@CS^C8FK@@[@@CS[C8FK@[[^@#*I/K@#*EA@KCS A@)CSAA@0CSBFZ )@@G@@A[@CSCA[KCSDA[)CSE9()CSH9%@CSJ9%)CSL9:@CSN^@0CSF^[@CSGR8;K@]N@;K@#8K0#(EGA )@@G@@R9FK@^&.@@@[C@FK@[[@@CS%R9VK@A&.K@@[ @FK@ C"@@@\C"K@@9/K@#(PO/0@@] @@@[^GB )@@G@@CK<@@@/C)#(VG/)@@[#@)@[^C/)@@[[@)CS(G/)__"T@)CS%G8:K@@[^)CS$C^#@@@LC#@@[GC )@@G@@#@KCS&G/@__";O@@@=W/@@@AT/K@@A[@KCS>G@)@@G[^)CS*R@KCS& @ @@@C*<@@[:/)@@AGD )@@G@@/K@#!X:8)@@E/K@#!X @@CSU @@CSV9%@CSQ9%@CSS @@@@H]@KCSX]@KCSY]@KCSP @@CSZGE )@@G@@ @@CS) @@CSW:/)@@ /K@#%@C/)@@[[@)CSWCC<@@[;O)@@=W/)@@A!@@@@I/K@#:WH@)@@GGF )@@G@@[@)@[[ @@@@MC@)CS*2-,)@@/K@#:WC@K@@IH@KCS$T/K@@A[SP@@@C/K@[@[OP@@@CKN@@@GG )@@G@@[WP)@@[@VK@ @^)@@/K@#%'C(N@@[H.K@@ C[)CSXC[@CS)D@@CSP/C@#%&/[K#!HG@@CS#@@[/D)#%<:.K__.H-#@@[GI )@@G@@[[@CS)9?)CSZ/[K#%8/@)#%8C/K@]V"OK@@I/@0#%8C@@CS,;K@@@]G@@@@K/G0#:D!/@@@>GJ )@@G@@/K@#!C"C\CS\[@=)@@O.K@@[8L@#:N8K0#(OR@KCS R@)CSAR@0CSBR[@CSCR[KCSDR[)CSEGK )@@G@@9!)CSH9,@CSJ9,)CSL9\@CSNN@0CSFN[@CSG/KF@@CE@0@@J?/@__R/K@#!E!/0@@&/K@#:KGL )@@G@@"G\CS\/K@#%8"G)CTPH/0@@&/K@#:IC@@CS(G/@@@[[@@CS(C@@CS%K@@CS$[@KCS$K@@CS*GM )@@G@@[@KCS*/K@#(% @@@@HR@)CS*C[2)@@;!)SS>C@HCS- @@@@Q @@@@R @@@@M(@@@@NC[2)@@GN )@@G@@;!)@@A:.)@@ /K@#?X\]@@@M/K@#:3%.)@@-:.)@@+/K@#?&:.)@@./K@#?S:.)@@E/K@#?+GO )@@G@@/K@#!L @HCSSH.)@@0/ )#:8(@@@@H/]0#:;/:@#?_;,)@@*)])@@M8@K#:@@@GV )@@G@@[[:K@ /K@#:;C.)@G@/K@#!FC.)@F@RCN@@[/K@#!OC.)@ .R@KCSP/K@#!OC/K@@]C9X@@]GW )@@G@@;()@@Y;HK@@Y[P>@@@CD#@@[H[@@@[[T @@@C[@CS([X )@@[[FK@ @^)@@/K@#%'C@@@@[GX )@@G@@;O@@@=W/@@@AT/K@@AR@)CS*9!+)@@;!)SS>8#@#!&/K@#!*[[=)@@/K@#!+;!X@@AC[)CS:GY )@@G@@;HX@@A[[=)@@ @ )@@/K@#%'C@@D([H@@CT3*@@@@G/K@#!./,0 IM@@@CUG@[KCUW/,0[+1GZ )@@G@@@@[CT.@[LCUW@@KD(['^@[/_N@0#!//K@#2(@[PCUWC@@D([[@@CT3C/)@@[H@)@@@[@)CUZHA )@@G@@;O)@@=W/)@@AG/)__"]@)CT6C[@CUZ;P@@@=W.@@[=G.@__"][@CT7 @@CT8C/@@@[H@@CT7HB )@@G@@*@@@@G1@@@@G/K@#,NC/@@@[[@@CT8C/@@@EH@@@@@*@@@@G1@@@@G/K@#,VC/@@@[G@@CT8HC )@@G@@[@@CT8C@@CT7T@@CU)G/@@@]G@@CT8[@@CUZ/,0 IM@@@CUZ@[YCUWC/@@@]H@@CT8*@@@@GHD )@@G@@/K@#,,/,0]O^@@@CTS@@@CUH@@@CUH@@@CUI@@@CUG@[)CUWR@KCUJN.@@@PC@@CUK[@[*TTHE )@@G@@8L@#,0C@)@@@;O)@@=W/)@@EC[@@@IG.@__51@@@@KC/)@@E[@)CT'(@@CT'/K@#\5G/)__"HF )@@G@@C_)@@[[@)@[^[@)CUZ[#)CT9C@@CT9T/@@@EG/@@@N[@@CU-/,0AB8@@@CTS@@@CT9@@@CTUHG )@@G@@@@@CU-@@@CUH@[?CUWG_)@@[8L@#\[C/@@@[H@@CT8*@@@@G/K@#\S/,0AB0@@@CTU@@@CUHHH )@@G@@@@@CUA@[\CUW/,0]N0@@@CTU@[0CUWC_)@@[N[@CUZ[#)CT9C@@CT9T/@@@EG/@@@E[@@CUZHI )@@G@@/,0AB8@@@CTS@@@CUH@@@CTU@@@CUZ@@@CUL@[4CUWG_)@@[8L@#\XC@@CT'T/@@@EH@@@@@HJ )@@G@@(@@@@G/K@#0^C/@@[=H@@@@@/C@#\5*@@@@G/K@#0^C@@CT'T/@@@E[@@CUZG/@@@OC@)CUZHK )@@G@@H@)@@@]@)CUZ[@@CU-/,0AB8@@@CTS@@@CUH@@@CTU@@@CU-@@@CUZ@['CUW/,0AB8@@@CT5HL )@@G@@@@@CUH@@@CTU@@@CUM@@@CUN@[;CUW*@@CT8/K@#0M/,0AB0@@@CTU@@@CUH@@@CUC@[.CUWHM )@@G@@/,0]N0@@@CTU@["CUWC/@@[=C@)@@GH@)@@@1@@@@IC@@@@@C/)__"G@)CU)R@KCUJN.@@@PHN )@@G@@[@@CUZ[@)CU-C@@CUK[@[*TT8L@#0)/,0AB8@@@CT0@@@CUH@@@CTU@@@CUG@@@CUO@]^CUWHO )@@G@@/,0AB0@@@CTU@@@CUP@@@CUE@] CUWC/@@@[[@@CT;C_0@@[N[@CU-[#0CT9C/@@@[H@@CT9HP )@@G@@;O@@@=W/@@@EH/K@@[]@KCU-/,0AB8@@@CTS@@@CU-@@@CTU@@@CUQ@@@CUH@]ECUWC@@CT9HQ )@@G@@;O@@@=W/@@@E*@@@@H/K@#1:C/@@@[H@@CT9;O@@@=W/@@[=C@@@@H;O@@@=W/@@@EH/@@@[HR )@@G@@]@@CU-/,0AB8@@@CTS@@@CU-@@@CTU@@@CUR@@@CUH@]HCUWC@@CT9;O@@@=W/@@[=*@@@@HHS )@@G@@/K@#1:C/@@@[H@@CT9;O@@@=W/@@J*C@@@@H;O@@@=W/@@[=H/@@@[]@@CU-/,0AB8@@@CTSHT )@@G@@@@@CU-@@@CTU@@@CUS@@@CUH@]KCUWR@KCU+O/K__"O@KCT;N8L@@@^^K#11/,0AB8@@@#11HU )@@G@@@@@CUH@@@CTU@@@CUT@@@CUZ@]MCUW/,0]N0@@@CTU@]NCUWC/@@@[H@@CT7*@@@@G1@@@@GHV )@@G@@/K@#2WC/@__.G@@CT7C_)@@][@@@[ [#)CT/C/@@@[H@@CT/T/@@[=[@@CU-G/@__"]@@CU@@@@@@@@@@@B@@@@@@@[F@@V@@@II )@@G@@@@@@@<@@@@@@@@@@[ @]T@@@@@@@@@@@@@@@@@@@@(@@O@@@@@@@@@@]2@@@@@@@@@@@@@@@IJ )@@G@@@@@@@8@]N@@@@@@@]Q@@@@@@@@@@@%@[V@@@@]J@[M@]B@@@@@@@@Y@@D@@@@]I@[^@[O@@@IK )@@G@@@@@@[G@[P@@@@@@@@@@@@@@G@@@@]P@@!@@@@@@@[I@@]@@@@@@@@@@@U@@@@@@@]_@@Z@@@IL )@@G@@@@@@[C@]8@@@@@@@]3@@@@@@@@@@@P@]A@@@@@@@@T@[D@@@@@@@@:@@M@@@@@@@@W@[?@#MIM )@@G@@@@@@@@@]@@@@@@@@@ @@A@@@@@@@@@@@6@@@@@@@@@@]]@@@@[>@#K@[T@@@@@@@@C@@F@@@IN )@@G@@@['@@2@@N@@@@@@@#G@@@@@4@@@@]D@@K@@@@@@@[,@@@@@@@@@@[S@#E@@@@@@@]6@@L@@@IO )@@G@@@@@@]9@]+@@@@@@@[%@[Y@@@@@@@@H@@0@@@@@@@@@@@^@#OM$TIME @@]@@@@@@GRYIP )@@G@@BAC @@^@[7@@@G(UBACN @@^@[$@@@G(1BNAC @@^@@E@@@G%DIQ )@@G@@BNACN @@^@@J@@@G%+BCL @@^@]?@@@G%'BNCL @@^@];@@@G:LIR )@@G@@BCLID @@^@@@@@@G:(BNCLID @@^@@/@@@G?@BCLN @@^@]'@@@G?RIS )@@G@@BNCLN @@^@],@@@G?0SUPSYM @@^@]O@@@G!ECOUNT @@^@@@@@@G!=IT )@@G@@CNTDN @@^@](@@@G,#FIXUP @@^@@;@@@G,-BIND @@^@@@@@@G0YIU )@@G@@BNINDZ @@^@@3@@@G0YBNIND @@^@@@@@@G0YBINDZ @@^@@@@@@G0YIV )@@G@@FLINK @@^@@-@@@G1LSAERR @@^@@@@@@G1%SAERD @@^@@@@@@G2(IW )@@G@@EXPR @@^@@9@@@G3^PEXPR @@^@@@@@@G3^LEXPR @@^@@@@@@G3^IX )@@G@@SPEXPR @@^@@@@@@G3^LSDP @@A@@_@@@H#%STSDP @@A@@@@@@H#/IY )@@G@@EXERR @@A@]W@@@H^JERROR @@A@@@@@@H^'INSERT @@A@@@@@@H HIZ )@@G@@GEN @@C@@\@@@HMHGENR @@C@@@@@@HMHGENM @@C@]S@@@HMHJA )@@G@@GENMR @@C@[6@@@HMHGMODE @@C@@@@@@HN.G$P @@C@[\@@@HOVJB )@@G@@G$G @@C@@"@@@HP;G$F @@C@#B@@@HP;PGRG1 @@C@[_@@@HQ"JC )@@G@@PGRG2 @@C@@@@@@HQ"GLIT @@C@[1@@@HTJGMOVE @@C@@@@@@HT$JD )@@G@@GFIN @@C@@@@@@HU'GRTRN @@C@[#@@@HVNGLBL @@C@@@@@@HV*JE )@@G@@GGETT @@C@@@@@@HV_GNI @@C@@'@@@HW3GOI @@C@[X@@@HW3JF )@@G@@GMVI @@C@@@@@@HW3GXI @@C@]/@@@HW3GLITRG @@C@@@@@@HX@@@H)UGBOFF @@C@[L@@@H)UGIFR @@C@]C@@@H)UJL )@@G@@GBR @@C@#I@@@H)UGIFX @@C@[A@@@H)UGDBLE @@C@]F@@@H<2JM )@@G@@GFLOAT @@C@]R@@@H<2GSHIN @@C@]&@@@H<2GINST @@C@@@@@@H=6JN )@@G@@GCJMP @@C@@@@@@H>0GJGD @@C@@@@@@H&*GSET @@C@]1@@@H$PJO )@@G@@GSUB @@C@#^@@@H*^GMARK @@C@@@@@@H(DGFIX @@C@[&@@@H(ZJP )@@G@@GMRK @@C@[/@@@H(5GUSE @@C@@@@@@H(5GIFE @@C@]Y@@@H%=JQ )@@G@@GIFO @@C@@@@@@H%=XGPOP @@C@@@@@@H?LGNTR @@C@[<@@@H!QJR )@@G@@GRTN @@C@[0@@@H!QGRTNS @@C@@@@@@H!QGCORE @@C@@@@@@H,>JS )@@G@@XGPUSH @@C@[Z@@@H0!GSRTCH @@C@@@@@@H24GTMP @@C@[-@@@H4AJT )@@G@@FTMP @@C@@@@@@H4APLIG @@C@#[@@@H5PCGCONV @@C@]=@@@H"MJU )@@G@@GASGN @@C@@@@@@H_MDEBUGR @@C@]%@@@I]-XGEN @@C@@@@@@I#SJV )@@G@@LMCP @@C@@@@@@I #NONPL1 @@C@@@@@@I 6STKCHK @@I@@@@@@J@QJW )@@G@@RTSAVE @@I@[!@@@J@8RDOPEN @@I@@@@@@J[UWROPEN @@I@@@@@@J[9JX )@@G@@WRIOCB @@I@]7@@@J]SRDIOCB @@I@@@@@@J]SPUTCH @@I@]E@@@J]%JY )@@G@@WRPRNT @@I@@@@@@J]_RDREAD @@I@@@@@@J#HWRCLOS @@I@@@@@@J#-JZ )@@G@@SH2 @@N@] @@@KT9SQ3 @@N@#H@@@KT9SQ4 @@N@@@@@@KT9KA )@@G@@ONUNIT @@O@]<@@@K,ION$UNT @@O@@@@@@K56ONER @@O@# @@@K6;KB )@@G@@PLSYDS @@P@@@@@@K7/PLSMSK @@P@@@@@@L]MPLWORD @@P@]H@@@LC?KC )@@G@@PLCGD @@P@@@@@@LEJKI )@@G@@DSECT @@S@]G@@@P>:DEND @@S@@@@@@P&+LOAD @@S@]L@@@P&1KJ )@@G@@LOADN @@S@@@@@@P$CLOADM @@S@#]@@@P$&LOADXM @@S@@@@@@P*^KK )@@G@@LOADXI @@S@@@@@@P*+LOADA @@S@@@@@@P(@ADD @@S@@@@@@P(?KL )@@G@@ADDU @@S@@@@@@P%#ADDM @@S@@@@@@P%USTOREM @@S@@@@@@P%2KM )@@G@@STOREN @@S@#F@@@P:KSTORE @@S@@@@@@P:,SUBM @@S@@@@@@P?AKN )@@G@@SUB @@S@]!@@@P?=MPYS @@S@])@@@P?/LPCNT @@S@]-@@@P!TKO )@@G@@MPY @@S@@@@@@P!.LOADD @@S@]*@@@P!.DIV @@S@@@@@@P!.KP )@@G@@STORED @@S@@@@@@P!.SRBD @@S@@@@@@P!.SLBD @@S@@@@@@P!.KQ )@@G@@SLB @@S@@@@@@P0^SRB @@S@@@@@@P0^LXOR @@S@@@@@@P1#KR )@@G@@LAND @@S@@@@@@P1#LOR @@S@]5@@@P1#PUSH @@S@@@@@@P2EKS )@@G@@POP @@S@@@@@@P2XSTACK @@S@@@@@@P20UNSTK @@S@#O@@@P4XKT )@@G@@SETL @@S@@@@@@P6-LOOP @@S@@@@@@P7PJILOOP @@S@@@@@@P7%KU )@@G@@CVE @@S@]4@@@P8[CVI @@S@@@@@@P83CVO @@S@].@@@P9-KV )@@G@@MOVE @@S@@@@@@P'NGOTO @@S@#D@@@Q[TSS @@S@@@@@@Q[5KW )@@G@@SQ @@S@@@@@@Q[5SH @@S@@@@@@Q[5SF @@S@@@@@@Q[5KX )@@G@@SS$S @@S@@@@@@Q[5SAC @@S@@@@@@Q XSFW @@S@@@@@@Q XKY )@@G@@STRT @@S@@@@@@QB+QUIT @@S@@@@@@QCHLINK @@S@@@@@@QC-KZ )@@G@@CALL @@S@@@@@@QC-LOCAL @@S@@@@@@QD JMP @@S@@@@@@QDZLA )@@G@@ORIGIN @@S@@@@@@QENSETGC @@S@@@@@@QF!SETPC @@S@@@@@@QG>LB )@@G@@GETGL @@S@@@@@@QHRGETPL @@S@@@@@@QHRGETC @@S@@@@@@QH\LC )@@G@@PUTC @@S@@@@@@QH\SET @@S@@@@@@QI IF @@S@@@@@@QJ\LD )@@G@@IF$A @@S@@@@@@QJ\IF$B @@S@@@@@@QJ\SNAP @@S@@@@@@QS'LE )@@G@@GET @@S@@@@@@QU*PUT @@S@@@@@@QU*IOCB @@S@@@@@@QV$LF )@@G@@FADDD @@S@@@@@@QWMFMPYD @@S@@@@@@QWMFDIVD @@S@@@@@@QWMLG )@@G@@ADDD @@S@@@@@@QWMGETLNK @@S@@@@@@QX\PUTLNK @@S@@@@@@QYDLH )@@G@@LJMP @@S@@@@@@QY%'=@@@I/K@[ESG@@^/&?@@^/>?@@^/=/K@@R(K@K@@GH8)@@[LI )@@G@@!@)^/>/K@@R(H@@^/=G8@^/$/KF@@@9*@^/+;G@@@=W8@@@W:@@ @G/K@@R9[@@ @GS8@@@WLJ )@@G@@C8@ @B'=@@@#K^K @E9*K^/=C4@ @E%8@@@ /^@@S@9?@^/+/K@@RZC@@^/+C^K @EG@K^/=LK )@@G@@H@K@@G*@@@@H/CK@RZC8@@@ 9?) @I;H@@[CC@K @G @@ @HR]0^/V/KF@@@@@@ @B/\0@S(LL )@@G@@/K@@T)C^@^/U @@@@H9?) @K;H@@[C @@ @HR]0^/V/KF@@[C^@^/UH@@@@KH8@@@[R]0^/VLM )@@G@@/KF@@[C8@@@@C/K__"K^W@@[CC/@@[\^)^/U/K@@SC@@ @M'=@@@49?@^.\9*@ @BC@@^.1&\@^.1T8@@@WLP )@@G@@[@@^/LC8K@@W/,0@RY&;@@@[C@K @NN8K@@WM#W)@@/K@@TBG@@@@H;OK@@=W8K@@WH@@@@ILQ )@@G@@*@@@@IG8@@@W/KJ@@@C@@^/ T8@@@WG@@^/L[@0@[#C^K^/H/\0@T@[@@^/RCCK^/G/\0@T@LR )@@G@@[@@^/WC^K^/G/\0@T@[@@^/XC^K^/F/\0@T@[@@^/YCCK^/F/\0@T@[@@^/ZCCK^/H/\0@T@LS )@@G@@[@@^/)C@0@[#C^@^/U/KJ@@@(^@^/F/K@@SDCC@^/U/^@@T$C^@^/U'=@@[0/@@@SD0/G@@@LT )@@G@@/K@@SD;*@@@S;C@@@S[@@^/- @@@@G(8@@@@/K@@U](0@@@@/K@@SPC/)__"C@K@@GCC.@@]LU )@@G@@;C0@@A:@0^/-/K@@T"!@0^/-/K@@T;C^X@@]/^K@T3C^G@@@/^@@T2/K@@U]K^!@@[CDH@@[LV )@@G@@,^0^/U/K@@T;C@0@@GC@@^/X[@@^/&C@@^/-H8@@@^/G@@SDT8@@@#!^@^/F/K@@U%C8K@@#LW )@@G@@/,0@RYN^W@@]NC?@@]8KK@UKC@@^/Y[@@^/&C@@@[]C8K@]QK@K@@G[@)@[]/,0@RYN80@@1LX )@@G@@H8@@@#&;@@@#%C/)@#/K@@U&C@?@@[=@) @O/K@@U&=@) @P/K@@U&C G@@]H9@@@[KDG@@]LY )@@G@@\ @^/U/K@@U?8KK@U*/K@@U%8K0@UU/K@@UMC^@^/U/K@@SD[@) @HC@)^/W[@)^/&C^G@@@LZ )@@G@@C8K@@]/,0@RY9??@@@C@K @H;*K@@G;CK@@S/K@@SK/\0@S(:8@@@[/K@@VGCCK^;50/G@@@MA )@@G@@/K@@VIH8@@@^/G@@VIT8@@@#!^@^/F/K@@VIC@K^/X[@K^/&C8K@@]/,0@RY9?G@@@R]0^/VMB )@@G@@/KF@@[C@K @QR]0^/V/KF@@[C@@ @R/K@@VD @@@@GR]0^/V/KF@@@/\0@S(/G@@VI;*@@@]MC )@@G@@!C@^/G/K@@VIC@K^/R/K@@V#/K@@@@R;K@(@AFW@@#RBW@@#C1J^'0!9@@@K/K@@V&C1G@@CMD )@@G@@/-@@V+R;K@@@'=@@@#ABW@@#*4G@@#/K@@V:AFW@@^(@G@@ /K@@V\'^@@V1/K@KVSC5G@@#ME )@@G@@%9@@@]'^@[BE/K@KVS CG@@^/K@KVS/K@@@@0@G@@#'=@@@AC1J^'0?9@@@K/K@KV1CC?@@^MF )@@G@@;*)@@P;C)@@P?9@@@S/K@@V_ @@@@HW8K@@W;GK@@=C0W@@#:8K@@(D@)@@IG@?@@ [@?@@ MG )@@G@@ CG@@^/C)KV1 @G@@ !9@@@ST8)@@WOB?@@#AB?@@#AB?@@C/K@KV1A]0 YKC^;@@@[@0@W7MH )@@G@@[@0@XAC@_@@@[@0 Y?/G0[B-!80@@>/K@[B-D[@ M:+[J^'0/ V@@#C^J^'0/@F@@#1@J^'0MI )@@G@@/K@@W,RF?@@[AF) M>C[J^'0C8@ M<'=@@@J;G@@@>;D@@@+/>@@W:R;@ M>R#;@@[ 4G@@#MJ )@@G@@*@J@@@'=@@@#R7G@@#98F@@#/\0@XS/KF@@#*?G@@]/KF@@#9!G@@C99@@W"C1G@@C?9@@@#MK )@@G@@/K@@W"A]0 M!/,0@>W@@@@@@@@@@@@R]0 M!0@G@@#'=@@@A*4G@@#/\0@XRR#0 Y?R#:@@[ML )@@G@@C^J^'0 4G@@#(@I@@@/K@@XDA]0 M!/,0@/K@@X4(^H^'0/K@@X*/,0@WH@@@ M%MP )@@G@@@@@ M:@@@@@@C@K M%/K@@X**@@ M(AA0@5-R]0 M?9?@ M,9?) M09!@ M2/K@KXZ/K@@@@MQ )@@G@@C @@X;[[@ N<[ @@Y@/K@@Y]/K@@@@ @@ N/K@[B-[@0 Y?C@Z^'0+@K O!MR )@@G@@/^)@)FR;!@@@/^)@)I'^@@)ZA#0 N=R;@ N='=@@[GR#0 Y?R;@@@[A7J^'0R7@ N%*0J^'0MS )@@G@@/@@@) 0@@@YQ/K@ OAR3Z^'0;C@@@#:8@@@]/^K@)VCD@ O#R;)@@H*@@@@HR;)@@#K[@@@IMT )@@G@@C8@ O#C^K O#G8K@@[!@K@@L/K@@Y"CD@ O^K[@@@IC8@ O^C^K O^G8K@@[!@K@@L/K@@Y"MU )@@G@@RBK O[P;K@@[C80@@ ?C. O /K@@ZW8#K@Y\A#)@[#'^@@)3C[@@[[K[@@[#C8)@^@G@)@[[MV )@@G@@H8)@@[[^! O C8H O @I@@@%@)@[[8#)@Y;C@0 Y?[ J^'0[DW@@@[[@ N+R#@@@KC5K N%MW )@@G@@G9K@[@C1J^'0/[@@ZF;DK@@^H9K@@];(K@@E)[@@@L;(K@@A[DZ^'09?K N=/[@@ZM9*W@@[MX )@@G@@O;@@@#/K@@ZT9*W@@@;GK@[C9*W@@]9*W@@^9*W@@C9*W@@EA#W@@G*4@ N%/K@@) /K@@Z+MY )@@G@@C8H O CDH O K9@@@I? X O /K@@Y"/K@@Y1C[@ Y!?9@@@#/K@@)O?9@@@A/K@@Z8:9@@@AMZ )@@G@@/K@@Z,CCK N=[^K NOC@@ M7'=@@@I'^@[ESC@0 Y?C^J^'0K8@@@HC8) O#%CY@@@C8) O^NA )@@G@@[CI@@@ @J^'0R]0 YK/KF@@]RF@ N=AB@ NSC@@ O,'=@@@J/^@@)OC@0 Y?C9@@@T1@J^'0NB )@@G@@[1J^'0C@K N+ @H@@#C^Z^'0ABK N+C0Z^'0C^@@Y@(?J^'0!8K@@)/KG@@@/KG@@[+@K M:NC )@@G@@A#\^'0/K@@)^*@@ NO [@K O[P;K@@[C[@ Y![DH O N^X O C@0 Y?C^J^'0NI )@@G@@(@@ O]/K@K)0/K@K)3C@0 Y?(@@ O]/K@K)0 @@ N4 @@ N5 @@ N6R;0@@=C^J^'0/@@@-!NJ )@@G@@1@J^'0(@G@@D/K@@-!*?G@@C/K@@-!N^W@@^'^@@+_CC! O !8)@@ /K@@W@@@@@@@@@@@@R]0 O00@G@@#'=@@@ANV )@@G@@*4G@@#'^@[BEC G@@D*@@@@K'^@@ H2 PART@^@@@O LE )@@G@@ USING WORD,A3 .@F@@@O DO FIXUP(1,2)<0777 , MOVE W1Q1,FIXUPLF )@@G@@(1,2),FIXUP(1,3) .@A@@@O ON FIXUP(1,2)>0777 . @B@@@O LG )@@G@@ LOAD A6,FIXUP(1,2),FIXUP(1,3) . @^@@@O STORE A6,W1H1 .@]@@@OLH )@@G@@ OFF@^@@@O GOTO FIXUPB . @]@@@OFIXUPA . @F@@@O DLI )@@G@@O FIXUP(1,2)<0777 , MOVE W1Q3,FIXUP(1,2),FIXUP(1,3) . @A@@@O LJ )@@G@@ ON FIXUP(1,2)>0777 . @B@@@O LOAD A6,FIXUP(1,2),FIXUP(1LK )@@G@@,3) . @^@@@O STORE A6,W1H2 .@#@@@O OFF . @#@@@OFIXUPBLL )@@G@@ LABEL . @#@@@O END . @^@@@OXX PROC *1 . @#@@@OLM )@@G@@BIND* NAME 1 .@#@@@OBNINDZ* NAME 1 .@#@@@OBNIND* NAME 2 .@#@@@OLN )@@G@@BINDZ* NAME 2 .@ @@@O LOAD A6,XX(1,1) . @D@@@O DO LO )@@G@@ XX(0,0)=1 , IF A6,NE,0,I THEN,XX(1,2) .@D@@@O DO XX(0,0)=2LP )@@G@@ , IF A6,EQ,0,I THEN,XX(1,2) .@#@@@O END . @^@@@OFLINK* PROLQ )@@G@@C *1,1 @D@@@O RE$TR FLINK(1,1),FLINK(1,2),FLINK(1,3) . LR )@@G@@@ @@@O LMJ RG(1),OA(1) . @#@@@O END . @F@@@OSAERR*LS )@@G@@ PROC *1 . ERROR MESSAGES IN LEXI OR SYNA @A@@@O LT )@@G@@ LOAD A7,SAERR(1,1),I . @D@@@O DO SAERR(1,2)=SAW , FLINLU )@@G@@K X10,SAESW . @D@@@O DO SAERR(1,2)=SAE , FLINK X10,SAESE LV )@@G@@. @D@@@O DO SAERR(1,2)=SAS , FLINK X10,SAESS . @D@@@OLW )@@G@@ DO SAERR(1,2)=SAT , FLINK X10,SAEST . @#@@@O ENDLX )@@G@@ . @E@@@OSAERD* PROC *1,2 . ERROR, DELETE STATEMENT LY )@@G@@@A@@@O LOAD A7,SAERD(1,1),I . @^@@@O GOTO SADLTR . LZ )@@G@@@#@@@O END . @C@@@OEX PROC *1 . CALL EXMA )@@G@@PR @#@@@OEXPR* NAME 1 .@#@@@OPEXPR* NAME 2 .@#@@@OLEXPR* NAMMB )@@G@@E 3 .@#@@@OSPEXPR* NAME 4 .@C@@@O MOVE DSAD,EX(1,1),I . MC )@@G@@ SET D BYTE@B@@@O DO EX(0,0)=1 , LINK EAEXPR . @B@@@O MD )@@G@@ DO EX(0,0)=2 , LINK EAPEX . @B@@@O DO EX(0,0)=3 , LINME )@@G@@K EALEXP . @B@@@O DO EX(0,0)=4 , LINK EASPEX . @#@@@O MF )@@G@@ END . ___@@OSUPSYM* PROC *1 . PUT SYMBOL IN BETA MG )@@G@@*[@@@@*SDFF*@G@@@SCGDR CSECT 3 . INITIAL VALUES FOR MH )@@G@@CODE GENERATOR @^@@@URGCORS* EQU $ . @#@U@SRGCORE* SFW 0 .MI )@@G@@@#@@@URGCORE SFW 0 .@F@@@SFILL(1) SQ SD0ART . ARITHMMJ )@@G@@ETIC (DUMMY F(17,0) STK @F@@@SFILL(1) SQ SDDCBN . BINARYMK )@@G@@ ENTRY @B@@@SFILL(1) SQ 0 . Q ML )@@G@@@B@@@SFILL(1) SQ 17 . P @E@@@SFILL(1) SF 0 .MM )@@G@@ DCGSCL2 EXP,000000000000 @#@@@SFILL(1) SF 0 .@B@T@SMN )@@G@@FILL(1) SF 0207400000000 . KUNZRO@#@T@SFILL(1) SF 0 .@A@@@SMO )@@G@@XFH1 EQU +(IN 63,H1,1,0) . @A@@@SXFW0 EQU +(IN 63,0,1,0) MP )@@G@@. @B@@@SFILL(1) SAC DRSW7-XFW0,DRSW15-XFW0 . @B@@@SFILL(1) SACMQ )@@G@@ RGSWUF-XFH1,RGSWUF-XFH1 . @C@@@SFILL(1) SAC DRAX5-XFW0,0 . MR )@@G@@ DRGSRH,0@E@V@SFILL(1) SAC DRSX1-XFW0,DRSX3-XFW0 . X REG POIMS )@@G@@NTERS @E@@@VFILL(1) SAC DRSX4-XFW0,DRAX6-XFW0 . X REG POINTERS MT )@@G@@@B@@@SFILL(1) SAC RGSXUF-XFH1,RGSXUF-XFH1. @#@@@S CEND MU )@@G@@@E@@@SRSW* PROC *3,2 . REGISTER STATUS WORD @E@@@SMV )@@G@@ ON RSW(3,1)=I . NOT MANAGED REGISTER @#@@@S MW )@@G@@ -1,-1 . @C@@@S +0,+0,+0,RSW(1,1),RSW(2,2),RSW(2,3) . @^@@@SMX )@@G@@ DO 1 , END . @#@@@S OFF . @D@@@S DO RSWMY )@@G@@(1,3)=I , +RSW(1,2),RSW(2,1)-2 . @D@@@S DO RSW(1,2)=I , +RMZ )@@G@@SW(2,1)+2,RSW(1,3) . @D@@@S DO RSW(1)=1 , +RSW(2,1)+2,RSW(NA )@@G@@2,1)-2 . @C@@@S +0,+0,+0,RSW(1,1),RSW(2,2),RSW(2,3) . @#@@@SNB )@@G@@ END . @F@V@S RSW X1,I,RGSXFF-XFH1 DRSX1-XFW0,RGSWXNC )@@G@@R,X1 . X REG 1 @C@V@S RSW X2 DRSX2-XFW0,RGSWXR,X2 . X-REG 2ND )@@G@@@F@V@S RSW X3,RGSXFF-XFH1,I DRSX3-XFW0,RGSWXR,X3 . X REG 3 NE )@@G@@@E@V@S RSW X4 1,0,X4 I . X 4 (END STK PTR) @C@@@VNF )@@G@@ RSW X1 1,0,X1 I . X REG. @C@@@V RSW X2 1,NG )@@G@@0,X2 I . X REG X2 @C@@@V RSW X3 1,0,X3 I . NH )@@G@@ X REG X3 @F@@@V RSW X4,I,RGSXFF-XFH1 DRAX6-2-XFW0,RGSWXR,X4 .NI )@@G@@ X4 MANAGED @E@@@S RSW A1-A0 1,0,A1 I . PARAMETER REGNJ )@@G@@ A1 @F@@@S RSW A2-A0 1,0,A2 I . PARAMETER REGISTER NK )@@G@@A2 @E@@@S RSW A3-A0 1,0,A3 I . SCRATCH PAIR A3-A4 NL )@@G@@@E@@@S RSW A5-A0 1,0,A5 I . SCRATCH PAIR A5-A6 @E@@@SNM )@@G@@ RSW R12+1-R1 1,0,R12-R1+041 I . CONSTANT 1 @E@@@S NN )@@G@@ RSW R13+1-R1 1,0,R13-R1+041 I . CONSTANT 2 @E@@@S RSWNO )@@G@@ R14+1-R1 1,0,R14-R1+041 I . CONSTANT 3 @E@@@S RSW R15NP )@@G@@+1-R1 1,0,R15-R1+041 I . CONSTANT 4 @D@@@S RSW A7-A0,I,RNQ )@@G@@GSWFF-XFH1 DRSW7-XFW0,0,A7 . @B@@@S RSW A9-A0 DRSW9-XFW0,0,A9NR )@@G@@ . @B@@@S RSW A11-A0 DRSW11-XFW0,0,A11 . @B@@@S RSWNS )@@G@@ A13-A0 DRSW13-XFW0,0,A13 . @E@@@S RSW A15-A0,RGSWFF-XFH1,I NT )@@G@@DRSW15-XFW0,0,A15 . @B@@@S RSW X0 DRAX0-XFW0,0,X0 I . NU )@@G@@@E@@@SFILL(1) SAC DRAX11-XFW0,-1 . X5 ADDRESS WORD @ @@@SNV )@@G@@FILL(1) SAC 0,X5*010001 . @ @@@SFILL(1) SAC DRAX5-XFW0,-1 .@D@@@SNW )@@G@@FILL(1) SAC 0,X11*010001 . X11 ADDRES WORD@ @V@S RSWNX )@@G@@ X6 1,0,X6 I . @G@W@V RSW X6,DGSXFF-XFH1,I DRSX4+2-XFW0,RGSNY )@@G@@WXR,X6 . X6 MANAGED @G@@@W RSW X6,RGSXFF-XFH1,I DRSX4+2-XFNZ )@@G@@W0,RGSWXR,X6 . X6 MANAGED @ @@@S RSW X7 1,0,X7 I . @ @@@SOA )@@G@@ RSW X8 1,0,X8 I . @ @@@S RSW X9 1,0,X9 I . @ @@@SOB )@@G@@ RSW X10 1,0,X10 I .@#@@@SCGDR CSECT 3 .@ @@@SFILL(1) SACOC )@@G@@ 0,DRAX0-XFW0 . @D@@@SFILL(1) SAC 0,DRSX1-XFW0 . REG X1 OD )@@G@@AW @D@@@SFILL(1) SAC 0,DRSX2-XFW0 . REG X2 AW @D@@@SOE )@@G@@FILL(1) SAC 0,DRSX3-XFW0 . REG X3 AW @D@@@SFILL(1) SACOF )@@G@@ 0,DRSX4-XFW0 . REG X4 AW @C@@@SFILL(1) SAC 0,DRSA1-XOG )@@G@@FW0 . A1 AW @D@@@SFILL(1) SAC 0,DRSA2-XFW0 . AOH )@@G@@2 AW-XFW0 . @C@@@SFILL(1) SAC 0,DRR12-XFW0 . CON 1 AW@D@@@SOI )@@G@@FILL(1) SAC 0,DRR13-XFW0 . CON 2 AW @D@@@SFILL(1) SACOJ )@@G@@ 0,DRR14-XFW0 . CON 3 AW @D@@@SFILL(1) SAC 0,DRR15-XOK )@@G@@FW0 . CON 4 AW @F@@@SFILL(1) SAC 0,DRSW7-XFW0 . OL )@@G@@ REGISTER A7 REGISTER WORD @ @@@SFILL(1) SAC 0,DRSW9-XFW0 . @ @@@SOM )@@G@@FILL(1) SAC 0,DRSW11-XFW0 .@ @@@SFILL(1) SAC 0,DRSW13-XFW0 .@ @@@SON )@@G@@FILL(1) SAC 0,DRSW15-XFW0 .@ @@@SFILL(1) SAC 0,DRAX5-XFW0 . @ @@@SOO )@@G@@FILL(1) SAC 0,DRAX6-XFW0 . @ @@@SFILL(1) SAC 0,DRAX7-XFW0 . @ @@@SOP )@@G@@FILL(1) SAC 0,DRAX8-XFW0 . @ @@@SFILL(1) SAC 0,DRAX9-XFW0 . @ @@@SOQ )@@G@@FILL(1) SAC 0,DRAX10-XFW0 .@ @@@SFILL(1) SAC 0,DRAX11-XFW0 .@ @@@SOR )@@G@@FILL(1) SAC 0,DRSA3-XFW0 . @ @@@SFILL(1) SAC 0,DRSA5-XFW0 . @C@@@SOS )@@G@@FILL(1) SAC 0,0 . AGXTMP @E@@@SFILL(1) SAC AGROT )@@G@@X0-AGRX0+AGAW,DCGP2-XFW0 . AGSCL2@G@@@SFILL(1) SAC AGRX0-AGROU )@@G@@X0+AGAW,KKD0-XFW0 . ZERO ADDRESS WORD @D@@@SFILL(1) SAC AGROV )@@G@@X0-AGRX0+AGAW,$-$ . X0,$-$ @D@@@SFILL(1) SAC AGRX5-AGRX0+AGAOW )@@G@@W,$-$ . X5,$-$ @D@@@SFILL(1) SAC AGRX11-AGRX0+AGAW,$-$ . OX )@@G@@ X11,$-$ @B@@@SFILL(1) SAC 0,0 . AGLBL @D@@@SFILL(1OY )@@G@@) SAC AGRX0-AGRX0+AGAW,0 . AGSTK @D@@@SFILL(1) SAC AGROZ )@@G@@X0-AGRX0+AGAW,1 . AGFB1 @B@@@SFILL(1) SAC 0,0 . PA )@@G@@ AGTMP1@E@@@SFILL(1) SAC AGRX0-AGRX0+AGAW,36 . AGPB )@@G@@TMP2 @D@@@SFILL(1) SAC AGRX0-AGRX0+AGAW,KUNZRO-XFW0 . AGXUNZ @D@@@SPC )@@G@@FILL(1) SAC AGRX10-AGRX0+AGAW,$-$ . X10,$-$ @G@@@SFILL(1) SACPD )@@G@@ AGRX10-AGRX0+AGAW,0 . AGDOST - DO STACK @F@T@SFILL(1PE )@@G@@) SAC AGRX10-AGRX0+AGAW,ARRTAT-ARINCT . PTR TO ARRTAT @F@@@TFILL(1PF )@@G@@) SAC AGRX10-AGRX0+AGAW,ARRTAT-ARINCT-FH1 . PTR TO ARRTAT@B@@@SFILL(1PG )@@G@@) SAC 0,0 . DAGFMT AW @B@@@SFILL(1) SAC 0,0 . PH )@@G@@ DAGFM2 AW@F@@@SFILL(1) SAC AGRX10-AGRX0+AGAW+0400000,$-$ . POTECPI )@@G@@TED X10,$-$ @#@@@SRGEND SFW 0 .@E@@@SRGSIZE EQU RGEND-RGCORE . PJ )@@G@@ SIZE OF INITIAL AREA ___SF 0 .@B@T@S*[S@@@*SDFF*@^@@@@LSDP* PK )@@G@@ PROC *1,1 . @C@@@@ LOAD LSDP(1,1),LSDP(1,2),LSDP(1,3) . PL )@@G@@@#@@@@ END . @^@@@@STSDP* PROC *1,1 . @D@@@@ STOPM )@@G@@RE STSDP(1,1),STSDP(1,2),STSDP(1,3) . @#@@@@ END . @^@@@@PN )@@G@@EXERR* PROC *4,2 . @^@@@@ LINK PLEXER . @E@@@@ +0,PO )@@G@@EXERR(1,1),(EXERR(1,2)=I)+2*(EXERR(1,2)=R)+; @ @@@@ 8*(EXERR(PP )@@G@@1,3)=I)+; @F@@@@ 4*(EXERR(3,1)='NONUM'),EXERR(2,2)*(EXERR(2,1)PQ )@@G@@=LEVEL) @#@@@@ END . @B@@@@ERROR* PROC *1,2 . EPR )@@G@@RROR - QUIT @A@@@@ EXERR ERROR(1,1) LEVEL,3 . @#@@@@ ENDPS )@@G@@ . @G@@@@INSERT* PROC . PROC TO SET UP INSERTS TOPT )@@G@@ ERROR MSGS @^@@@@MSGFRM FORM 9,27 . @B@@@@ MSGFRM INSERT(PU )@@G@@1,1),INSERT(1,2) .@C@@@@K DO INSERT(1)-2 , +INSERT(1,K+2) . PV )@@G@@@#@@@@ END . ___@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@PW )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@PX )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@*[@@@@*SDFF*@C@@@S. PY )@@G@@ THIS ROUTINE IS THE COMPANION TO PLCSAW@F@@@S. IT APPEARS AFTEPZ )@@G@@R PLTVDS IN ALL CODE GENERATOR MODULES. @E@@@S ORIGIN DCGINT .QA )@@G@@ RESET LOCATION COUNTER @F@@@SSFK170 SF . QB )@@G@@ WORD 1 OF FX BN(17,0) STK ENTRY@C@@@SDCGP2 SFW 2 . QC )@@G@@ SCALING WORD @G@U@SKUNZRO SFW 2 . UNNORMALIZED QD )@@G@@ZERO (20740000000). @E@@@SRGSWFF SH . FREE LIQE )@@G@@ST FORWARD POINTER@F@@@SRGSWFB SH . FREE LIST BACQF )@@G@@KWARD POINTER @E@@@SRGSWUF SH . USED LIST FORQG )@@G@@WARD POINTER@F@@@SRGSWUB SH . USED LIST BACKWARDSQH )@@G@@ POINTER @E@@@SDRGSRH SH . FREE SCRATCH REGISTQI )@@G@@ER @#@@@SFILL(1) SFW 0 . @D@@@SRGSXFF SH . FQJ )@@G@@REE X REG LIST FWD@D@@@SRGSXFB SH . FREE X REG BAQK )@@G@@CK @D@@@SRGSXUF SH . USED X REG BACK @D@@@SQL )@@G@@RGSXUB SH . USED X REG BACK @B@@@SDRSX1 SFWQM )@@G@@ 2 . X 1 @B@@@SDRSX2 SFW 2 . XQN )@@G@@ 2 @B@@@SDRSX3 SFW 2 . X 3 @B@@@SDRSX4 SFWQO )@@G@@ 2 . X 4 @B@@@SDRSA1 SFW 2 . AQP )@@G@@ 1 @B@@@SDRSA2 SFW 2 . A 2 @B@@@SDRSA3 SFWQQ )@@G@@ 2 . A 3. @B@@@SDRSA5 SFW 2 . AQR )@@G@@ 5 @B@@@SDRR12 SFW 2 . R 12 @B@@@SDRR13 SFWQS )@@G@@ 2 . R 13 @B@@@SDRR14 SFW 2 . RQT )@@G@@ 14 @B@@@SDRR15 SFW 2 . R 15 @E@@@SDRSW7 SFWQU )@@G@@ 2 . A7 REGISTER STATUS WORD @B@@@SDRSW9 SFW 2 . QV )@@G@@ A9 @B@@@SDRSW11 SFW 2 . A11 QW )@@G@@@B@@@SDRSW13 SFW 2 . A13 @B@@@SDRSW15 SFW 2 .QX )@@G@@ A15 @G@@@SDRAX0 SFW 2 . X0 - ALQY )@@G@@SO, DIRECT ADDRESS OF DATA @B@@@SDRAX5 SFW 2 . XQZ )@@G@@5 @B@@@SDRAX11 SFW 2 . X11 @B@@@SDRAX6 SFWRA )@@G@@ 2 . X6 @B@@@SDRAX7 SFW 2 . XRB )@@G@@7 @B@@@SDRAX8 SFW 2 . X8 @B@@@SDRAX9 SFWRC )@@G@@ 2 . X9 @B@@@SDRAX10 SFW 2 . XRD )@@G@@10 @D@@@SAGAW EQU $ . ADDRESS WORD START@F@@@SRE )@@G@@AW* PROC *1 . SET ADDRESS OF ADDRESS WORD @B@T@SRF )@@G@@* EQU 0777776000000+($-AGAW) . @A@@@T* EQU +(IN 63,0RG )@@G@@,1,$) . @#@@@S +0 . @#@@@S END . @#@@@SAGRX0 RH )@@G@@ AW . @#@@@SAGRX1 AW . @#@@@SAGRX2 AW . @#@@@SAGRX3 RI )@@G@@ AW . @#@@@SAGRX4 AW . @#@@@SAGRA1 AW . @#@@@SAGRA2 RJ )@@G@@ AW . @#@@@SAGRR12 AW . @#@@@SAGRR13 AW . @#@@@SAGRR14RK )@@G@@ AW . @#@@@SAGRR15 AW . @E@@@SAGRA7 AW . RL )@@G@@ REGISTER WORD FOR A7 @#@@@SAGRA9 AW . @#@@@SAGRA11 AW RM )@@G@@. @#@@@SAGRA13 AW . @#@@@SAGRA15 AW . @#@@@SAGRX5 AW RN )@@G@@. @#@@@SAGRX6 AW . @#@@@SAGRX7 AW . @#@@@SAGRX8 AW RO )@@G@@. @#@@@SAGRX9 AW . @#@@@SAGRX10 AW . @#@@@SAGRX11 AW RP )@@G@@. @#@@@SAGRA3 AW . @#@@@SAGRA5 AW . @#@@@SAGXTMP AW RQ )@@G@@. @#@@@SAGSCL2 AW . @#@@@SAGDZRO AW . @C@@@SAGXR0 AW RR )@@G@@. REG X0, $-$ @D@@@SAGX0OF EQU +(IN 63,1,1,$-1) RS )@@G@@. U FLD PART OF AW @B@@@SAGXR5 AW . X5,$-$ RT )@@G@@@B@@@SAGXR11 AW . X11,$-$@C@@@SAGLBL AW . RU )@@G@@ AGLBL AW @F@@@SAGSTK AW . SRV )@@G@@TACK AW (STRING IN STACK TEMP)@C@@@SAGFB1 AW . RW )@@G@@VALUE 1B @#@@@SAGTMP1 AW . @#@V@SAGTMP2 AW . @F@@@VAGTMP2RX )@@G@@ AW . TEMP AW USED FOR SHIFTS (AGSHFT) @#@@@SAGXUNZRY )@@G@@ AW . @D@@@SAGXR10 AW . LOCAL DATA AW (X10,$-$)RZ )@@G@@@D@@@SAGR10D EQU +(IN 63,1,1,$-1) . LOCAL ACT REC OFFSET@C@@@SAGDOSTSA )@@G@@ AW . DO STACK ENTRY @E@@@SAGARTN AW . SB )@@G@@ RETURN ATTR (FROM ENTRY) @C@@@SDAGFMT AW . SC )@@G@@ I/O ADDRESS WORD @C@@@SDAGFM2 AW . I/O ADDRESS WORD SD )@@G@@@D@@@SAGPX10 AW . PROTECTED X10,$-$ @#@@@TARGENDSE )@@G@@ SFW 0 .@E@@@TARGSIZ EQU ARGEND-SFK170 . SIZE OF INITIALIZED ASF )@@G@@REA @F@@@SDCGTST SFW 0 . TEMPORARY ALLOCATOR STACSG )@@G@@K @^@W@S ORIGIN HTBLT . @^@@@W ORIGIN DERMSP .@D@@@SSH )@@G@@DCGCST SFW 0 . COMPILE STACK ___ @[^^+UCATALOSI )@@G@@GED SCRATCH FILE OBTAINED, RECOVERY ENABLED *[S@@@*SDFF*@A@@@@. SJ )@@G@@ INTERPRETIVE CODE CALLS @^@@@@GENC PROC *1 . @#@@@@GEN* SK )@@G@@ NAME 1 .@#@@@@GENR* NAME 3 .@#@@@@GENM* NAME 2 .@#@@@@GENMR*SL )@@G@@ NAME 4 .@ @@@@ ON GENC(0,0)>2 . @F@@@@ DO (GESM )@@G@@NC(1,1)=R)--(GENC(1,2)=X2) , LOAD X2,GENC(1,2) .@D@@@@ DO GENSN )@@G@@C(1,2)=0 , LOADA X2,GENC(1,1) . @#@@@@ OFF . @B@@@@ SO )@@G@@ DO GENC(0,0)=1 , LINK XGCODE .@B@@@@ DO GENC(0,0)=2 , LSP )@@G@@INK XGENM . @B@@@@ DO GENC(0,0)=3 , LINK XGENR . @B@@@@ SQ )@@G@@ DO GENC(0,0)=4 , LINK XGENMR .@A@@@@I DO 6 ,G$N*(I) EQU SR )@@G@@0 . @C@@@@G$NP*(1) EQU 0 . SET POINTER TO NO SIXTHS @A@@@@G$NP*(SS )@@G@@2) EQU (GENC(0,0)**1)=0 . @#@@@@ END . @^@@@@GMODE* PROST )@@G@@C *1 . @F@@@@ DO GMODE(1,1)='M' ,G$NP*(2) EQU 1 . SET PACSU )@@G@@KING FLAG @C@@@@ DO GMODE(1,1)='S' ,G$NP*(2) EQU 0 . @#@@@@SV )@@G@@ END . @D@@@@G$P* PROC *1 . GENERATE SIXTH WORD SW )@@G@@MACROS@B@@@@X(1) EQU G$P(1)+1 . NO SIXTHS+1 @C@@@@X(2) EQUSX )@@G@@ 1 . CURRENT ARGUMENT @#@@@@G$PL NAME . @E@@@@G$NP**SY )@@G@@(1) EQU G$NP(1)+1 . ADVANCE 6TH POINTER@A@@@@G$N**(G$NP(1SZ )@@G@@)) EQU G$P(1,X(2)) . @^@@@@X(2) EQU X(2)+1 . @B@@@@ ON TA )@@G@@ G$NP(1)=6 . END OF WORD @E@@@@ +G$N(1),+G$N(2),+G$N(3),+G$TB )@@G@@N(4),+G$N(5),+G$N(6) . @B@@@@G$NP**(1) EQU 0 . RESET SIXTH POINTER TC )@@G@@@#@@@@ OFF . @A@@@@ DO X(2)0777777 ,X(1) EQU 1 . STACK AW @C@@@@ TR )@@G@@ ON PGARG(1,2)=I . IMMEDIATE DATA @ @@@@X(1) EQU 0 . SET FTS )@@G@@LAG @F@@@@X(2) EQU (PGARG(0,0)--017)**((01700**PGARG(1,1))*/(-6)TT )@@G@@) . @#@@@@ OFF . @#@@@@ OFF . @D@@@@AW$*(1) EQTU )@@G@@U 16*X(1)+(X(2)**017) . TYPE, J-FILED @#@@@@ END . @C@@@@TV )@@G@@GLIT* PROC *1 . GLIT WORDS @A@@@@ G$P IGLTW )@@G@@IT,GLIT(1,1) . @#@@@@ G$F . @#@@@@ END . @F@@@@TX )@@G@@GMOVE* PROC *1 . MOVE STACK ITEMS AW-TO,AW-FM,SIZE@D@@@@TY )@@G@@ ON GMOVE(1)=2 . GMOVE ITEM-TO,ITEM,FM @G@@@@ G$PTZ )@@G@@ IGMOVE+1,(GMOVE(1,1)-1)*DCGSLT,(GMOVE(1,2)-1)*DCGSLT . @#@@@@ UA )@@G@@ G$G . @^@@@@ DO 1 , END .@#@@@@ OFF . @ @@@@UB )@@G@@ PGRG1 GMOVE(1,1) . @A@@@@ G$P IGMOVE,AW$(1),AW(2) .UC )@@G@@@ @@@@ PGRG1 GMOVE(1,2) . @B@@@@ G$P AW$(1),AW$(2),GUD )@@G@@MOVE(1,3) . @#@@@@ G$G . @#@@@@ END . @C@@@@GFIN* UE )@@G@@ PROC *1 . GFIN ['POP'] @B@@@@ G$P IGFIN*2+(UF )@@G@@GFIN(1,1)='POP') .@#@@@@ G$F . @#@@@@ END . @B@@@@UG )@@G@@GRTRN* PROC *1 . GRTRN @^@@@@ G$P IGRTRN*2 .UH )@@G@@@#@@@@ G$F . @#@@@@ END . @C@@@@GLBL* PROC *1 UI )@@G@@. LABEL MARKER @ @@@@* EQU $+(G$NP(1)>0) .@#@@@@UJ )@@G@@ G$F . @#@@@@ END . @C@@@@GGETT* PROC *1 . UK )@@G@@ GGETT AW . @D@@@@X(1) EQU 1 . DEFAULTUL )@@G@@ IS 1 WORD @D@@@@ DO GGETT(1,2)>0 ,X(1) EQU GGETT(1,2) . UM )@@G@@@ @@@@ PGRG1 GGETT(1,1) . @C@@@@ G$P IGGETT*2,AW$(1)UN )@@G@@,AW$(2),X(1) . @#@@@@ G$G . @#@@@@ END . @C@@@@UO )@@G@@GDATA PROC *1 . OP FLAG @^@@@@GNI* NAME IGNIUP )@@G@@ . @^@@@@GOI* NAME IGOI . @^@@@@GMVI* NAME IGMVI . @^@@@@UQ )@@G@@GXI* NAME IGXI . @E@@@@ G$P GDATA(0,0),GDATA(1,1)*/(-6)UR )@@G@@,GDATA(1,1)**077 .@#@@@@ G$G . @#@@@@ END . @B@@@@US )@@G@@GLITRG* PROC *1 . GLITRG REGISTER-NUMBER@A@@@@ G$P IGLTRG,GLUT )@@G@@ITRG(1,1) . @#@@@@ G$G . @#@@@@ END . @D@@@@GAW UU )@@G@@ PROC *2 . OP ADDRESS WORD @^@@@@GLABEL* NAME IGLAUV )@@G@@BL . @^@@@@GFREE* NAME IGFREE . @^@@@@GSHIFT* NAME IGSHFT . @^@@@@UW )@@G@@GFSR* NAME IGFSR . @^@@@@GGETGR* NAME IGGETR . @^@@@@GJUMP* NAMUX )@@G@@E IGBRCH . @^@@@@GKEEP* NAME IGKEEP . @A@@@@ PGRG1 GAW(1,1),UY )@@G@@GAW(1,2) . @E@@@@ G$P 2*GAW(0,0)+(GAW(2,1)='X'),AW$(1),AW$(2)UZ )@@G@@ . @#@@@@ G$G . @#@@@@ END . @E@@@@GLMJ* PROVA )@@G@@C *1 . SET $+1 IN AW REGISTER @ @@@@ PGRG1 GLMVB )@@G@@J(1,1) . @A@@@@ G$P IGLMJ,AW$(1),AW$(2) .@#@@@@ G$GVC )@@G@@ . @#@@@@ END . @F@@@@GLOAD* PROC *2 . VD )@@G@@GLOAD AW,WORDS ['X'] @G@@@@X(1) EQU 1+2*(GLOAD(2,1)='X') VE )@@G@@ . SET TO 1 WORD A OR X REGISTER @C@@@@ DO GLOAD(1,2)>0 ,X(1)VF )@@G@@ EQU GLOAD(1,2) . @A@@@@ PGRG1 GLOAD(1,1),X(1) . @B@@@@ VG )@@G@@ G$P 2*IGLOAD,AW$(1),AW$(2) . @#@@@@ G$G . @#@@@@ VH )@@G@@ END . @C@@@@GLOC PROC *1 . LOCATION,AW @^@@@@VI )@@G@@GGOTO* NAME IGGOTO . @^@@@@GBAL* NAME IGBAL . @^@@@@GAPPN* NAMVJ )@@G@@E IGAPPN . @^@@@@GBON* NAME IGBON . @^@@@@GBOFF* NAME IGBOFF . VK )@@G@@@^@@@@GIFR* NAME IGIFR . @^@@@@GBR* NAME IGBR . @^@@@@GIFX* VL )@@G@@ NAME IGIFX .@E@@@@ G$P GLOC(0,0)+((GLOC(0,0)=IGBR)**(GLOCVM )@@G@@(1,3)=ON)) .@H@@@@ ON GLOC(0,0)=IGBR . GBR LOC,FLAG,[ON OFVN )@@G@@F],AW,J (Q1,Q2,Q3,Q4) @F@@@@X(1) EQU GLOC(1,5) . COMPUTE J FIELDVO )@@G@@ (DEFAULT J VALUE IS Q4)@F@@@@ DO ((X(1)=Q1)++(X(1)=Q2)++(X(1VP )@@G@@)=Q3))=0 ,X(1) EQU Q4 . @A@@@@ PGRG1 GLOC(1,4),X(1) . @F@@@@VQ )@@G@@ G$P AW$(1),AW$(2),GLOC(1,2)*/(-6),GLOC(1,2)**077 . @#@@@@VR )@@G@@ OFF . @D@@@@ ON (GLOC(0,0)=IGIFR)++(GLOC(0,0)=IGIFVS )@@G@@X) . @^@@@@ PGRG1 GLOC(1,2)@ @@@@ G$P AW$(1),AW$(2) .VT )@@G@@@#@@@@ OFF . @G@@@@ DO (GLOC(0,0)>IGAPPN)**(GLOC(0VU )@@G@@,0)0)**(GCORE(1,1)2 . @^@@@@X(1) EQU X(1)-2 . @^@@@@CO )@@G@@ ADD X1,1,I . @#@@@@ OFF . @ @@@@ DO X(CP )@@G@@1) , GETC . @#@@@@ OFF . @B@@@@ DO XGEN(2,1)=0 , LINKCQ )@@G@@ XGENFL . @C@@@@ DO XGEN(2,1)='SINGLE' , LINK XGENS . @#@@@@CR )@@G@@ END . @E@@@@ . LMCP* PROC *1 . LOAD META CS )@@G@@CODE POINTER@D@@@@ . DO LMCP(1,1)=R , LOAD A3,LMCP(1,2) . CT )@@G@@@C@@@@ . DO LMCP(1,1)=I , LOAD A3,A8 . @ @@@@ . CU )@@G@@LINK SXGSBC . @#@@@@ . END . @^@@@@LMCP* PROC *1 . CV )@@G@@@G@@@@ DO (LMCP(1,1)=R)**((LMCP(1,2)=A8)=0) , LOAD A8,LMCP(1,CW )@@G@@2) . @I@@@@ DO ((LMCP(1,1)=I)++(LMCP(1,1)=R))=0 , LOAD A8,LMCX )@@G@@CP(1,1),LMCP(1,2) . @H@@@@ LINK SCGSBC . RESET GETC ROCY )@@G@@UTINE USING META-CODE POINTER IN A8 @#@@@@ END . @D@@@@NONPL1CZ )@@G@@* PROC *1 . FLAG,STRING-NAME,RETURN-ADDR@E@@@@. DA )@@G@@ USE OF A NON-STANDARD PL/1 OPTION @G@@@@ IF NONPL1(1,DB )@@G@@1),ON,DXGFL3 THEN,NONPL1(1,3) . MSG ALREADY @A@@@@ LOADA A8,DC )@@G@@NONPL1(1,2) . @B@@@@ EXERR ERXGRN LEVEL,0 'NONUM' @B@@@@DD )@@G@@ SET NONPL1(1,1),ON,DXGFL3 . @#@@@@ END . ___SGNDE )@@G@@(2,1) . @A@@@@ ON GASGN(1,1)='TEMP' . @#@@@@X(1) EQUDF )@@G@@*[S@@@*SDFF*@F@@@@. WORKSPACE FOR CREATION OF ABSOLUTE-LIKEDG )@@G@@ ELEMENTS @[@@@@. @[@@@@. @[@@@@. @^@@@@. PFS PACKEDH )@@G@@T @#@@@@DAEPKT SFW 0. @C@@@@DAEFNM SFW 2 . FDI )@@G@@ILENAME @C@@@@DAEENM SFW 2 . ELEMENT NAME @D@@@@DJ )@@G@@DAEXXX SF . LINKS (USED BY PFS)@B@@@@DAEEFL SS DK )@@G@@. FLAGS @C@@@@DAEEF2 SS . MDL )@@G@@ORE FLAGS @E@@@@DAEETP SS . TYPE OF ELT (7=OMNIDM )@@G@@BUS) @D@@@@DAEXX4 SH . MORE EXEC 8 STUFF @C@@@@DN )@@G@@DAEEVR SFW 2 . VERSION NAME @E@[@@DAEOPT SH . DO )@@G@@ 2 WORD PLUM FORMAT = FLAGS @C@[@@DAEMOF EQU 0001 . DP )@@G@@ M OPTION @C@[@@DAEOOF EQU 0002 . O OPTIODQ )@@G@@N @E@[@@DAESIZ SH . SIZE OF D BANK TO READ DR )@@G@@@A@@@[. 2 WORD PLUM ABSOLUTE FORMAT@F@[@@. DS )@@G@@ START IS ALWAYS LABEL DLXSP @E@@@@DAELEV SF . DT )@@G@@ PLUM LEVEL X:YYZ = XYYZ @F@@@[DAESIZ SH . DU )@@G@@ D BANK SIZE (16 BITS ONLY) @D@@@[DAEMOF EQU 0400 . DV )@@G@@ M OPTION (BIT 18) @D@@@[DAEOOF EQU 0200 . O OPTIODW )@@G@@N (BIT 17) @D@@@[DAESEC SH . NUMBER SECTORS DX )@@G@@@E@@@@DAETXT SF . START OF TEXT IN FILE @C@@@@DY )@@G@@DAETIM SF . CREATION TIME@D@@@@DAEEND SFW 0 DZ )@@G@@ . END OF ELEMENT PCT @[@@@@. @[@@@@. @[@@@@. EA )@@G@@@[@@@@. @[@@@@. @[@@@@. @ @@@@. FILE I/O PACKETEB )@@G@@@[@@@@. @#@@@@DAFPKT SFW 0 .@C@@@@DAFFNM SFW 2 . EC )@@G@@ FILENAME @C@@@@DAFXXX SF . IOW$ INFO ED )@@G@@@E@@@@DAFTYP SF . TYPE OF I/O (R$ OR W$) @D@@@@EE )@@G@@DAFSIZ SH . NUM WDS TO READ @F@@@@DAFBUF SH EF )@@G@@ . PTR TO DLXSP (START OF D BANK) @D@@@@DAFLOC SF EG )@@G@@ . FILE SECTOR NUMBER @D@@@@DAFXX2 SFW 2 . EH )@@G@@ MORE EXEC8 STUFF @D@@@@DAFEND SFW 0 . EEI )@@G@@ND FILE PACKET @[@@@@. @[@@@@. @E@@@@DAELST SFW 0 . EJ )@@G@@ END OF STUFF TO BE COPIED@ @@@@DAEFSZ EQU DAELST-DAEPKT EK )@@G@@___@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@EL )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@*[S@@@*SDFF*@#@@@[SDQ EM )@@G@@EQU $ @E@@@[ +ZSD(1),TVST-KFIX . WORKSPACE STAREN )@@G@@T @F@@@[ Z ZSD(2),SDI . ADPSDS - START OF FIXED SEO )@@G@@D AREA@F@@@[ Z ZSD(3),SDF . ADPSDE - END OF FIXED SD EP )@@G@@AREA @G@@@[ Z ZSD(4),SDF . ADPCSE - NEXT AVAILABLE SEQ )@@G@@D SPACE @G@@@[ +ZSD(5),SDJ . ADPCSN - LAST SD SPER )@@G@@ACE AVAILABLE @F@@@[ +ZSD(6),SDJ . ADPCBC - INITES )@@G@@IAL B-CODE POINTER@F@@@[ +ZSD(7),TVEND . ADPCBE - FINAET )@@G@@L B-CODE ADDRESS @E@@@[ +ZSD(8),TVEND . ADPCND - END EU )@@G@@WORKSPACE @E@@@[ +ZSD(9),TVEND . ADPEND - END OF COREV )@@G@@E @D@@@[ +ZSD(10),SDBK0S . ADBK0S - BLOCK 0 SD@B@@@[EW )@@G@@ +ZSD(11),0 . ADBK1S @C@@@[ +ZSD(12),0 . EX )@@G@@ ADMNSD . @C@@@[ +ZSD(13),SDIN . SYSIN SEY )@@G@@D @D@@@[ +ZSD(14),SDOUT . SYSPRINT SD PT @E@@@[EZ )@@G@@ +ZSD(15),B$LIZ . DZZLZ . LINESIZE @D@@@[ FA )@@G@@ +ZSD(16),B$PIZ . DZZPZ - PAGESIZE@C@@@[ Y ZSDFB )@@G@@(17),'*',1 . DZZSCH,DZZFP @E@]@[ Y ZSD(18),0,0020 . DFC )@@G@@GOXRF,DGOPT3 (FLAGE) @E@@@] Y ZSD(18),0,0400*D$OPTN . FD )@@G@@DGOXRF,DGOPT3 @C@@@[ Y ZSD(19),0,0777 . DGODFL,DGOPHFFE )@@G@@@D@@@[ Y ZSD(20),0777,0 . DGOMXP,DGOCDF . @B@@@[ FF )@@G@@ +ZSD(21),0 . DGOERM @C@@@[ +ZSD(22),1000 . FG )@@G@@ DGOMPG . @G@@@[ +ZSD(23),B$TIME . DGOTMX - FH )@@G@@MAX EX TIME (IN SECONDS)@H@@@[ +ZSD(24),0 . DGOLNT FI )@@G@@- LINES PRINTED ON CURRENT PAGE @F@@@[ +ZSD(25),0 . FJ )@@G@@ DGOLCT -TOTAL LINES PRINTED @F@@@[ +ZSD(26),0 . FK )@@G@@ DGOPCT - CURRENT PAGE NUMBER @E@@@[ +ZSD(27),0 . FL )@@G@@ INITIAL STATEMENT NUMNER @D@@@[ +ZSD(28),2 . CFM )@@G@@ORE SPLIT FACTOR @E@@@[ Y ZSD(29),0,14 . START AND FN )@@G@@END COLUMN @C@@@[ Y ZSD(30),0777,0777 . ERROR LIMITS @E@]@[FO )@@G@@ Y ZSD(31),0,0020. ERRORS,LIMAXLS (SOURCE) @G@@@] FP )@@G@@ Y ZSD(31),0,0020+(2*A$OPTN). ERRORS,LIMAXLS (SOURCE) @B@@@[FQ )@@G@@ +ZSD(32),0 . EOFLAG @B@@@[ +ZSD(33),0 . FR )@@G@@ DEXCAR @D@@@[ +ZSD(34),54395 . DCVDTB =16384FS )@@G@@*3.32 @B@@@[ +ZSD(35),0 . DLXEST @B@@@[ +ZSFT )@@G@@D(36),0 . DLXRVE @B@@@[ +ZSD(37),0 . DFU )@@G@@LXRVP @F@@@[ +ZSD(38),SDA1BC . DLXB1 - BCD OF ARITHMETICFV )@@G@@ 1 @^@@@[ +ZSD(39),0 . @^@@@[ +ZSD(40),0 . @D@@@[FW )@@G@@ +ZSD(41),0606100 . KKB0,KKB1 BITS @C@@@[ +ZSFX )@@G@@D(42),SDUAR . $$ARITH$$ @C@@@[ +ZSD(43),SDUST . FY )@@G@@ $$STRING$$$ @C@@@[ +ZSD(44),SDULB . $$LABEL$$ FZ )@@G@@@C@@@[ +ZSD(45),SDUFL . $$FILE$$ @C@@@[ +ZSGA )@@G@@D(46),SDUEN . $$ENTRY$$ @B@@@[ +ZSD(47),SDCHR1 . GB )@@G@@ '1' @B@@@] +ZSD(48),0 . DZZSIR @B@@@] GC )@@G@@ +ZSD(49),0 . ADPBCM @B@@@] +ZSD(50),0 . GD )@@G@@ ADPCLC @B@@@] +ZSD(51),0 . DEXMOS @B@@@] GE )@@G@@ +ZSD(52),0 . DEXMST @B@@@] +ZSD(53),0 . GF )@@G@@ DHSTMT @C@@@] +ZSD(54),0 . XXX,DGOPT4 @B@@@]GG )@@G@@ +ZSD(55),0 . DCGLCG @B@@@] +ZSD(56),0 . GH )@@G@@ DSRCMT @C@@@] +ZSD(57),0 . XXX,DGOPT5 GI )@@G@@@B@@@] +ZSD(58),SDUPT . $$PTR$$@B@@@# +ZSD(59),GJ )@@G@@0 . ADBCSZ @B@@@# +ZSD(60),0 . SBARPT GK )@@G@@@B@@@# +ZSD(61),0 . DERCSY @B@@@# +ZSD(62),GL )@@G@@0 . DGOPT6 @B@@@# +ZSD(63),0 . DERCCR GM )@@G@@@B@@@# +ZSD(64),0 . DERCIT @B@@@# +ZSD(65),GN )@@G@@0 . DERCTK @C@@@ +ZSD(66),0 . NUM STMGO )@@G@@TS @B@ @# +ZSD(66),SDNULL . DSDNUL @B@@@ +ZSGP )@@G@@D(67),SDNULL . DSDNUL @B@ @# +ZSD(67),SDNULO . DGQ )@@G@@SDNLO @B@@@ +ZSD(68),SDNULO . DSDNLO @C@ @^ +ZSGR )@@G@@D(68),SDUBSD . $$BASED$$ @C@@@ +ZSD(69),SDUBSD . GS )@@G@@ $$BASED$$ @^@#@]L EQU 58 . @^@^@#L EQU 67 GT )@@G@@. @^@ @^L EQU 68 . @^@@@ L EQU 69 . @^@]@[GU )@@G@@L EQU 47 . @#@@@[SDB EQU $ .@#@@@[ UNLIST . GV )@@G@@@E@@@[K DO 1024-(SDB-SDQ) , +ZSD(K+L),0 . REST OF HTBL @#@@@[GW )@@G@@ LIST . ___MPTY @[^^+WINPUT FILE I*[S@@@*SDFF*@F@@@C. GX )@@G@@ THIS IS THE STORAGE AREA MAP FOR THE ATTRIBUTE LISTER @F@@@C. GY )@@G@@ IT MUST APPEAR AFTER PLTVDS IN THE ATTRIBUTE LISTING @#@@@C. GZ )@@G@@ ROUTINES @[@@@C. @D@D@CBUFFER SFW 22 . 22 WRODHA )@@G@@ PRINT LINE @D@@@DBUFFER SFW 33 . 33 WORD PRINT LINE HB )@@G@@@G@D@CPKAREA SF . START OF TOP FULL WORD STORAGE HC )@@G@@. @F@@@CWRKARE SF . WORKAREA FOR PRINT ROUTINHD )@@G@@ES @D@D@CCHARSA EQU WRKARE+FS1 . SPACE FOR SYMBOL @D@@@DHE )@@G@@CHARSA EQU WRKARE+FQ1 . SPACE FOR SYMBOL @G@@@DPKAREA SF HF )@@G@@. START OF TOP FULL WORD STORAGE . @D@D@CSTRSIZHG )@@G@@ EQU HTBLS-PKAREA . SIZE OF FREE AREA @D@@@DSTRSIZ EQU DHH )@@G@@ERMSP-PKAREA . SIZE OF FREE AREA @G@@@C ORIGIN TVHTST . HI )@@G@@ SET TO START OF HALF WORD STORAGE . @E@@@CTABBEG EQU ADPCBE HJ )@@G@@. BEGINNING OF SORT TABLE @E@@@CTABEND SH2 . HK )@@G@@ END OF SORT TABLE AREA @D@@@CTABSIZ SH2 . SHL )@@G@@IZE OF THAT TABLE @F@@@CVARNUM SH2 . NUMBER OF VARHM )@@G@@IABLES SORTED @G@@@DCURBCD SH2 . CURRENT VAR'SHN )@@G@@ BCD IN REF LISTING @G@@@CSTORAGE SH2 . NUMBER HO )@@G@@OF TIMES EXTRA STORAGE GOTTEN @D@@@ESAVA2 SH2 . SHP )@@G@@AVE PLACE FOR A2 @D@@@ESAVX10 SH2 . SAVE PLACE FOHQ )@@G@@R X10 @^@G@F SAVA6 SH2 . @D@@@FSAVA6 SH2 . HR )@@G@@ SAVE THRU GOPRTL @D@@@FSAVA3 SH2 . SAVE THHS )@@G@@RU GOPRTL ___SH2 . SAVE THRU GOPRTL ___ @C@[@@HT )@@G@@ 002420 74 04 00 00 0 002423 @A@[@@ HU )@@G@@*[S@@@*SDFF*@#@@@@ AXR$ @#@@@@ DCLRG @#@@@@ HV )@@G@@ SSWS @[@@@@$(3) @#@@@@BEGIN* LABEL . @^@@@@ LX,U X5,1HW )@@G@@ . @^@@@@ DL A3,BLANK @^@@@@ DS A3,INPUTF@ @@@@HX )@@G@@ DS A3,INPUTF+2 @ @@@@ DS A3,INPUTF+4 @ @@@@HY )@@G@@ DS A3,INPUTF+6 @ @@@@LOOP LA A0,(EOF,INPUTF) @^@@@@HZ )@@G@@ LOADD A7,KBLANK@ @@@@ DS A7,OUTPUT+8 @ @@@@ IA )@@G@@ DS A7,OUTPUT+10 @^@@@@ ER AREAD$ @^@@@@ LXIIB )@@G@@,U A0,0 . @^@@@@ LX,U X1,INPUTF@ @@@@ LX,U X2,OUTPUTIC )@@G@@+8 @^@@@@ LXI,U X1,1 @^@@@@ LXI,U X2,1 @^@@@@ID )@@G@@ LR R1,A0 @ @@@@ BT X2,0,*X1 . @^@@@@ IE )@@G@@ LA A7,A0 . @H@@@@ LMJ X11,HASH . A8+LOC, A7=OFFSET A9=NIF )@@G@@O COLLISIONS A10=LOC FINAL @ @@@@ AA,U A9,'0' . ASCII @^@@@@IG )@@G@@ CVE A7,R @ @@@@ SA A4,OUTPUT+4 @^@@@@ IH )@@G@@ CVE A8,R @ @@@@ SA A4,OUTPUT+2 @^@@@@ SA II )@@G@@ A9,OUTPUT@^@@@@ CVE A10,R @ @@@@ SA A4,OUTPUTIJ )@@G@@+6 @^@@@@PF FORM 12,6,18 @A@@@@ LA A0,(PF 1,20,OUTIK )@@G@@PUT) @^@@@@ ER APRINT$ @^@@@@ J LOOP @]@@@@IL )@@G@@EOF ER EXIT$@#@@@@/ . HASH FUNCTION @#@@@@HASH LA,U A8,0 @#@@@@ IM )@@G@@ AN,U A7,1@^@@@@ LA,U A2,INPUTF @#@@@@ LXI,U A2,1 @^@@@@IN )@@G@@HASHLP AA A8,0,*A2 @^@@@@ JGD A7,HASHLP@^@@@@ LA,IO )@@G@@U A7,0 @^@@@@ DI,U A7,1023 @^@@@@ LX A1,A8 IP )@@G@@@^@@@@ AX,U A1,HASHLT @^@@@@ LA,U A7,31 @#@@@@ IQ )@@G@@ LA,U A9,0@#@@@@HASHSE TNZ 0,A1 @#@@@@ J FND@#@@@@ IR )@@G@@ AA,U A9,1@#@@@@ AX A1,A7 @ @@@@ TLE,U A1,HASHLT+1023 IS )@@G@@@^@@@@ J HASHSE @^@@@@ AN,U A1,1023 @^@@@@ IT )@@G@@ J HASHSE @#@@@@FND SX X5,0,A1 @^@@@@ AN,U A1,HASHLT IU )@@G@@@^@@@@ LA A10,A1 @^@@@@ J 0,X11 @#@@@@/ . DAIV )@@G@@TA STORAGE @[@@@@$(4) .@#@@@@INPUTF RES 20 @[@@@@OUTPUT@#@@@@ DOIW )@@G@@ 33 , ' '@#@@@@BLANK ' ' @[@@@@HASHLT@#@@@@ UNLIST IX )@@G@@@#@@@@ DO 1024 , +0 @#@@@@ LIST @^@@@@FILL(1) CSECT IY )@@G@@3 @[@@@@KBLANK@^@@@@ ' '@]@@@@DRNSTK . @^@@@@IZ )@@G@@ DO 15 , +0 @[@@@@SS$$WK@#@@@@ DO 4 , +0 @#@@@@ JA )@@G@@ CEND @#@@@@ END BEGIN___A HASHLT*[S@@@*SDFF*@E@@@-DSALCNJB )@@G@@ SF . CURRENT BLOCK (FIELDATA)@E@@@-DSALBN SF JC )@@G@@. CURRENT BLOCK DEPTH @F@@@-DSALDN SF . JD )@@G@@ CURRENT DO NEST LEVEL ('') @F@@@-DSALSN SF . JE )@@G@@ CURRENT STATEMENT NUMBER('') @E@@@-DSPX2 SF . JF )@@G@@ SDSPLY SAVE AREA FOR X2 @E@@@-DSPA2 SF . JG )@@G@@ SDSPLY SAVE AREA FOR A2 @C@@@-. THE NEXT TWO WORDS OF SQ'S MJH )@@G@@UST NOT BE ALTERED@D@@@-DSCNT SQ . UTILITY COUNJI )@@G@@T @E@@@-DSCNTI SQ . CONT + SUPPLIED IND. JJ )@@G@@@C@@@-DSPUTI SQ . PUT IND. @C@@@-DSACTL SQ JK )@@G@@. CONTROL BYTE@D@@@-DSGTCL EQU DSACTL . JL )@@G@@ GET OR PUT CONTROL @E@@@-DSALND SQ . STRUCTJM )@@G@@URE LEVEL IND. @E@@@-DSADSC SQ . STATEMENT DIJN )@@G@@SCARDED IND.@D@@@-DSATYP SQ . STATEMENT TYPE JO )@@G@@@C@@@-. 0001= PROCEDURE 0002=BEGIN 0004=DO @C@@@-. 0010= IF JP )@@G@@ 0020=END 0040=GET @]@@@-. 0100= PUT @E@@@-DSPFXN SQ JQ )@@G@@. NEXT STATE PREFIXES @C@@@-. 0001=ELSE ALLOWEJR )@@G@@D (CONTINUE) 0002=ELSE PRESENT@C@@@-. 0004=THEN REQUIRED(STMT SUPL)0010=JS )@@G@@THEN PRESENT@D@@@-. 0020=LABEL REQUIRED 0040=LABEL PRESENT JT )@@G@@@E@+@-. 0100=CONDITION PRESENT 0200= CHECK/NOCHK PRESENT @E@@@+JU )@@G@@. 0100=CASE PREFIX NEEDED 0200= CHECK/NOCHK PRESENT @#@@@-. 0400JV )@@G@@=ST ST FLAG @B@@@-. STACKS USED BY LEXI AND SYNA @F@@@-DLXESKJW )@@G@@ SFW 8 . LEXI ERROR STACK (4 ENTRIES) @A@@@-. JX )@@G@@ LAYOUT OF ERROR STACK ENTRY@D@@@-. +---------------------+----JY )@@G@@-----------------+@D@+@-. ! B CODE START ! ///////////JZ )@@G@@ !@D@@@+. ! B CODE START ! NUM ERRORS !@D@@@-KA )@@G@@. +----------+----------+----------+----------+@D@+@-. ! #KB )@@G@@ ERRORS ! ERROR 1 ! ERROR 2 ! ERROR 3 !@D@@@+. ! ERROR 1 ! ERKC )@@G@@ROR 2 ! ERROR 3 ! ERROR 4 !@D@@@-. +----------+----------+----KD )@@G@@------+----------+@D@@@-DLXESE SFW 0 . END ERROR STKE )@@G@@ACK @C@@@-SAW EQU 0001 . WARNING @B@@@-SAE KF )@@G@@ EQU 0002 . ERROR @D@@@-SAS EQU 0004 . KG )@@G@@ SERIOUS ERROR @F@@@-SAT EQU 0010 . TERMINKH )@@G@@AL ERROR (IN COMPILER) @E@+@-DSAECT SQ . ERROR KI )@@G@@MESSAGE COUNT @^@+@- ORIGIN DSAECT .@E@@@-DSAESK SFW 1 .KJ )@@G@@ CURRENT STATEMENT STACK @E@@@-DSAASK SFW 4 . KK )@@G@@ CURRENT ATTR ERROR STACK@D@@@-DSAPSK SFW 16 . KL )@@G@@ PARENTHESIS STACK @D@@@-DSAPSKP SFW 0 . END PAKM )@@G@@REN STACK @ @@@-. LAYOUT OF PAREN STACK@D@@@-. +--------KN )@@G@@-------------+----------+----------+@D@@@-. ! PTR TO LEFT PAREN KO )@@G@@ ! # ARGS ! PAREN TPE!@D@@@-. +---------------------+----------KP )@@G@@+----------+@E@@@-SACPSW EQU 1 . SIZE OF STACK ENTRKQ )@@G@@Y @E@+@-DSAISK SFW 10 . IF STACK (10 ENTRIES) KR )@@G@@@E@@@+DSAISK SFW 20 . IF STACK (20 ENTRIES) @#@@@-KS )@@G@@DSAISKE SFW 0 .@#@@@-SACISW EQU 1 .@E@+@-DSABSK SFW 40 . KT )@@G@@ BLOCK STACK (10 ENTRIES)@E@@@+DSABSK SFW 80 . KU )@@G@@ BLOCK STACK (20 ENTRIES)@#@@@-DSABSKE SFW 0 .@#@@@-SACBSW EQUKV )@@G@@ 4 .@E@+@-DSADSK SFW 100 . DECLARE (50 ENTRIES) KW )@@G@@@E@@@+DSADSK SFW 240 . DECLARE (120 ENTRIES) @#@@@-KX )@@G@@DSADSKE SFW 0 .@#@@@-SACDSW EQU 2 .@E@+@-DSADFSK SFW 6 . KY )@@G@@ DECLARE FACTOR (6 DEEP) @F@@@+DSADFSK SFW 10 . KZ )@@G@@ DECLARE FACTOR (10 DEEP) @#@@@-DSADFSKE SFW 0 .@#@@@-SACDFSLA )@@G@@K EQU 1 .@D@@@-DRVEND SF . END OF STATEMENT LB )@@G@@@C@@@-DRVSVE SFW 2 . SAVE AREA @D@@@-DRVSGC SFWLC )@@G@@ 2 . GETC SAVE AREA @E@@@-DRVSV1 SFW 5 . LD )@@G@@ MAIN REVERSE SAVE AREA @E@@@- ORIGIN TVHTST . LE )@@G@@ SET HALFWORD CONSTANTS @E@@@-DSADCN SH2 . LF )@@G@@CURRENT STATEMENT NUMBER@E@@@-DSADBN SH2 . CURRENLG )@@G@@T BLOCK LEVEL @D@@@-DSADDN SH2 . DO NESTING LLH )@@G@@EVEL @E@+@-DSADSN SH2 . CURRENT STATEMENT NUMBERLI )@@G@@@B@=@+FILL(1) SH2 . UNUSED@E@@@=DSAOBC SH2 . LJ )@@G@@ PTR TO ACON IN BCODE @D@@@-DSBKST SH2 . LK )@@G@@ BLOCK SD TEMP @E@@@-DSALSP SH2 . LL )@@G@@LAST STATEMENT POINTER @C@@@-DSAEND SH2 . BLOCK LM )@@G@@ENDED @E@<@-DSDNOS SH2 . NUMBER OF SD'S IN BLOCK LN )@@G@@@B@@@DSACDN SH2 . ENABLED CONDITIONS OW )@@G@@@D@@@>DSACDF SH2 . DISABLED CONDITIONS___SQ3 . OX )@@G@@ D BYTE@C@@@-DSAXSD SQ4 . SD CONOY )@@G@@TROL @D@@@-DSANPR SQ3 . *[S@@@*SDFF*@^@@@@STKCHKOZ )@@G@@* PROC *1,2 . @C@@@@ DO STKCHK(1,2)=R , LR R10,STKCHK(1,1) .PA )@@G@@@D@@@@ DO STKCHK(1,2)=I , LR,U R10,STKCHK(1,1) . @ @@@@ PB )@@G@@ LMJ X11,EXSTCH . @#@@@@ END . @^@@@@RTSAVE* PROC *1,PC )@@G@@4 @ @@@@ LMJ X5,EXMST . @ @@@@ SA A0,DRTSA0PD )@@G@@ . @A@@@@ LA,U A0,RTSAVE(1,1) . @ @@@@ SA A0,PE )@@G@@DRTNAM . @#@@@@ END . @C@@@@RDOPEN* PROC *2,3 . PF )@@G@@ OPEN IOCB @^@@@@ LINK EXLXRO . @A@@@@ +RDOPEN(1PG )@@G@@,1),RDOPEN(1,2) . @ @@@@ +RDOPEN(1,3),0 . @#@@@@ ENDPH )@@G@@ . @C@@@@WROPEN* PROC *2,3 . OPEN IOCB @^@@@@ PI )@@G@@ LINK EXLXWO . @A@@@@ +WROPEN(1,1),WROPEN(1,2) . @ @@@@ PJ )@@G@@ +WROPEN(1,3),0 . @#@@@@ END . @^@@@@WRIOCB* PROC *0,1PK )@@G@@ . @#@@@@RDIOCB* NAME . @^@@@@ LINK EXLXGI . @#@@@@ PL )@@G@@ END . @^@@@@PUTCH* PROC *1,2 . @A@@@@ LOAD A8,PUTCH(PM )@@G@@1,1),I . @^@@@@ LINK WRPFD1 . @#@@@@ END . @^@@@@PN )@@G@@WRPRNT* PROC *1,1 . @^@@@@ LINK EXLXWP . @#@@@@ ENDPO )@@G@@ . @^@@@@RDREAD* PROC *1,2 . @^@@@@ LINK EXLXRR . @ @@@@PP )@@G@@ GOTO RDREAD(1,2) . @#@@@@ END . @^@@@@WRCLOS* PRPQ )@@G@@OC *1,1 . @^@@@@ LINK EXLXCL . @#@@@@ END . ___@@@PR )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@*[S@@@*SDFF*@[@@@FA @[@@@FABS @[@@@FADD PS )@@G@@@[@@@FAFTER @]@@@FALLOCATE @]@@@FALLOCATION @[@@@FAREA @[@@@FATAN PT )@@G@@@[@@@FATAND @]@@@FAUTOMATIC @[@@@FB @[@@@FBASED @[@@@FBEFORE@[@@@FPU )@@G@@BEGIN @[@@@FBIN @[@@@FBINARY@[@@@FBIT @[@@@FBOOL @]@@@FBUILTIN PV )@@G@@@[@@@FBY @[@@@FC @[@@@FCALL @[@@@FCEIL @[@@@FCHAR @]@@@FCHARACPW )@@G@@TER @[@@@FCHECK @[@@@FCLOCK @[@@@FCLOSE @[@@@FCOL @]@@@FCOLLATE PX )@@G@@@[@@@FCOLUMN@]@@@FCOMPLEX @[@@@FCONJG @]@@@FCONTROLLED @[@@@FCOPY PY )@@G@@@[@@@FCOS @[@@@FCOSD @[@@@FCSF @[@@@FCTL @[@@@FDATA @[@@@FDATE PZ )@@G@@@[@@@FDCL @[@@@FDEC @[@@@FDECAT @]@@@FDECIMAL @]@@@FDECLARE QA )@@G@@@[@@@FDIM @[@@@FDIVIDE@[@@@FDO @[@@@FDOT @[@@@FE @[@@@FEDIT QB )@@G@@@[@@@FEVERY @[@@@FELSE @[@@@FEMPTY @[@@@FEND @]@@@FENDFILE @[@@@FQC )@@G@@ENTRY @[@@@FERROR @[@@@FEXIT @[@@@FEXP @]@@@FEXTERNAL @[@@@FEXT QD )@@G@@@[@@@FF @[@@@FFILE @[@@@FFIXED @[@@@FFLOAT @[@@@FFLOOR @[@@@FFLOW QE )@@G@@@[@@@FFORMAT@[@@@FFREE @[@@@FGET @[@@@FGO @[@@@FGOTO @[@@@FHBOUNDQF )@@G@@@[@@@FHIGH @[@@@FIF @[@@@FIMAG @]@@@FIMAGINARY @[@@@FIN @[@@@FQG )@@G@@INDEX @[@@@FINIT @]@@@FINITIAL @[@@@FINPUT @[@@@FINT @]@@@FINTERNQH )@@G@@AL @[@@@FLABEL @[@@@FLBOUND@[@@@FLENGTH@[@@@FLINE @]@@@FLINESIZE QI )@@G@@@[@@@FLINENO@[@@@FLIST @[@@@FLOG @[@@@FLOG10 @[@@@FLOG2 @[@@@FLOW QJ )@@G@@@[@@@FMAIN @[@@@FMAX @[@@@FMIN @[@@@FMOD @]@@@FMULTIPLY @]@@@FQK )@@G@@NOCHECK @[@@@FNOFLOW@]@@@FNONVARYING @[@@@FNULL @[@@@FOPEN @]@@@FQL )@@G@@OPTIONS @[@@@FOUTPUT@[@@@FPAGE @[@@@FPAGENO@]@@@FPAGESIZE @]@@@FQM )@@G@@POINTER @[@@@FPTR @]@@@FPRECISION @[@@@FPRINT @[@@@FPROC @]@@@FQN )@@G@@PROCEDURE @[@@@FPROD @[@@@FPUT @[@@@FR @[@@@FRAND @[@@@FREAL QO )@@G@@@]@@@FRECURSIVE @[@@@FREFER @[@@@FREPEAT@[@@@FRETURN@]@@@FRETURNS QP )@@G@@@]@@@FREVERSE @[@@@FROUND @]@@@FSEQUENTIAL @[@@@FSET @[@@@FSIGN QQ )@@G@@@[@@@FSIGNAL@[@@@FSIN @[@@@FSIND @[@@@FSKIP @[@@@FSOME @[@@@FSQRT QR )@@G@@@[@@@FSTATIC@[@@@FSTRING@[@@@FSTOP @[@@@FSTREAM@[@@@FSUBSTR@]@@@FSUBTRAQS )@@G@@CT @[@@@FSUM @[@@@FTAN @[@@@FTAND @[@@@FTHEN @[@@@FTIME @[@@@FQT )@@G@@TITLE @[@@@FTO @]@@@FTRANSLATE @[@@@FTRUNC @[@@@FUNSPEC@[@@@FVAR QU )@@G@@@]@@@FVARYING @[@@@FVERIFY@[@@@FWHILE @[@@@FX @]@@@FSYSPRINT QV )@@G@@@[@@@FSYSIN @[@@@F 1 @[@@@F 0 @[@G@FTRIM @[@@@GTRIM @[@@@FALLOC QW )@@G@@@[@@@FALLOCN@[@@@FSEQL @]@@@FDIMENSION @[@@@FPREC @[@@@GCPLX @[@@@GQX )@@G@@ADDR @[@@@GNAME @[@@@GCASE @[@@@GLEAVE @[@@@GREAD @[@@@GWRITE @[@@@GQY )@@G@@RECORD@[@@@GKEY @[@@@GKEYED @[@@@GFROM @[@@@GINTO @[@@@GENV @]@@@GQZ )@@G@@ENVIRONMENT @]@@@GFIELDATA @[@@@GREWIND@[@@@GOFFSET@[@@@GNULLO @[@@@GRA )@@G@@ON @[@@@GREVERT@[@@@GSNAP @[@@@GSYSTEM@[@@@GSIZE @#@@@GSUBSCRIPTRANRB )@@G@@GE @[@@@GSUBRG @]@@@GSTRINGRANGE @[@@@GSTRG @]@@@GSTRINGSIZE @[@@@GRC )@@G@@STRZ @]@@@GCONVERSION @[@@@GCONV @#@@@GFIXEDOVERFLOW @[@@@GFOFL RD )@@G@@@]@@@GOVERFLOW @[@@@GOFL @]@@@GUNDERFLOW @[@@@GUFL @]@@@GZERODIRE )@@G@@VIDE @[@@@GZDIV @[@@@GFINISH@]@@@GSTORAGE @]@@@GCONDITION @]@@@GRF )@@G@@ENDPAGE @#@@@GUNDEFINEDFILE @[@@@GUNDF @]@@@GTRANSMIT @[@@@GRG )@@G@@NOSIZE@]@@@GNOSUBRG @[@@@GNOSTRG@[@@@GNOSTRZ@[@@@GNOCONV@[@@@GNOFOFLRH )@@G@@@[@@@GNOOFL @[@@@GNOUFL @[@@@GNOZDIV@#@@@GNOSUBSCRIPTRANGE @#@@@GNOSTRIRI )@@G@@NGRANGE @]@@@GNOSTRINGSIZE@]@@@GNOCONVERSION@#@@@GNOFIXEDOVERFLOW RJ )@@G@@@]@@@GNOOVERFLOW @]@@@GNOUNDERFLOW @]@@@GNOZERODIVIDE@[@@@HONCODE@[@@@IRK )@@G@@ONSTMT@[@@@IONCHAR@]@@@IONSOURCE @[@@@JONLOC @[@@@JONFILE@]@@@JONFIELRL )@@G@@D ___@@[R;@^S'9(G@@@'=@@[GR#)^FA9!,@@]9(?@@D9!,@@A9(?@@FR3?@@AA#!^U+RM )@@G@@*[S@@@*SDFF*@^@[@@. COPYRIGHT 1975 BY @C@#@[. COPYRIGHT 1975 BY UNRN )@@G@@IVERSITY OF MARYLAND @C@@@#. COPYRIGHT 1976 BY THE UNIVERSITY OF MARO )@@G@@RYLAND@[@@@[. @D@@@[. QUESTIONS CONCERNING THIS SHOULD BE DIRECTEDRP )@@G@@ TO: @[@@@[. @ @@@@. MARVIN V. ZELKOWITZ @A@[@@. COMRQ )@@G@@PUTER SCIENCE CENTER @B@@@[. DEPARTMENT OF COMPUTER SCIENCE RR )@@G@@@A@@@@. UNIVERSITY OF MARYLAND @B@@@@. COLLEGE PARK, MRS )@@G@@ARYLAND 20742 @[@@@@. @G@@@@. PERMISSION TO USE THESE LISRT )@@G@@TINGS AND THE COMPUTER PROGRAMS THEY@E@@@@. REPRESENT IS GRANTED UNDERRU )@@G@@ THE FOLLOWING CONDITIONS: @[@@@@. @G@@@@. 1. UNLIMITED USRV )@@G@@E MAY BE MADE OF THE PROGRAMS REPRESENTED BY @G@@@@. THESE LISTINGSRW )@@G@@ PROVIDED THAT THE NAME PLUM OR UNIVERSITY OF MARYLAND@E@@@@. PL/1 COMRX )@@G@@PILER REMAINS ASSOCIATED WITH THESE PROGRAMS. @[@@@@. @F@@@@. RY )@@G@@ 2. MODIFICATIONS MAY BE MADE TO THE LISTINGS PROVIDED: @[@@@@. RZ )@@G@@@G@@@@. (A) ANY RESULTING PROGRAM, OR REPORT, PAPER OR DOCUMENTATSA )@@G@@ION @G@@@@. DESCRIBING SUCH PROGRAM WILL CLEARLY INDICATE THAT SB )@@G@@THE PROGRAM @E@@@@. IS A DIALECT OF PLUM OR IS DERIVED FROM PLUM,SC )@@G@@ AND @[@@@@. @G@@@@. (B) ALL SUCH MODIFICATIONS, OTHER THAN SD )@@G@@TRIVIAL CORRECTIONS @F@@@@. OF ERRORS IN THE SOURCE PROGRAMS,SE )@@G@@ SHALL BE REPORTED AND @G@@@@. A BRIEF DESCRIPTION OF THE FEATURSF )@@G@@E ADDED SHALL BE SUBMITTED @C@@@@. TO THE UNIVERSITY OF MARYLASG )@@G@@ND, AND @[@@@@. @F@@@@. (C) NO PROGRAMS DERIVED FROM THESSH )@@G@@E LISTINGS SHALL BE SOLD@G@@@@. WITHOUT WRITTEN APPROVAL FROM THESI )@@G@@ UNIVERSITY OF MARYLAND, AND @[@@@@. @F@@@@. (D) COPIES OF TSJ )@@G@@HESE PROGRAMS MAY BE TRANSMITTED TO OTHER @G@@@@. LOCATIONS PROVISK )@@G@@DED THAT SUCH TRANSMITTALS CLEARLY INDICATE @G@@@@. WHETHER TSL )@@G@@HE PROGRAMS ARE EXACT COPIES OF THE UNIVERSITY OF @E@@@@. MARSM )@@G@@YLAND PLUM COMPILER OR ARE MODIFICATIONS TO IT. @[@@@@. @G@@@@. SN )@@G@@ 3. THESE CONDITIONS ONLY APPLY TO THE PLUM COMPILER ITSELF, @F@@@@SO )@@G@@. AND ARE NOT MEANT TO APPLY TO ANY PROGRAM WRITTEN USING PLUM. @E@@@@SP )@@G@@. THE PURPOSE OF THESE CONDITIONS IS TO ALLOW ANY USER TO @F@@@@. EXSQ )@@G@@PERIMENT WITH THE COMPILER AS LONG AS THE RESULTING PRODUCT @G@@@@. ISSR )@@G@@ NOT SOLD AND AS LONG AS IT IS KNOWN THAT THE PRODUCT DEVELOPED @#@@@@SS )@@G@@. FROM PLUM. @[@@@@. @[@@@@. @[@@@@. @[@@@@. @[@@@@ST )@@G@@. @[@@@]/. ___@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@SU )@@G@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@SV )@@G@@*[S@@@*SDFF*@D@U@TZSD(77) EQU SDA1BC . PREDEFINE CONSTANT 1SW )@@G@@@E@@@UZSD(77+1) EQU SDA1BC . PREDEFINE CONSTANT 1 @C@U@TSX )@@G@@ZSD(76) EQU SDA0BC . CONSTANT 0 @C@@@UZSD(76+1) EQU SY )@@G@@ SDA0BC . CONSTANT 0@C@@@UZSD(83+1) EQU SDNOBC . SZ )@@G@@ NULLO BCD @B@U@TZSD(85) EQU SDINBC . SYSIN SD@C@@@UZSD(85TA )@@G@@+1) EQU SDINBC . SYSIN SD @C@@@UZSD(145+1) EQU SDNLBTB )@@G@@C . NULL BCD @C@U@TZSD(945) EQU SDOTBC . SYSPRINTC )@@G@@T SD @C@@@UZSD(945+1) EQU SDOTBC . SYSPRINT SD@B@@@T TD )@@G@@ ZZ 192,ACFTA,LXFITM,1 'A ' .@C@@@T ZZ 226,ACABS,LXBIFTE )@@G@@,3,BFABS 'ABS ' . @C@@@T ZZ 219,ACADBF,LXBIF,3,BFADD 'ADD ' .TF )@@G@@@D@@@T ZZ 269,ACADDR,LXBIF,4,BFADDR 'ADDR' . @E@@@T TG )@@G@@ ZZ 75,ACAFTR,LXBIF,5,BFAFTR 'AFTE','R ' . @C@@@T ZZ TH )@@G@@ 24,ACALLC,LXRSWD,8 'ALLO','CATE' @C@@@T ZZ 720,ACALLC,LXRSWD,TI )@@G@@5 'ALLO','C ' @F@@@T ZZ 489,ACALCN,LXBIF,10,BFALCN 'ALLO'TJ )@@G@@,'CATI','ON ' @E@@@T ZZ 220,ACALCN,LXBIF,6,BFALCN 'ALLO',TK )@@G@@'CN ' . @B@U@T ZZ 256,ACAREA,LXATTR,4 'AREA' @D@@@U TL )@@G@@ DO AD$DR , ZZ 256,ACAREA,LXATTR,4 'AREA' @C@@@U DO AD$DR=TM )@@G@@0 , ZZ 256,0,0,4 'AREA' @C@@@T ZZ 779,ACATAN,LXBIF,4,BFTN )@@G@@ATAN 'ATAN' @D@@@T ZZ 363,ACATND,LXBIF,5,BFATND 'ATAN','D 'TO )@@G@@@E@@@T ZZ 995,ACAUTO,LXATTR,9 'AUTO','MATI','C ' . @B@@@TTP )@@G@@ ZZ 320,ACFTB,LXFITM,1 'B ' .@D@@@T ZZ 711,ACBASTQ )@@G@@D,LXATTR,5 'BASE','D ' . @E@@@T ZZ 215,ACBFOR,LXBIF,6,BFTR )@@G@@BFOR 'BEFO','RE ' . @D@@@T ZZ 967,ACBGIN,LXRSWD,5 'BEGI',TS )@@G@@'N ' . @B@@@T ZZ 609,ACBIN,LXATTR,3 'BIN ' .@E@@@T TT )@@G@@ ZZ 211,ACBIN,LXATTR,6,BFCVBN 'BINA','RY ' . @D@@@T ZZ TU )@@G@@ 612,ACBIT,LXATTR,3,BFCVBT 'BIT ' . @D@@@T ZZ 655,ACBOOTV )@@G@@L,LXBIF,4,BFBOOL 'BOOL' . @D@@@T ZZ 1009,ACBULT,LXATTR,7 TW )@@G@@'BUIL','TIN ' . @B@@@T ZZ 590,ACBY,LXRSWD,2 'BY ' . @B@@@TTX )@@G@@ ZZ 448,ACFTC,LXFITM,1 'C ' .@C@@@T ZZ 778,ACCALTY )@@G@@L,LXRSWD,4 'CALL' . @C@@@U ZZ 263,ACCASE,LXKYWD,4 'CASE' TZ )@@G@@. @C@@@T ZZ 297,ACCEIL,LXBIF,4,BFCEIL 'CEIL' @D@@@T UA )@@G@@ ZZ 13,ACCHAR,LXATTR,4,BFCVCH 'CHAR' . @F@@@T ZZ 343UB )@@G@@,ACCHAR,LXATTR,9,BFCVCH 'CHAR','ACTE','R ' . @C@@@T ZZ 449UC )@@G@@,ACCHK,LXKYWD,5 'CHEC','K ' @E@@@T ZZ 455,ACCLCK,LXBIF,5,BFUD )@@G@@CLCK 'CLOC','K ' . @D@@@T ZZ 726,ACCLOS,LXRSWD,5 'CLOS',UE )@@G@@'E ' . @C@@@T ZZ 257,ACFTCL,LXFITM,3 'COL ' . @D@U@TUF )@@G@@ ZZ 1005,ACCLAT,LXBIF,7,BFCLAT 'COLL',ATE '@E@@@U ZZ UG )@@G@@ 1005,ACCLAT,LXBIF,7,BFCLAT 'COLL','ATE ' @D@@@T ZZ 484UH )@@G@@,ACFTCL,LXFITM,6 'COLU','MN ' . @E@@@T ZZ 633,ACCMPX,LXATUI )@@G@@TR,7,BFCPLE 'COMP','LEX ' . @D@@@T ZZ 538,ACCMPX,LXATTR,4,BUJ )@@G@@FCPLE 'CPLX' . @E@@@U ZZ 858,ACCDCD,LXKYWD,9 'COND','ITIO'UK )@@G@@,'N ' @D@@@T ZZ 268,ACCONJ,LXBIF,5,BFCONJ 'CONJ','G 'UL )@@G@@@E@@@T ZZ 113,ACCTL,LXATTR,10 'CONT','ROLL','ED ' . @E@@@UUM )@@G@@ ZZ 533,ACCDCV,LXKYWD,10 'CONV','ERSI','ON ' @B@@@U UN )@@G@@ ZZ 281,ACCDCV,LXKYWD,4 'CONV' @B@@@T ZZ 483,ACCTL,LXATTUO )@@G@@R,3 'CTL ' @D@@@T ZZ 285,ACCOPY,LXKYWD,4,BFCPBF 'COPY' . UP )@@G@@@C@@@T ZZ 741,ACCOS,LXBIF,3,BFCOS 'COS ' @C@@@T ZZ UQ )@@G@@ 777,ACCOSD,LXBIF,4,BFCOSD 'COSD' @C@@@T ZZ 224,ACCSF$,LXBIUR )@@G@@F,3,BFCSF$ 'CSF ' @C@@@T ZZ 899,ACDATA,LXKYWD,4 'DATA' . US )@@G@@@C@@@T ZZ 903,ACDATE,LXBIF,4,BFDATE 'DATE' @B@@@T ZZ UT )@@G@@ 351,ACDCL,LXRSWD,3 'DCL ' .@B@@@T ZZ 347,ACDEC,LXATTR,3 'DUU )@@G@@EC ' .@D@@@T ZZ 958,ACDCAT,LXBIF,5,BFDCAT 'DECA','T '@E@@@TUV )@@G@@ ZZ 356,ACDEC,LXATTR,7,BFCVDC 'DECI','MAL ' . @D@@@T UW )@@G@@ ZZ 614,ACDCL,LXRSWD,7 'DECL','ARE ' . @C@@@T ZZ 353UX )@@G@@,ACDIM,LXBIF,3,BFDIM 'DIM ' @E@@@T ZZ 346,ACDIM,LXBIF,9,BFDUY )@@G@@IM 'DIME','NSIO','N ' @D@U@T ZZ 728,ACDIVF,LXBIF,6,BFDIVF 'UZ )@@G@@DIVI','DE '@D@@@U ZZ 759,ACDIVF,LXBIF,6,BFDIVF 'DIVI','DE 'VA )@@G@@@B@@@T ZZ 332,ACDO,LXRSWD,2 'DO ' . @C@@@T ZZ 358VB )@@G@@,ACDOTF,LXBIF,3,BFDOTF 'DOT ' @B@@@T ZZ 704,ACFTE,LXFITM,1 'EVC )@@G@@ ' .@C@@@T ZZ 274,ACEDIT,LXKYWD,4 'EDIT' . @B@@@U VD )@@G@@ ZZ 262,ACENV,LXATTR,3 'ENV ' @E@@@U ZZ 648,ACENV,LXATTVE )@@G@@R,11 'ENVI','RONM','ENT ' @D@@@T ZZ 981,ACEVRY,LXBIF,5,BFVF )@@G@@EVRY 'EVER','Y '@C@@@T ZZ 266,ACELSE,LXRSWD,4 'ELSE' . VG )@@G@@@D@@@T ZZ 250,ACEMPT,LXBIF,5,BFEMPT 'EMPT','Y '@B@@@T VH )@@G@@ ZZ 222,ACEND,LXRSWD,3 'END ' .@D@U@T ZZ 994,ACENDF,LXBIVI )@@G@@F,7,BFENDF 'ENDF','ILE '@C@@@U ZZ 994,ACCDEF,LXKYWD,7 'ENDF',VJ )@@G@@'ILE '@C@@@U ZZ 746,ACCDEP,LXKYWD,7 'ENDP','AGE '@D@@@T VK )@@G@@ ZZ 475,ACENTY,LXRSWD,5 'ENTR','Y ' . @D@U@T ZZ 599VL )@@G@@,ACERRR,LXKYWD,5 'ERRO','R ' . @D@@@U ZZ 599,ACCDER,LXKYVM )@@G@@WD,5 'ERRO','R ' . @C@@@T ZZ 279,ACEXIT,LXRSWD,4 'EXIT' VN )@@G@@. @C@@@T ZZ 742,ACEXP,LXBIF,3,BFEXP 'EXP ' @D@@@T VO )@@G@@ ZZ 152,ACEXT,LXATTR,8 'EXTE','RNAL' . @B@@@T ZZ 744VP )@@G@@,ACEXT,LXATTR,3 'EXT ' @B@@@T ZZ 832,ACFTF,LXFITM,1 'F ' .VQ )@@G@@@C@@@U ZZ 525,ACFLDA,LXKYWD,8 'FIEL','DATA'@C@@@T ZZ VR )@@G@@ 134,ACFILX,LXATTR,4 'FILE' . @C@@@U ZZ 630,ACCDFN,LXKYVS )@@G@@WD,6 'FINI','SH '@E@@@T ZZ 716,ACFIXD,LXATTR,5,BFCVFX 'FIXE'VT )@@G@@,'D ' . @F@V@U ZZ 533,ACCDFO,LXKYWD,13 'FIXE','DOVE','RFLVU )@@G@@O','W ' @F@@@V ZZ 364,ACCDFO,LXKYWD,13 'FIXE','DOVE','RFLVV )@@G@@O','W ' @B@@@U ZZ 651,ACCDFO,LXKYWD,4 'FOFL' @E@@@T VW )@@G@@ ZZ 966,ACFLT,LXATTR,5,BFCVFL 'FLOA','T ' . @D@@@T ZZ VX )@@G@@ 724,ACFLR,LXBIF,5,BFFLR 'FLOO','R ' @C@@@T ZZ 410,ACFLOVY )@@G@@W,LXRSWD,4 'FLOW' . @D@@@T ZZ 863,ACFMAT,LXRSWD,6 'FORM',VZ )@@G@@'AT ' . @B@@@T ZZ 900,ACFREE,LXRSWD,4 'FREE' @B@@@U WA )@@G@@ ZZ 913,ACFROM,LXKYWD,4 'FROM' @B@@@T ZZ 228,ACGET,LXRSWWB )@@G@@D,3 'GET ' .@B@@@T ZZ 747,ACGO,LXRSWD,2 'GO ' . @C@@@T WC )@@G@@ ZZ 789,ACGOTO,LXRSWD,4 'GOTO' . @D@@@T ZZ 992,ACHBNWD )@@G@@D,LXBIF,6,BFHBND 'HBOU','ND '@C@@@T ZZ 902,ACHIGH,LXBIF,4,BFWE )@@G@@HIGH 'HIGH' @B@@@T ZZ 714,ACIF,LXRSWD,2 'IF ' . @C@@@T WF )@@G@@ ZZ 4,ACPVIM,LXBIF,4,BFIMAG 'IMAG' . @F@@@T ZZ 470,ACPVIWG )@@G@@M,LXBIF,9,BFIMAG 'IMAG','INAR','Y ' . @D@@@T ZZ 838,ACINDWH )@@G@@X,LXBIF,5,BFINDX 'INDE','X '@C@@@T ZZ 277,ACINIT,LXATTR,4 'WI )@@G@@INIT' . @D@@@T ZZ 756,ACINIT,LXATTR,7 'INIT','IAL ' . WJ )@@G@@@D@@@T ZZ 348,ACINPT,LXATTR,5 'INPU','T ' . @B@@@T WK )@@G@@ ZZ 773,ACINT,LXATTR,3 'INT ' .@B@@@T ZZ 809,ACIN,LXKYWDWL )@@G@@,2 'IN ' . @D@@@T ZZ 150,ACINT,LXATTR,8 'INTE','RNAL' . WM )@@G@@@B@@@U ZZ 820,ACINTO,LXKYWD,4 'INTO' @B@@@U ZZ 231WN )@@G@@,ACKEY,LXKYWD,3 'KEY ' @C@@@U ZZ 844,ACKEYD,LXATTR,5 'KEYE',WO )@@G@@'D '@D@@@T ZZ 480,ACLABL,LXATTR,5 'LABE','L ' . @D@@@TWP )@@G@@ ZZ 481,ACLBND,LXBIF,6,BFLBND 'LBOU','ND '@D@@@U ZZ WQ )@@G@@ 82,ACLEAV,LXRSWD,5 'LEAV','E ' . @D@@@T ZZ 469,ACLNTWR )@@G@@H,LXBIF,6,BFLNTH 'LENG','TH '@C@@@T ZZ 934,ACLINE,LXFITM,4 'WS )@@G@@LINE' . @D@@@T ZZ 500,ACLINF,LXBIF,6,BFLINO 'LINE','NO 'WT )@@G@@@D@@@T ZZ 662,ACLSIZ,LXKYWD,8 'LINE','SIZE' . @C@@@T WU )@@G@@ ZZ 409,ACLIST,LXKYWD,4 'LIST' . @C@@@T ZZ 864,ACLOGWV )@@G@@,LXBIF,3,BFLOG 'LOG ' @D@@@T ZZ 943,ACLOG1,LXBIF,5,BFLOG1 'WW )@@G@@LOG1','0 '@C@@@T ZZ 882,ACLOG2,LXBIF,4,BFLOG2 'LOG2' @C@@@TWX )@@G@@ ZZ 872,ACLOW,LXBIF,3,BFLOW 'LOW ' @C@@@T ZZ 524WY )@@G@@,ACMAIN,LXKYWD,4 'MAIN' . @C@@@T ZZ 997,ACMAX,LXBIF,3,BFMWZ )@@G@@AX 'MAX ' @C@@@T ZZ 2,ACMIN,LXBIF,3,BFMIN 'MIN ' @C@@@TXA )@@G@@ ZZ 479,ACMOD,LXBIF,3,BFMOD 'MOD ' @D@@@T ZZ 309XB )@@G@@,ACMPBF,LXBIF,8,BFMPY 'MULT','IPLY' @D@@@U ZZ 676,ACNAME,LXBIXC )@@G@@F,4,BFNAME 'NAME' . @D@U@T ZZ 102,ACNCHK,LXKYWD,7 'NOCH',XD )@@G@@ECK ' . @D@@@U ZZ 102,ACNCHK,LXKYWD,7 'NOCH','ECK ' . XE )@@G@@@C@@@U ZZ 732,ACCNSI,LXKYWD,6 'NOSI','ZE '@C@@@U ZZ XF )@@G@@ 508,ACCNSU,LXKYWD,7 'NOSU','BRG '@C@@@U ZZ 324,ACCNST,LXKYXG )@@G@@WD,6 'NOST','RG '@D@@@U ZZ 1003,ACCNSZ,LXKYWD,6 'NOST','RZ XH )@@G@@' @C@@@U ZZ 477,ACCNCV,LXKYWD,6 'NOCO','NV '@C@@@U XI )@@G@@ ZZ 506,ACCNFO,LXKYWD,6 'NOFO','FL '@C@@@U ZZ 840,ACCNOXJ )@@G@@V,LXKYWD,5 'NOOF','L '@C@@@U ZZ 719,ACCNUF,LXKYWD,5 'NOUF',XK )@@G@@'L '@C@@@U ZZ 349,ACCNZD,LXKYWD,6 'NOZD','IV '@F@@@U XL )@@G@@ ZZ 330,ACCNSU,LXKYWD,16 'NOSU','BSCR','IPTR','ANGE' @F@@@U XM )@@G@@ ZZ 111,ACCNST,LXKYWD,13 'NOST','RING','RANG','E ' @E@@@U XN )@@G@@ ZZ 564,ACCNSZ,LXKYWD,12 'NOST','RING','SIZE' @E@@@U ZZ XO )@@G@@ 308,ACCNCV,LXKYWD,12 'NOCO','NVER','SION' @F@@@U ZZ 11,XP )@@G@@ACCNFO,LXKYWD,15 'NOFI','XEDO','VERF','LOW ' @E@@@U ZZ 119XQ )@@G@@,ACCNOV,LXKYWD,10 'NOOV','ERFL','OW ' @E@@@U ZZ 996,ACCNUXR )@@G@@F,LXKYWD,11 'NOUN','DERF','LOW ' @E@@@U ZZ 924,ACCNZD,LXKYXS )@@G@@WD,12 'NOZE','RODI','VIDE' @D@@@T ZZ 379,ACNFLW,LXRSWD,6 'XT )@@G@@NOFL','OW ' . @E@@@T ZZ 504,ACNVAR,LXATTR,10 'NONV','ARYIXU )@@G@@','NG ' . @D@U@T ZZ 145,ACNULF,LXBIF,4,BFNULF 'NULL' . XV )@@G@@@E@@@U DO AD$DR , ZZ 223,ACOFST,LXATTR,6 'OFFS','ET ' @D@@@UXW )@@G@@ DO AD$DR=0 , ZZ 223,0,0,6 'OFFS','ET ' @B@@@U ZZ XX )@@G@@ 461,ACON,LXRSWD,2 'ON ' . @D@@@U ZZ 855,ACONCD,LXBIF,6,BFXY )@@G@@ONCD 'ONCO','DE '@D@@@U ZZ 745,ACSTBF,LXBIF,6,BFSMBF 'ONST',XZ )@@G@@'MT '@D@V@U ZZ 816,ACOCBF,LXBIF,6,BFOCBF 'ONCH','AR '@D@@@VYA )@@G@@ ZZ 816,ACOCBF,LXBIF,6,BFOCPV 'ONCH','AR '@E@V@U ZZ YB )@@G@@ 826,ACOSBF,LXBIF,8,BFOSBF 'ONSO','URCE' . @E@@@V ZZ 826YC )@@G@@,ACOSBF,LXBIF,8,BFOSPV 'ONSO','URCE' . @D@@@U ZZ 978,ACONLYD )@@G@@O,LXBIF,5,BFONLO 'ONLO','C '@D@@@U ZZ 340,ACONFL,LXBIF,6,BFYE )@@G@@ONFL 'ONFI','LE '@D@W@U ZZ 355,ACONFI,LXBIF,7,BFONFI 'ONFI',YF )@@G@@'ELD '@D@@@W ZZ 293,ACONFI,LXBIF,7,BFONFI 'ONFI','ELD '@B@@@TYG )@@G@@ ZZ 526,ACOPN,LXRSWD,4 'OPEN' .@D@@@T ZZ 1015,ACOPYH )@@G@@T,LXKYWD,7 'OPTI','ONS ' . @D@@@T ZZ 1000,ACOUPT,LXATTR,6 YI )@@G@@'OUTP','UT ' . @C@@@U ZZ 430,ACCDOV,LXKYWD,8 'OVER','FLOW'YJ )@@G@@@B@@@U ZZ 512,ACCDOV,LXKYWD,3 'OFL ' @B@@@T ZZ 104YK )@@G@@,ACPTR,LXATTR,3 'PTR ' .@C@@@T ZZ 898,ACPAGE,LXFITM,4 'PAGE' YL )@@G@@. @D@@@T ZZ 464,ACPGNF,LXBIF,6,BFPANO 'PAGE','NO '@D@@@TYM )@@G@@ ZZ 657,ACPSIZ,LXKYWD,8 'PAGE','SIZE' . @D@@@T ZZ YN )@@G@@ 245,ACPTR,LXATTR,7 'POIN','TER ' . @F@@@T ZZ 471,ACCVPYO )@@G@@R,LXBIF,9,BFCVPR 'PREC','ISIO','N ' @D@@@T ZZ 132,ACCVPYP )@@G@@R,LXBIF,4,BFCVPR 'PREC' . @D@@@T ZZ 723,ACPRNT,LXATTR,5 'YQ )@@G@@PRIN','T ' . @C@@@T ZZ 137,ACPROC,LXRSWD,4 'PROC' . YR )@@G@@@E@@@T ZZ 96,ACPROC,LXRSWD,9 'PROC','EDUR','E ' . @C@@@TYS )@@G@@ ZZ 138,ACPROD,LXBIF,4,BFPROD 'PROD' @B@@@T ZZ 361YT )@@G@@,ACPUT,LXRSWD,3 'PUT ' .@B@@@T ZZ 322,ACFTR,LXFITM,1 'R ' .YU )@@G@@@C@@@T ZZ 645,ACRAND,LXBIF,4,BFRAND 'RAND' @D@@@T ZZ YV )@@G@@ 136,ACRELX,LXBIF,4,BFREAL 'REAL' . @B@@@U ZZ 128,ACREAYW )@@G@@D,LXRSWD,4 'READ' @C@@@U ZZ 986,ACREWD,LXKYWD,6 'REWI','ND 'YX )@@G@@@C@@@U ZZ 502,ACRECD,LXATTR,6 'RECO','RD '@E@@@T ZZ YY )@@G@@ 492,ACRCUR,LXKYWD,9 'RECU','RSIV','E ' . @D@@@T ZZ 965YZ )@@G@@,ACRFER,LXATTR,5 'REFE','R ' . @D@U@T ZZ 853,ACRPET,LXRSZA )@@G@@WD,6 'REPE','AT ' . @D@@@U. ZZ 853,ACRPET,LXRSWD,6 'REPE',ZB )@@G@@'AT ' . @B@@@U ZZ 853,0,0,6 'REPE','AT ' @D@@@T ZC )@@G@@ ZZ 488,ACRTRN,LXRSWD,6 'RETU','RN ' . @D@@@T ZZ 33,ZD )@@G@@ACRTNS,LXATTR,7 'RETU','RNS ' . @D@@@T ZZ 237,ACRVSE,LXBIZE )@@G@@F,7,BFRVSE 'REVE','RSE '@D@@@U ZZ 1017,ACRVRT,LXRSWD,6 'REVE'ZF )@@G@@,'RT ' @D@@@T ZZ 246,ACROUN,LXBIF,5,BFROUN 'ROUN','D 'ZG )@@G@@@E@@@T ZZ 755,ACSEQ,LXATTR,10 'SEQU','ENTI','AL ' . @B@@@TZH )@@G@@ ZZ 272,ACSEQ,LXATTR,4 'SEQL' @B@@@T ZZ 772,ACSETZI )@@G@@,LXKYWD,3 'SET ' @C@@@T ZZ 270,ACSGNF,LXBIF,4,BFSIGN 'SIGN' ZJ )@@G@@@B@@@U ZZ 782,ACCDSI,LXKYWD,4 'SIZE' @D@@@T ZZ 473ZK )@@G@@,ACSIGN,LXRSWD,6 'SIGN','AL ' . @C@@@T ZZ 739,ACSIN,LXBIFZL )@@G@@,3,BFSIN 'SIN ' @C@@@T ZZ 775,ACSIND,LXBIF,4,BFSIND 'SIND' ZM )@@G@@@C@@@T ZZ 785,ACSKIP,LXFITM,4 'SKIP' . @B@@@U ZZ ZN )@@G@@ 557,ACSNAP,LXKYWD,4 'SNAP' @C@@@T ZZ 808,ACSOME,LXBIF,4,BFZO )@@G@@SOME 'SOME' @C@@@T ZZ 795,ACSQRT,LXBIF,4,BFSQRT 'SQRT' @D@@@TZP )@@G@@ ZZ 989,ACSTAT,LXATTR,6 'STAT','IC ' . @B@@@T ZZ ZQ )@@G@@ 23,ACSTOP,LXRSWD,4 'STOP' .@D@@@T ZZ 984,ACSTRE,LXATTR,6 'ZR )@@G@@STRE','AM ' . @E@@@T ZZ 93,ACSTRG,LXKYWD,6,BFSTRI 'STRI',ZS )@@G@@'NG ' . @E@@@U ZZ 236,ACCDSZ,LXKYWD,10 'STRI','NGSI','ZE ZT )@@G@@ ' @B@@@U ZZ 546,ACCDSZ,LXKYWD,4 'STSZ' @E@@@U ZZ ZU )@@G@@ 276,ACCDST,LXKYWD,11 'STRI','NGRA','NGE ' @B@@@U ZZ 527ZV )@@G@@,ACCDST,LXKYWD,4 'STRG' @F@@@U ZZ 125,ACCDSU,LXKYWD,14 'SUBS'ZW )@@G@@,'CRIP','TRAN','GE ' @C@@@U ZZ 754,ACCDSU,LXKYWD,5 'SUBR',ZX )@@G@@'G '@D@@@T ZZ 866,ACSBST,LXBIF,6,BFSBST 'SUBS','TR '@D@@@TZY )@@G@@ ZZ 932,ACSUBF,LXBIF,8,BFSUBF 'SUBT','RACT'@C@@@T ZZ ZZ )@@G@@ 230,ACSUM,LXBIF,3,BFSUM 'SUM ' @C@@@U ZZ 234,ACSYST,LXRSAA )@@G@@WD,6 'SYST','EM '@C@@@T ZZ 865,ACTAN,LXBIF,3,BFTAN 'TAN ' AB )@@G@@@D@U@T ZZ 901,ACTAND,LXBIF,4,BFTAND 'TAND ' @C@@@U AC )@@G@@ ZZ 901,ACTAND,LXBIF,4,BFTAND 'TAND' @C@@@T ZZ 141,ACTHEAD )@@G@@N,LXRSWD,4 'THEN' . @C@@@T ZZ 392,ACTIME,LXBIF,4,BFTIME 'AE )@@G@@TIME' @D@@@T ZZ 595,ACTITL,LXKYWD,5 'TITL','E ' . @B@@@TAF )@@G@@ ZZ 334,ACTO,LXRSWD,2 'TO ' . @D@@@X ZZ 931,ACCDAG )@@G@@TR,LXKYWD,8 'TRAN','SMIT' . @F@@@T ZZ 352,ACTRNS,LXBIF,9,BFAH )@@G@@TRNS 'TRAN','SLAT','E ' @C@@@T ZZ 656,ACTRIM,LXBIF,4,BFTAI )@@G@@RIM 'TRIM' .@D@@@T ZZ 88,ACTRUN,LXBIF,5,BFTRUN 'TRUN','C ' AJ )@@G@@@F@@@X ZZ 727,ACCDXF,LXKYWD,13 'UNDE','FINE','DFIL','E ' . AK )@@G@@@C@@@X ZZ 355,ACCDXF,LXKYWD,4 'UNDF' . @D@@@U ZZ AL )@@G@@ 89,ACCDUF,LXKYWD,9 'UNDE','RFLO','W '@B@@@U ZZ 288,ACCDUAM )@@G@@F,LXKYWD,3 'UFL ' @D@@@T ZZ 225,ACPVUS,LXBIF,6,BFUNPV 'UNSP',AN )@@G@@'EC '@B@@@T ZZ 100,ACVAR,LXATTR,3 'VAR ' .@D@@@T ZZ AO )@@G@@ 381,ACVAR,LXATTR,7 'VARY','ING ' . @D@@@T ZZ 221,ACVERAP )@@G@@Y,LXBIF,6,BFVERY 'VERI','FY '@D@@@T ZZ 206,ACWHIL,LXRSWD,5 'AQ )@@G@@WHIL','E ' . @C@@@U ZZ 728,ACWRIT,LXRSWD,5 'WRIT','E 'AR )@@G@@@B@@@T ZZ 67,ACFTX,LXFITM,1 'X ' . @B@@@U ZZ 918,AS )@@G@@ACCDZD,LXKYWD,4 'ZDIV' @E@@@U ZZ 365,ACCDZD,LXKYWD,10 'ZERO'AT )@@G@@,'DIVI','DE ' ___'ET ' @B@@@U ZZ 461,ACON,LXRSWD,2 'ONAU )@@G@@ ' . @D@@@U ZZ 855,ACONCD,LXBIF,6,BF*[S@@@*SDFF*@G@@@1DEXRTSAV )@@G@@ EQU $ . WORKSPACE FOR RUNTIME MATH ROUTINES @C@@@1AW )@@G@@DEXMK1 SFW 25 . IO WORKSPACE @C@@@1DEXGOS SFW 17 AX )@@G@@. GO TO HISTORY@B@@@1DEXGOF SH . NEXT AVAILABLE GOTO RAY )@@G@@EF. @C@@@1DEXGOT SH . LINE NUMBER OF DESTINATION LABEL @E@@@1LDXGOSAZ )@@G@@ EQU DEXGOF-FH1-DEXGOS . LENGTH OF GOTO SAVE AREA @C@@@1DEXSVE SFWBA )@@G@@ 6 . CONTROL SAVE @D@@@1DEXSBS SFW 10 . BB )@@G@@ EXSUBROUTINE SAVE @C@@@1DEXINV SFW 1 . INVOCATION COBC )@@G@@UNT @D@@@1DEXINT SFW 1 . INITIALIZATION VALUE @E@@@1BD )@@G@@DEXWK1 SFW 1 . EXECUTE CONTROL WORKSPACE@#@@@1DEXWK2BE )@@G@@ SFW 1 .@#@@@1DEXWK3 SFW 1 .@#@@@1DEXWK4 SFW 1 .@G@@@1SVDVORBF )@@G@@ SFW 1 . VIRTUAL ORIGIN USED BY BIT ROUTINES @ @@@1BG )@@G@@ ORIGIN SVDVOR . @F@@@1SVDVFG SH . FBH )@@G@@LAG STORAGE FOR BIT ROUTINES @E@@@1SVDVPT SH . PBI )@@G@@OINTER TO THE STRING @C@@@1SVDVSZ SFW 1 . SIZE INBJ )@@G@@FO @ @@@1 ORIGIN SVDVSZ . @C@@@1SVDVML SH . BK )@@G@@ MAX LENGTH @D@@@1SVDVCL SH . CURRENTBL )@@G@@ LENGTH INFO@F@@@1SVEPTR SFW 1 . STRING SAVE AREA FOBM )@@G@@R END PTR @G@2@1. EXEROR SFW 1 . WORD TO RETURN FRBN )@@G@@OM MATHPACK ERRORS@D@2@1. ORIGIN EXEROR . SET HALFWORBO )@@G@@DS @F@2@1. EXERFG SH . FLAG TO TELL IF H1 OF WBP )@@G@@ORD @F@2@1. H1FLAG EQU 001 . FLAG TO SAY USE H1 OF TBQ )@@G@@ABLE @F@2@1. EXERTB SH . POINTER TO RETURN VECTOBR )@@G@@R @E@@@2SVBKSD SH2 . BLOCK SD SAVE FOR EXDT BS )@@G@@@B@@@2FILL(1) SH2 . UNUSED @B@2@1FILL(1) SFW 1 . UBT )@@G@@NUSED************** @G@@@1SVPADD SFW 1 . SAVE ARBU )@@G@@EA FOR PADDING CHARS IN ASSIGN@D@@@1DEXCLK SF . CBV )@@G@@LOCK OFFSET . @E@@@1TRNSWK SFW 256 . WORKAREA FOR BW )@@G@@TRANSLATE @E@@@2 ORIGIN TRNSWK . SAVE AREA FOR EXDB BX )@@G@@REGS @^@@@2DBSVA9 SFW 1 . @^@@@2DBSVX5 SFW 1 . @F@@@2BY )@@G@@DBSVX1 SFW 1 . SAVE AREA FOR CARD PTR - X1 @ @@@2BZ )@@G@@. STORAGE FOR EXOP ROUTINE @G@@@2EXOPST SFW 3 . SCA )@@G@@TORAGE FOR DISECTING FILE NAMES @G@@@2EXOPUU SFW 20 . CB )@@G@@ PLACE TO CONSTRUCT '@USE' FOR FILES @G@@@2DEXLXS SFW 12 . CC )@@G@@ WORKSPACE AND SAVE AREA FOR EXLX @F@@@2EXOPFL SFW 7CD )@@G@@ . PLACE TO SAVE FILE OR ELT NAME @D@@@2SVVRSD SFW 1CE )@@G@@ . SD SAVE FOR RCIO @D@@@2SVKEY SFW 1 . CF )@@G@@ KEY SAVE FOR RCIO @G@@@2SVADDR SFW 1 . SAVE FOCG )@@G@@R ADDR OF DATA/D.V. FOR RCIO @E@@@2SVFLSD SFW 1 . FCH )@@G@@ILE SD SAVE FOR RCIO @F@@@2EXBUFR SFW 96 . TEMP 96CI )@@G@@ WORD BUFFER FOR EXFL @E@@@2FREVAR SFW 1 . WORD FOCJ )@@G@@R FREEING CODE @F@@@2EXECS7 SFW 1 . A7 SAVE FOR ECK )@@G@@XSTCH ROUTINE @D@@@2 ORIGIN FREVAR . DEFINE IT'S PCL )@@G@@ARTS @I@@@2FREING SQ . FLAG THAT POINTER IS BEINCM )@@G@@G INTENTIONALLY UNLI @I@@@2STUMIS SQ . FLAG THCN )@@G@@AT STRUCTURE IS MISMATCHED IN TYPE MAT @F@@@2FREDPT SH . CO )@@G@@ DEPTH OF RECURSION IN FREEING @D@@@2FILL(1) SFW 2 . CP )@@G@@ CAREFUL - WORD 1 IS EXECS7 @G@@@2. THE NEXT TWO AREAS ARE USED ONLYCQ )@@G@@ TEMPORARILY IN ON UNIT MANAGER @D@@@2SVCDA3 SFW 2 . CR )@@G@@ SAVE AREA FOR A3-A4@D@@@2SVCDX5 SFW 1 . SAVE ARCS )@@G@@EA FOR X5 @E@@@2SVRTRN SFW 1 . SAVE FOR RETURN ADDCT )@@G@@R @F@@@2 ORIGIN TRNSWK+256 . SKIP OVER TRANSLATE WORKSCU )@@G@@PACE @G@@@2EXECA7 SFW 2 . SPACE FOR A7,A8 IN WROVFLCV )@@G@@ IN EXEC @H@@@2ONIOSV SFW 7 . SAVE AREA FOR IO PTCW )@@G@@RS FOR ON UNIT BIFS @G@@@2BRTBSZ EQU 50 . SIZE OFCX )@@G@@ BREAKPOINT VARIABLE TABLE @G@@@2BRKPTB SFW 100 . BCY )@@G@@REAKPOINT TABLE(50 2-WORD ENTRIES) @F@@@2EXDSPL SFW 2 . CZ )@@G@@ SPACE FOR EXDB TO DO DISPLAY @H@4@3ALDVSV SFW 3 . DA )@@G@@ REGISTER SAVE WHILE FILLING IN DV ON ALLOC @H@@@4ALDVSV SFW 2DB )@@G@@ . REGISTER SAVE WHILE FILLING IN DV ON ALLOC @G@@@2SP$ACEDC )@@G@@ SFW 0 . LABEL TO TELL ME MY CURRENT LOCATION @H@@@2DD )@@G@@SPACELEFT EQU DERMSP-SP$ACE-1 . NUMBER OF WORDS LEFT IN THIS SAVDE )@@G@@E AREA@^@@@1 ORIGIN TVHTST .@C@@@1DEXMK2 SFW 75 . DF )@@G@@ IO WORKSPACE @E@@@1DEXMAX SH2 . MAXIMUM RUNTIDG )@@G@@ME STACK @D@@@1DEXSTA SH2 . STATIC ACT REC DH )@@G@@@D@@@1DEXSTV SQ3 . UNDEF. STRING VAR @F@2@1XXXXXXDI )@@G@@ SQ4 . UNUSED ******************** @E@@@2DSPLYADJ )@@G@@ SQ4 . FLAGS USED IN EXDB & EXDT@B@@@2. 000DK )@@G@@1 - COMPUTE COMMAND GIVEN @A@@@2. 0004 - DELETE BREAKPOINT DL )@@G@@@C@@@2. 0010 - CALL OR COMPUTE COMMAND GIVEN @D@@@5. 002DM )@@G@@0 - REMOVE OPTION EXISTS ON BKPT COMMAND @B@@@2. 0100 - DISPLAY DN )@@G@@COMMAND GIVEN @A@@@2. 0200 - ALTER COMMAND GIVEN @D@@@2. DO )@@G@@ 0400 - ENTRY DELETED IN A BKPT DELETE ALL @G@@@2DBFLAG EQU DDP )@@G@@SPLYA . SAVE AREA FOR CTRL FLAGS IN WALKBACK @#@@@1DEXSGN SH2DQ )@@G@@ . @E@@@2FILL(1) SH2 . UNUSED NOW (WAS DEXX10) DR )@@G@@@C@@@1DEXWBS SH2 . EXDB X10 SAVE ___$ . DS )@@G@@ WORKSPACE FOR RUNTIME MATH ROUTINES @C@@@1DEXMK1 SFW 25 . DT )@@G@@ IO WORKSPACE @C@@@1DEXGOS SFW 17 *[S@@@*SDFF*@F@@@@DBKOSTDU )@@G@@ EQU B$PACE . OFFSET IN D BANK OF BCODE @D@@@@DBKSIZDV )@@G@@ EQU B$SIZ . SIZE OF D BANK @E@@@@TVSTRT CSECT 2 DW )@@G@@. SET COMMON DATA AREA @D@@@@PLUMCM INFO 2 2 . DX )@@G@@ SET COMMON STORAGE @D@@@@TVST SFW 0 . SDY )@@G@@TART OF WORKSPACE @C@@@@/. WORKING STORAGE FOR LEXICAL ANALYSIS DZ )@@G@@@C@@@@DLXSP SFW 2 . CURRENT TOKEN@^@@@@ ORIEA )@@G@@GIN DLXSP . @B@@@@DLXSZ SQ . SIZE @B@@@@DLXCL EB )@@G@@ SQ . CLASS @C@@@@DLXBC SH . EC )@@G@@ -> STRING @C@@@@DLXAC SH . ALPHA CODE ED )@@G@@@^@@@@ ORIGIN DLXAC . @B@@@@DLXIC SQ . IEE )@@G@@CCODE @E@@@@DLXIF SQ . FLAGS OR CODE MODIFIER EF )@@G@@@C@@@@DLXID SH . -> SD POINTER@[@@@@. @C@@@@EG )@@G@@DLXSPN SFW 2 . NEXT TOKEN @^@@@@ ORIGIN DLEH )@@G@@XSPN .@#@@@@DLXSZN SQ . @#@@@@DLXCLN SQ . @#@@@@DLXBCN SH EI )@@G@@. @#@@@@DLXACN SH . @^@@@@ ORIGIN DLXACN .@#@@@@DLXICNEJ )@@G@@ SQ . @#@@@@DLXIFN SQ . @#@@@@DLXIDN SH . @[@@@@. EK )@@G@@@D@@@@DLXCDD SH . CARD IMAGE POINTER @D@@@@DLXERNEL )@@G@@ SQ . SYNA ERROR FLAG @E@@@@DLXPCK SQ . EM )@@G@@ COLUMN 1 USED ILLEGALLY @E@@@@DLXCSV SQ . EN )@@G@@ STOP CHARACTER SAVE AREA @F@@@@DLXCHR SQ . EO )@@G@@ NEXT CHARACTER IN INPUT STREAM @G@@@@DLXX1 SF . EP )@@G@@ TOKEN REGS = +1,CURRENT STRING PTR @F@@@@DLXX2 SF . EQ )@@G@@ '' +1 , TABLE QUALIFIER PTR @F@@@@DLXCS SQ . ER )@@G@@ SIGN POSITION, STRING AREA @^@@@@ ORIGIN DLXCS . ES )@@G@@@E@@@@DLXCON SFW 20 . STRING COLLECTION AREA @D@@@@ET )@@G@@DLXPS SF . SCALE PRESISION @^@@@@ ORIEU )@@G@@GIN DLXPS . @F@@@@DLXPRE SH . TOTAL DIGITS IN THEEV )@@G@@ NUMBER @F@@@@DLXCMD SH . TOTAL DIGITS BEFOREEW )@@G@@ THE '.' @D@@@@DLXFLG SQ . NUMBER TOKEN FLAGS EX )@@G@@@^@@@@DLXCE EQU 0400 . @^@@@@DLXCI EQU 0200 . @^@@@@DLXCB EY )@@G@@ EQU 0100 . @^@@@@DLXCP EQU 0040 . @D@@@@DLXCI EQU 020EZ )@@G@@0 . IMAGINARY NUMBER @B@@@@DCVFLG SQ . FA )@@G@@ FLAGS .@^@@@@. CVNUM INTERFACE@B@@@@DCVINT SF . FB )@@G@@ INTEGER@C@@@@DCVFFT SFW 2 . FUNNY FLOAT FC )@@G@@@B@@@@DCVFLT SFW 2 . FLOAT @C@@@@DERMSM EQU DCVFD )@@G@@FLT . SEMA MSGS @D@@@@DCVDQP SH . DFE )@@G@@ECIMAL Q AND P @D@@@@DERCSM EQU DCVDQP . NUMBER OF SEMFF )@@G@@A MSGS@#@@@@DCVBQP SH . @^@@@@ ORIGIN DCVDQP .@#@@@@DCVDQ FG )@@G@@ SQ . @]@@@@DCVDP SQ.@#@@@@DCVBQ SQ . @#@@@@DCVBP SQ FH )@@G@@. @#@@@@DCVCVN SFW 0 . @ @@@@DCVSIZ EQU DCVCVN-DCVINT . @C@@@@FI )@@G@@DGOCTM SF . COMPILE TIME @D@@@@DGOLIM SF . FJ )@@G@@ STIMER RETURN VALUE@C@@@@DLTSTR SFW 9 . FK )@@G@@ LIST STORAGE @D@@@@DOPSVE SF . OPTIONS SAVE AREFL )@@G@@A @C@@@@DEXFMT EQU DOPSVE . FORMAT WORKSPACE @E@@@@DERMITFM )@@G@@ SFW 2 . FIRST 10 INTERACTIVE MSGS@F@@@@DERMCR SFWFN )@@G@@ 2 . FIRST 10 MSGS (SET BY EXER) @C@@@@DGOLIN SFWFO )@@G@@ 33 . PRINT LINE @C@@@@DLXPFG SQ . FP )@@G@@ PRINT FLAG @E@@@@DGOPHL SQ . PAGE HEADER SFQ )@@G@@KIP COUNT @F@@@@DGOLNS SQ . CARRIAGE CONTROL FRFR )@@G@@ DGOLIN @E@@@@DGOSPH SQ . SAVE PHASE NUMBER (FS )@@G@@DEBG) @D@@@@KLINE SFW 33 . OUTPUT LINE BUFFER @C@@@@FT )@@G@@KCARD SFW 20 . INPUT BUFFER @F@@@@FILL(1) SQ . FU )@@G@@ INPUT BUFFER STOP CHARACTER @E@@@@DEXBPT SQ . FV )@@G@@ BREAKPOINT LAST MESSAGE @D@@@@DSADPA SH . FW )@@G@@ PARAGRAPHER OFFSET @G@@@@DGOCSV SFW 5 . GFX )@@G@@ORDCD AND GOPRNT SAVE AREA [LEVEL 1]@D@@@@DEXOP0 EQU DGOCSV . FY )@@G@@ FILE I/O WORKSPACE @F@@@@DGOPSV SFW 6 . GOPHGD FZ )@@G@@SAVE AREA [LEVEL 2] @E@@@@DGOWD SFW 6 . GOPUT SGA )@@G@@AVE AREA [LEVEL 3]@G@@@@DGOISV SFW 6 . IOREAD AND IOGB )@@G@@WRIT SAVE AREA [LEVEL 4]@E@@@@DZZSV SFW 11 . PLEX SAGC )@@G@@VE AREA [LEVEL 5] @D@@@@DEXSV SFW 17 . EXERR SAVE ARGD )@@G@@EA @D@@@@DCVSV SFW 10 . CVNUM SAVE AREA @D@@@@GE )@@G@@DCVTMP SFW 2 . CVNUM WORK AREA @D@@@@DLXSV1 SF GF )@@G@@. LEXI X1 SAVE AREA @D@@@@DLXSV2 SF . GG )@@G@@ LEXI A1 SAVE AREA @E@@@@DLXSVN SFW 2 . SGH )@@G@@TART STRING SAVE AREA @E@@@@FILL(1) SFW 2 . SYSTEM GI )@@G@@MACRO WORKSPACE @^@@@@SS$$WK EQU $-2 . @C@@@@DRNSTK SFW 15 GJ )@@G@@. RUNTIME STACK@F@@@@TVWRST SFW 0 . AGK )@@G@@DDITIONAL WORKING STORAGE @C@@@@DERMSP EQU TVST+671 . FGL )@@G@@IXED AREA @^@@@@ ORIGIN DERMSP .@D@@@@DOPSVX SF . GM )@@G@@ OPTIONS SET BY USER @C@@@@DGOCMT SF . COGN )@@G@@MPILE TIME @E@@@@DERMSY SFW 2 . FIRST 10 SYNTAX MSGGO )@@G@@S @E@@@@DERMSN SFW 2 . LAST 6 ERROR STMT NOS GP )@@G@@@E@@@@HTBLT EQU TVST+677 . FIXED AREA OF WORKSPACE @^@@@@GQ )@@G@@ ORIGIN HTBLT . @E@@@@HTDISP SH . SIZE OFGR )@@G@@ INITIAL ENTRY @E@@@@HTALFA SH . SIZE OF ALPHAGS )@@G@@ CODE SD'S .@G@@@@SYSARE SFW 2 . SYSTEM AREA HEADER GT )@@G@@(INITED TO ZERO) @E@@@@FILL(1) SFW 6 . UNUSED INITIAGU )@@G@@LIZED CODE @D@@@@KUNZRO SFW 2 . UNNORMALIZED ZERO GV )@@G@@@C@@@@KBLANK SFW 33 . BLANK WORD @C@@@@IOBOUT SFWGW )@@G@@ 9 . SYSPRINT IOCB@C@@@@KOPKT SF . GX )@@G@@ OUTPUT PACKET@C@@@@KFDOUT EQU IOBOUT+3 . SYSPRINT . GY )@@G@@@C@@@@IOBIN SFW 9 . SYSIN IOCB @C@@@@KIPKT SF GZ )@@G@@. INPUT PACKET @B@@@@KFDIN EQU IOBIN+3 . HA )@@G@@ 'SYSIN'@C@@@@TVEXST SF . TIME OUT TEST@D@@@@HB )@@G@@KKD0 SFW 2 . DOUBLEWORD ZERO @^@@@@KKF0 EQUHC )@@G@@ KKD0 . @C@@@@KKF1 SF . FIXED 1 @C@@@@HD )@@G@@KKC0 SF . '000000' @C@@@@KKD1 SFW 2 .HE )@@G@@ DOUBLEWORD 1 @E@@@@KKPW10 SFW 50 . 1HF )@@G@@0,100,1000,... 10E25 @E@@@@KFLTSZ EQU 50 . MAX POWHG )@@G@@ERS OF 10 (50) . @D@@@@KFZERO SFW 2 . '6060606060.HH )@@G@@..' @E@@@@HTBLS EQU TVST+800 . SET HASH TABLE START HI )@@G@@@^@@@@ ORIGIN HTBLS . @^@@@@X PROC *0 . @#@@@@SH2* HJ )@@G@@ NAME 1 .@#@@@@SQ3* NAME 6 .@#@@@@SQ4* NAME 5 .@A@@@@* HK )@@G@@ EQU +(IN 63,X(0,0),1,$) .@A@@@@ DO X(0,0)**1 , RES 1 . HL )@@G@@@#@@@@ END . @D@@@@ADTVST SH2 . WORKSPAHM )@@G@@CE START @D@@@@ADPSDS SH2 . START FIXED SD AREAHN )@@G@@@D@@@@ADPSDE SH2 . END FIXED SD AREA @D@@@@ADPCSEHO )@@G@@ SH2 . NEXT SD AVAILABLE @D@@@@ADPCSN SH2 . HP )@@G@@ END OF SD SPACE @E@@@@ADPCBC SH2 . HQ )@@G@@ INITIAL BETACODE POINTER @E@@@@ADPCBE SH2 . FHR )@@G@@INAL BETACODE ADDRESS @D@@@@ADPCND SH2 . END OF HS )@@G@@WORKING CORE@C@@@@ADPEND SH2 . END OF CORE @C@@@@HT )@@G@@ADBK0S SH2 . BLOCK 0 SD @C@@@@ADBK1S SH2 . HU )@@G@@ BLOCK 1 SD @C@@@@ADMNSD SH2 . MHV )@@G@@AIN PROC SD @C@@@@KFISD SH2 . SYSIN SD @C@@@@HW )@@G@@KFOSD SH2 . SYSPRINT SD @C@@@@DZZLZ SH2 . HX )@@G@@ LINESIZE @C@@@@DZZPZ SH2 . PHY )@@G@@AGESIZE @F@@@@DZZSCH SQ3 . COL 1 SEPARATER CHAHZ )@@G@@RACTER '*' @E@@@@DZZFP SQ4 . FIRST PROGRAM SWITCIA )@@G@@H @B@@@@DGOXRF SQ3 . FLAGS @ @@@@. 0001=FLIB )@@G@@OWTRACE 'F' OPTION@C@@@@DGOPT3 SQ4 . OTHER OPTIONSIC )@@G@@@H@@@@. 001=FLOW TRACE 002=FLOW PROC 004=NO TEXT WIID )@@G@@TH MSGS @G@@@@. 010=GENERATE USE 020=STATIC LANG ANAL 04IE )@@G@@0=TERMINAL JOB @E@@@@. 100=NO WARNINGS PRINTED 200=HISTOGRAM 400=DEBUIF )@@G@@G OPTION @G@@@@OOPTD EQU 00400 . D OPTION SET ON (FOIG )@@G@@R CVCG AND SUCH) @C@@@@DGODFL SQ3 . DUMP FLAGS IH )@@G@@@E@@@@DGOPHF SQ4 . PHASE IN EXECUTION FLAG @E@@@@II )@@G@@DGOMXP SQ3 . MAXIMUM PHASE TO EXECUTE @D@@@@DGOCDFIJ )@@G@@ SQ4 . READ CARD TYPE @G@@@@DGOERM SH2 . IK )@@G@@ FIELDATA STRING-PHASE IN EXECUTION @E@@@@DGOMPG SH2IL )@@G@@ . MAXIMUM LINES PERMITTED @E@@@@DGOTMX SH2 . IM )@@G@@ MAXIMUM EXECUTION TIME @E@@@@DGOLNT SH2 . IN )@@G@@ LINES ON CURRENT PAGE @D@@@@DGOLCT SH2 . IO )@@G@@ TOTAL LINES PRINTED@D@@@@DGOPCT SH2 . CURRENTIP )@@G@@ PAGE NUMBER@E@@@@DCGSNO SH2 . CURRENT STATEMENT NIQ )@@G@@UMBER @D@@@@DGOCMD SH2 . CORE SPLIT FACTOR @C@@@@IR )@@G@@DLXSSC SQ3 . START COLUMN @C@@@@DLXSMC SQ4 . IS )@@G@@ LAST COLUMN @C@@@@LIMER1 SQ3 . EIT )@@G@@RROR LIMITS @#@@@@LIMER2 SQ4 . @E@@@@DGOEM1 SQ3 . IU )@@G@@ ERROR MESSAGES PRINTED @C@@@@LIMALX SQ4 . PRIIV )@@G@@NT OPTIONS @D@@@@. 001=/*D OPTION 002=ATR 004=LIST IW )@@G@@@D@@@@. 010=UDEF 020=SOURCE 040=DUMP @F@@@@. 100IX )@@G@@=MORE CORE OPTION 200=SYSTEM DEBUG MODE 400=CODEGEN DEBUG @C@@@@EOFLAGIY )@@G@@ SQ3 . EOF FLAG @D@@@@DLTOPT SQ4 . IZ )@@G@@ LIST OPTIONS FLAG @D@@@@. 001- OCTAL 002- OCTAL INSTJA )@@G@@ 004-SYMBOLICS @E@@@@DEXCAR SH2 . CURRENT RUNTJB )@@G@@IME ACT REC @E@@@@DCVDTB SH2 . 54395 16384*3.32=54JC )@@G@@394.88@C@@@@DLXEST SH2 . ERROR STACK @D@@@@DLXRVEJD )@@G@@ SH2 . REVERSE XLATE STACK@C@@@@DLXRVP SH2 . JE )@@G@@ CODE LOCATION@D@@@@DLXB1 SH2 . SJF )@@G@@D FOR ARITHMETIC 1@D@@@@DGBCSL SH2 . B CODE STMT LJG )@@G@@ENGTH @C@@@@ADPCSS SH2 . STATIC CHAIN @B@@@@FILL(1JH )@@G@@) SH . FILLER @B@@@@KKB0 SS . JI )@@G@@ '0' @B@@@@KKB1 SS . '1' @A@@@@DLXDOPJJ )@@G@@ SS . LEXI DEBUG OPTIONS @^@@@@. 001= /*D IS TEXT */ @#@@@@FILL(1JK )@@G@@) SFW 0 .@C@@@@DUVAR SH2 . $$ARITH$$ SD @C@@@@JL )@@G@@DUVST SH2 . $$STRING$$ SD@C@@@@DUVLB SH2 . JM )@@G@@ $$LABEL$$ SD @C@@@@DUVFL SH2 . $JN )@@G@@$FILE$$ SD @C@@@@DUVEN SH2 . $$ENTRY$$ SD @B@@@@JO )@@G@@DLXVC SH2 . '1' SD @D@@@@DZZSIR SH2 . JP )@@G@@ LINE NUMBER IN FLE @D@@@@ADPBCM SH2 . MJQ )@@G@@OVED B CODE OFFSET@D@@@@ADPCLC SH2 . STATIC LABEL JR )@@G@@CHAIN @F@@@@DEXMOS SH2 . TABLE OF MSG OFFSETS INTOJS )@@G@@ TEXT @C@@@@DEXMST SH2 . MESSAGES @E@@@@DHSTMTJT )@@G@@ SH2 . NUMBER OF STMTS IN PGM @E@@@@DSYALC SQ3JU )@@G@@ . ALLOCATE OR FILE PRESENT @D@@@@DSYALF EQU 000JV )@@G@@1 . ALLOCATE OR FREE @F@@@@DSYFLF EQU 0002 . JW )@@G@@ FILE (NOT SYSIN OR SYSPRINT) @D@@@@DGOPT4 SQ4 . JX )@@G@@ SECOND OPTION BYTE @G@@@@. 001= R OPTION (PRINT AFTER PUT) 002 =JY )@@G@@ U OPTION - UPDATE 004=ENDFILE@#@@@@. 010= O OPTION @H@@@@. 0100 = C (JZ )@@G@@COLUMNS) 0200 = NO DATA COLLECTION 0400=ERROR IN DC @F@@@@KA )@@G@@DCGLCG SH2 . LAST INSTRUCTION GENERATED . @F@@@@KB )@@G@@DSRCMT SH2 . NUMBER OF COMMENTS IN PROGRAM @#@@@@KC )@@G@@FILL(1) SQ3 . @E@@@@DGOPT5 SQ4 . POST MORTEMKD )@@G@@ OPTIONS @C@@@@DPMARR EQU 0001 . DUMP ARRAYS @D@@@@KE )@@G@@DPMSCL EQU 0002 . DUMP SCALARS @E@@@@DPMALL EQKF )@@G@@U 0004 . DUMP EVERYTHING ELSE @C@@@@DPMSTT EQU 00KG )@@G@@10 . DUMP STATS @E@@@@DPMSTA EQU 0020 . KH )@@G@@ DUMP STATIC LINKS ONLY @B@@@@DUVPT SH2 . $$PTR$$KI )@@G@@@C@@@@ADBCSZ SH2 . BCODE SIZE @B@@@@DBARPT SH2KJ )@@G@@ . AREPTR SAVE FOR EXDB @D@@@@DERCSY SH2 . NKK )@@G@@UMBER SYNTAX MSGS @C@@@@DGONFG SQ3 . ONMNGR FLAGS KL )@@G@@@D@@@@. 001 - FINISH CONDITION TO BE RAISED NEXT @B@@@@. KM )@@G@@ 002 - FINISH CONDITION RAISED @D@@@@DGOPT6 SQ4 . KN )@@G@@ STILL MORE OPTIONS @D@@@@. 001= GENERATE ABSOLUTE ELT 002= RUN AKO )@@G@@BSOLUTE ELT @E@@@@. 004= PROGRAM HAS ALREADY BEEN EXECUTED AT LEAST ONCKP )@@G@@E @B@@@@. 010= MORECORE M COMMAND GIVEN IN EXDB @B@@@@. 020= MOREKQ )@@G@@CORE O COMMAND GIVEN IN EXDB @E@@@@DERCCR SH2 . NKR )@@G@@UMBER CURRENT PHASE MSGS@F@@@@DERCIT SH2 . NUMBER KS )@@G@@CURRENT INTERACTIVE MSGS@E@@@@DERCTK SH2 . NUMBER KT )@@G@@TOKENS IN PGM @D@@@@DSADSN SH2 . NUMBER OF STMTKU )@@G@@S @D@@@@DSDNUL SH2 . SD OF NULL BIF @D@@@@KV )@@G@@DSDNLO SH2 . SD OF NULLO BIF @C@@@@DUVBSD SH2KW )@@G@@ . $$BASED$$ @E@@@@DSDNOS SH2 . KX )@@G@@ NUMBER OF CREATED SD'S @D@@@@FILL(1) SFW 2 . AKY )@@G@@DDITIONAL SPACE @D@@@@TVHTST SFW 0 . HASHTABLE STOKZ )@@G@@RAGE @E@@@@DRSTMT EQU $+100 . RUNTIME HISTOGRAM START LA )@@G@@@C@@@@DHSTRT EQU TVHTST+100 . '' '' @E@@@@DHNUM EQULB )@@G@@ 700 . MAXIMUM STATEMENT COUNT @E@@@@DSRCGL EQU DRSLC )@@G@@TMT+700 . STATIC LANGUAGE ANALYSIS @E@@@@DSREXL EQU DSRCGL+37LD )@@G@@ . DYNAMIC LANGUAGE ANALYSIS@F@@@@DSRSTL EQU 37 . LE )@@G@@ NUMBER OF STATEMENT FORMS . @H@@@@ ORIGIN TVWRST . LF )@@G@@ RESET LOCATION COUNTER FOR ADDITIONAL CARDS@C@@@@GOSYNA EQU 1 .LG )@@G@@ SYNTAX PHASE @D@@@@GOSEMN EQU 2 . SLH )@@G@@EMANTICS PHASE @C@@@@GOXREF EQU 4 . XREF PHASE LI )@@G@@@D@@@@GOGENE EQU 8 . GENERATE PHASE @D@@@@GOEXECLJ )@@G@@ EQU 16 . EXECUTION PHASE @D@@@@GOPMDP EQU 32 LK )@@G@@. POST MORTEM DUMP. ___ 0200 = NO DATA COLLECTION LL )@@G@@0400=ERROR IN DC @F@@@@DCGLCG SH2 . LAST INSTRUCLM )@@G@@TION GENERATED . @F@@@@*[S@@@*SDFF*@[@@@@. @[@@@@. @F@@@@ONUNITLN )@@G@@* PROC *5,7 . CALL EXECUTION ON UNIT MGR @[@@@@. LO )@@G@@@[@@@@. @^@@@@. CALLED AS: @H@@@@. ONUNIT MSGNO,COLP )@@G@@NDITION,LEVEL[,I] R1,R2,R3 FWD,NO HWD,NO [MSG OPTION]@[@@@@. @[@@@@LQ )@@G@@. @C@@@@. MSGNO - MESSAGE NUMBER TO EXERR ROUTINE@C@@@@. LR )@@G@@ CONDITION - ACODE OF CONDITION TO RAISE@B@@@@. LEVEL - EXERR MLS )@@G@@SG LEVEL NUMBER @[@@@@. @G@@@@. R1 - RETURN ADDRESS IF CONDLT )@@G@@ITION ENABLED AND ON UNIT PRESENT @ @@@@. REDO OPERATION LU )@@G@@@F@@@@. R2 - RETURN ADDRESS IF CONDITION ENABLED AND NO ON UNIT LV )@@G@@@A@@@@. DEFAULT OPERATION @G@@@@. R3 - RETURN ADDLW )@@G@@RESS IF CONDITION IS DISABLED - IGNORE OPERATION@[@@@@. @ @@@@. LX )@@G@@ LET R1, R2 OR R3 BE: @H@@@@. I - RETURN TO INSTRUCTION ALY )@@G@@FTER THIS PROC- ON MGR CALLS EXERR @A@@@@. WITH MESSAGLZ )@@G@@E @F@@@@. R - RETURN TO INSTRUCTION AFTER THIS PROC - NMA )@@G@@O MSG.@[@@@@. @H@@@@. ON MGR WILL ALWAYS CALL EXERR ROUMB )@@G@@TINE - NEVER THE EXECUTION @C@@@@. ROUTINE RAISING THE CMC )@@G@@ONDITION @[@@@@. @[@@@@. @E@@@@. FWD - FULLWORD STORAGMD )@@G@@E FROM PLTVDS OR EXCDS TO SAVE@B@@@@. NO - NUMBER OF WORDS TO SAME )@@G@@VE @[@@@@. @E@@@@. HWD - HALFWORD STORAGE FROM PLTVDS OR EMF )@@G@@XCDS TO SAVE@B@@@@. NO - NUMBER OF WORDS TO SAVE @[@@@@. MG )@@G@@@#@@@@. OPTIONS: @[@@@@. @D@@@@. 'NOMSG' - NO MSG PRINMH )@@G@@TED ON SYSTEM RETURN @H@@@@. 'NONUM' - NO STATEMENT NUMBER ON MI )@@G@@MSG(RIGHT NOW ONLY FOR LEVEL 3 MSGS)@[@@@@. @I@@@@. I IN ONUNMJ )@@G@@IT(1,4) => NO 'ERROR' PRINTED (RIGHT NOW ONLY ON LEVEL 3 MSGS) @[@@@@MK )@@G@@. @[@@@@. @[@@@@. @^@@@@. CODE GENERATED:@[@@@@. ML )@@G@@@^@@@@. LINK ONMNGR @B@@@@. +MSGNO,LEVEL,ACODE-OF-CONDIMM )@@G@@TON @#@@@@. +FWD,NO @#@@@@. +HWD,NO @ @@@@. +FLMN )@@G@@AGS1,FLAGS2,R1 @^@@@@. +FLAGS1,0,R2 @^@@@@. +FLAGS1,0MO )@@G@@,R3 @D@@@@. FLAGS1=1=R, 2=I, 4=SIGNAL RAISED @H@@@@MP )@@G@@. FLAGS2: 1 = NO 'ERROR', 2 = NO ERROR MSG ON SYSTEM RTN, 4 = 'NOMQ )@@G@@NUM' @G@@@@. R1, R2 AND R3 WILL ALWAYS BE A VALID RETURN AMR )@@G@@DDR TO USE @[@@@@. @[@@@@. @^@@@@ LINK ONMNGR @^@@@@MS )@@G@@P FORM 9,9,18 . @D@@@@ P ONUNIT(1,1),ONUNIT(1,3),ONUNMT )@@G@@IT(1,2) @C@@@@ +ONUNIT(3,1)-(IN 63,0,1,0),ONUNIT(3,2) @C@@@@MU )@@G@@ +ONUNIT(4,1)-(IN 63,H2,1,0),ONUNIT(4,2)@^@@@@ONNUM(1) EQU MV )@@G@@ 0 . @E@@@@ DO ONUNIT(5,1)='NONUM' ,ONNUM(1) EQU 4 . MW )@@G@@@D@@@@ DO ONUNIT(5,1)='NOMSG' ,ONNUM(1) EQU 2 . @D@@@@ MX )@@G@@ DO ONUNIT(1,4)=I ,ONNUM(1) EQU ONNUM(1)+1 @ @@@@ ON$UNT ONMY )@@G@@UNIT(2,1),3 @B@@@@ P ON$(1),ONNUM(1),ON$(2) @ @@@@ MZ )@@G@@ ON$UNT ONUNIT(2,2),2 @ @@@@ P ON$(1),0,ON$(2)@ @@@@ NA )@@G@@ ON$UNT ONUNIT(2,3),1 @ @@@@ P ON$(1),0,ON$(2)@#@@@@ NB )@@G@@ END . @[@@@@. @[@@@@. @^@@@@ON$UNT* PROC *1,0 @#@@@@NC )@@G@@ON$*(1) EQU 0 .@ @@@@ ON ON$UNT(1,1)=R .@#@@@@ON$*(1) EQUND )@@G@@ 1 .@ @@@@ON$*(2) EQU $+ON$UNT(1,2) .@^@@@@ DO 1 , END NE )@@G@@@#@@@@ OFF . @ @@@@ ON ON$UNT(1,1)=I @#@@@@ON$*(1NF )@@G@@) EQU 2 .@ @@@@ON$*(2) EQU $+ON$UNT(1,2) .@^@@@@ DO 1 ,NG )@@G@@ END .@#@@@@ OFF . @ @@@@ON$*(2) EQU ON$UNT(1,1) @#@@@@NH )@@G@@ END . @^@@@@ONER* PROC *1,2 @^@@@@ LINK EXONI )@@G@@NER @C@@@@ +0,ONER(1,1),2*(ONER(1,3)=R),ONER(1,2) @]@@@@ NJ )@@G@@ END___@@@. @H@@@@*[S@@@*SDFF*@C@@@@. THE IN FORM IS USED TNK )@@G@@O DEFINE DATA. @E@@@@. FOR A DESCRIPTION OF THE MEANING OF THENL )@@G@@ FIELDS, @D@@@@. SEE THE RESTP PROCEDURE IN THE PIT FILE. NM )@@G@@@[@@@@. @[@@@@. @#@@@@ DEF . @A@@@@. SYNTAX ANNN )@@G@@ALYSIS DSECTS @#@@@@STSBLK EQU 9 . @ @@@@. BLOCK STACK LAYNO )@@G@@OUT @D@@@@. +----------+----------+----------+----------+@D@@@@NP )@@G@@. ! STBPFX ! STBTYP ! STBMDN ! STBDNL !@D@@@@. +--NQ )@@G@@--------+----------+----------+----------+@D@@@@. ! STBSD NR )@@G@@ ! STBNPI ! STBNM/ !@D@@@@. +---------------------+----NS )@@G@@------+----------+@D@@@@. ! STBECH ! STBLID NT )@@G@@ !@D@@@@. +---------------------+---------------------+@D@@@@NU )@@G@@. ! STBLSD ! STBDVC !@D@@@@. +--NV )@@G@@-------------------+---------------------+@B@@@@STBPFX EQU +(IN 9,7,0,NW )@@G@@0) . BLOCK PREFIX @B@@@@STBTYP EQU +(IN 9,4,0,0) . BLOCK TYPE @ @@@@NX )@@G@@. 1=PROCEDURE 2=BLOCK 3=ENTRY @C@@@@STBMDN EQU +(IN 9,6,0,0) . MAX DO NY )@@G@@NEXT LEVEL @B@@@@STBDNL EQU +(IN 9,5,0,0) . DO NEST LEVEL@D@@@@STBSD NZ )@@G@@ EQU +(IN 9,2,0,1) . PTR TO BLOCK SD (P+B ONLY)@D@@@@STBNPI EQU +(IN OA )@@G@@9,6,0,1) . INIT VALUE OF NUMPRM @B@@@@STBNM EQU +(IN 9,Q4,0,1) . OB )@@G@@BLOCK NUMBER@B@@@@STBECH EQU +(IN 9,2,0,2) . ENTRY CHAIN @B@@@@STBLIDOC )@@G@@ EQU +(IN 9,1,0,2) . LABEL IDENT @E@@@@STBLSD EQU +(IN 9,2,0,3) . POD )@@G@@OINTER TO CONTAINING BLOCK @E@@@@STBDVC EQU +(IN 9,1,0,3) . DOPE VEOE )@@G@@CTOR CHAIN IN BLOCK @[@@@@. @[@@@@. @ @@@@. IDENT STAOF )@@G@@CK LAYOUT @D@@@@. +---------------------+----------+----------+OG )@@G@@@D@@@@. ! STDID ! STDSL ! ////// !@D@@@@. OH )@@G@@ +----------+----------+----------+----------+@D@@@@. ! STDAT1OI )@@G@@ ! STDAT2 ! STDAT3 ! STDAT4 !@D@@@@. +----------+---------OJ )@@G@@-+----------+----------+@B@@@@STDID EQU +(IN 9,2,0,0) . SD FOR IDENT OK )@@G@@@C@@@@STDSL EQU +(IN 9,6,0,0) . STRUCTURE LEVEL @ @@@@STDAT EQU OL )@@G@@+(IN 9,0,0,1) . @B@@@@STDAT1 EQU +(IN 9,7,0,1) . ATTRIBUTE 1 @ @@@@OM )@@G@@STDAT2 EQU +(IN 9,4,0,1) . 2@ @@@@STDAT3 EQU +(IN 9,6,0,1) . 3@ @@@@ON )@@G@@STDAT4 EQU +(IN 9,5,0,1) . 4@[@@@@. @ @@@@. LABEL STACK LAYOO )@@G@@OUT. @D@@@@. +---------------------+---------------------+@D@@@@OP )@@G@@. ! STLSD ! STLID !@D@@@@. +--OQ )@@G@@--------+----------+---------------------+@D@@@@. ! STLTYP ! OR )@@G@@ //////// !@D@@@@. +----------+---------------OS )@@G@@-----------------+@A@@@@STLSD EQU +(IN 9,2,0,0) . LABEL SD@B@@@@STLID OT )@@G@@ EQU +(IN 9,1,0,0) . LABEL IDENT @ @@@@. 1=ENTRY 0=SUBSCRIPT OU )@@G@@@B@@@@STLTYP EQU +(IN 9,7,0,1) . LABEL TYPE . @[@@@@. @^@@@@. OV )@@G@@ IF STACK LAYOUT@D@@@@. +---------------------+-------+------+-OW )@@G@@-----+@D@@@@. ! STILEP ! STIBI !STIEI !STICI !@D@@@@OX )@@G@@. +---------------------+-------+------+------+@B@@@@STILEP EQUOY )@@G@@ +(IN 9,2,0,0) . LOC ELSE PTR @B@@@@STIBI EQU +(IN 9,S4,0,0) . BASE IDOZ )@@G@@ICATOR@B@@@@STIEI EQU +(IN 9,S5,0,0) . ELSE IDICATOR@C@@@@STICI EQU PA )@@G@@+(IN 9,S6,0,0) . CASE INDICATOR @[@@@@. @[@@@@. @ @@@@. PB )@@G@@ FACTOR STACK LAYOUT @D@@@@. +---------------------+----------PC )@@G@@+----------+@D@@@@. ! STFFB ! STFATR ! STFSLF !PD )@@G@@@D@@@@. +---------------------+----------+----------+@F@@@@STFFB PE )@@G@@ EQU +(IN 9,2,0,0) . POINTER TO FACTOR BASE IN IDENT STK @D@@@@STFATRPF )@@G@@ EQU +(IN 9,6,0,0) . INTERNAL ADTR INDICATOR @E@@@@STFSLF EQU +(IN PG )@@G@@9,5,0,0) . STRUCTURE LEVEL FACTOR IND. @#@@@@STTMNT EQU 10 .@D@@@@PH )@@G@@. +----------+----------+---------------------+@D@@@@. ! PI )@@G@@////// ! STTPFX ! STTNUM !@D@@@@. +----------+---PJ )@@G@@-------+---------------------+@D@@@@. ! STTRSW ! STT12 ! PK )@@G@@ STT13 !@D@@@@. +----------+----------+----------------PL )@@G@@-----+@B@@@@STTPFX EQU +(IN 10,4,0,0) . PREFIX FLAG @C@@@@STTNUM EQUPM )@@G@@ +(IN 10,1,0,0) . STATEMENT NUMBER @C@@@@STTRSW EQU +(IN 10,7,0,1) . PN )@@G@@STATEMENT TYPE @ @@@@STTTPE EQU +(IN 10,2,0,1) . @ @@@@STT12 EQU PO )@@G@@+(IN 10,4,0,1) . @ @@@@STT13 EQU +(IN 10,1,0,1) . @^@@@@PLSYDS* PROPP )@@G@@C *1 . @#@@@@ END . @#@@@@ DEF . @D@@@@. PQ )@@G@@ +---------------------+---------------------+@D@@@@. ! PR )@@G@@STKTPE ! STKDSC !@D@@@@. +----------+---------PS )@@G@@-+----------+----------+@D@@@@. ! STKCL0 ! STKCL1 ! STKCL2 PT )@@G@@! STKCL3 !@D@@@@. +----------+----------+----------+----------+PU )@@G@@@D@@@@. ! STKQNS ! STKNDM ! STKMOD ! STKFLG !@D@@@@. PV )@@G@@ +---------------------+----------+----------+@#@@@@STKDS EQU 13 . PW )@@G@@@B@@@@STKSTT EQU +(IN 13,0,0,0) . STACK START @E@@@@STKTPE EQU +(IN PX )@@G@@13,2,0,0) . TYPE ENTRY - OPER OR SD (BCD) @D@@@@STKDSC EQU +(IN 13,1,0PY )@@G@@,0) . TYPICAL SD DESCRIPTOR @D@@@@STKCLS EQU +(IN 13,0,0,1) . CLASS PZ )@@G@@WORD (FROM SD) @B@@@@STKCL0 EQU +(IN 13,7,0,1) . SDCLS0 BYTE @B@@@@QA )@@G@@STKCL1 EQU +(IN 13,4,0,1) . SDCLS1 BYTE @B@@@@STKCL2 EQU +(IN 13,6,0QB )@@G@@,1) . SDCLS2 BYTE @B@@@@STKCL3 EQU +(IN 13,5,0,1) . SDCLS3 BYTE @B@@@@QC )@@G@@STKDIM EQU STKCL3 . DIMENSION INFO @ @@@@STKCDM EQU STKCL2 . QD )@@G@@ '' @F@@@@STKQNS EQU +(IN 13,7,0,2) . QUAL NAME PTR TO NEXT STK ENTRQE )@@G@@Y @F@@@@STKNDM EQU +(IN 13,4,0,2) . NUMBER OF SUBSCRIPTS IN STRUCQF )@@G@@TURE @F@@@@STKMOD EQU +(IN 13,6,0,2) . TYPE OF ENTRY (SDCLSU BYTE RECQG )@@G@@ODED) @C@@@@STKMVR EQU 0001 . VARIABLE @B@@@@STKMARQH )@@G@@ EQU 0002 . ARRAY @C@@@@STKMST EQU 0003 . QI )@@G@@ STRUCTURE @D@@@@STKMBF EQU 0004 . BUILTIN FUNCTQJ )@@G@@ION @A@@@@STKFLG EQU +(IN 13,5,0,2) . FLAGS @E@@@@STKMVF EQU 000QK )@@G@@1 . SD MOVED TO GAMMA CODE @H@@@@STKSLT EQU 0002 . QL )@@G@@ SUBSC. OR PARMS FOUND (ARRAY REF OR SUBSC)@H@@@@STKBIT EQUQM )@@G@@ 0004 . RELATIONAL OPERATOR IN STRUCTURE (BIT) @E@@@@QN )@@G@@STKPTR EQU 0010 . PTR VAR IS NOT SPECIFIED@D@@@@STKBSDQO )@@G@@ EQU 0020 . BASED VARIABLE @D@@@@STKLNG EQU 3 .QP )@@G@@ SIZE OF STACK ENTRY@D@@@@. +----------+---------QQ )@@G@@-+---------------------+@D@@@@. ! STKOPF ! STKOPN ! STQR )@@G@@KOPA !@D@@@@. +----------+----------+---------------------+QS )@@G@@@#@@@@STKOP EQU 14 . @ @@@@STKOPS EQU +(IN 14,0,0,0) . @B@@@@STKOPPQT )@@G@@ EQU +(IN 14,13,0,0) . PRECEDENCE @A@@@@STKOPF EQU +(IN 14,7,0,0) . QU )@@G@@FLAGS @D@@@@STKOPN EQU +(IN 14,4,0,0) . NUMBER OF ARGUMENTS (-1)@B@@@@QV )@@G@@STKOPA EQU +(IN 14,1,0,0) . ALPHA CODE @C@@@@STKDUM EQU 0201123 .QW )@@G@@ !- ENTRY @F@@@@PLSMSK* PROC *0 . SEMANTIQX )@@G@@C ANALSYS STACK ENTRY @#@@@@ END . @#@@@@ DEF . QY )@@G@@@#@@@@WORD EQU 1 .@ @@@@W1 EQU +(IN 1,0,0,0) . @ @@@@W1H1 QZ )@@G@@ EQU +(IN 1,2,0,0) .@ @@@@W1H2 EQU +(IN 1,1,0,0) .@ @@@@W1Q1 RA )@@G@@ EQU +(IN 1,7,0,0) .@ @@@@W1Q2 EQU +(IN 1,4,0,0) .@ @@@@W1Q3 RB )@@G@@ EQU +(IN 1,6,0,0) .@ @@@@W1Q4 EQU +(IN 1,5,0,0) .@A@@@@W1S1 RC )@@G@@ EQU +(IN 1,13,0,0) . @A@@@@W1S2 EQU +(IN 1,12,0,0) . RD )@@G@@@A@@@@W1S3 EQU +(IN 1,11,0,0) . @A@@@@W1S4 EQU +(IN 1,10RE )@@G@@,0,0) . @ @@@@W1S5 EQU +(IN 1,9,0,0) .@ @@@@W1S6 EQU +(IRF )@@G@@N 1,8,0,0) .@A@@@@W1XH2 EQU +(IN 1,XH2,0,0) . @ @@@@W1U EQURG )@@G@@ +(IN 1,U,0,0) .@A@@@@W1XU EQU +(IN 1,XU,0,0) . @^@@@@PLWORDRH )@@G@@* PROC *0 . @#@@@@ END . @#@@@@ DEF . @E@@@@RI )@@G@@. REGISTER STATUS WORD HEADERS FOR EACH REGISTER @D@@@@. RJ )@@G@@ +---------------------+---------------------+@D@@@@. ! RRK )@@G@@GSWFL ! RGSWBL !@D@@@@. +--------------------RL )@@G@@-+------+------+-------+@D@@@@. ! RGSWUR !RGSWRN!RGSRM )@@G@@WKY!RGSWRA !@D@@@@. +---------------------+------+------+-------+RN )@@G@@@#@@@@RGSWRD EQU 8 . @D@@@@RGSWFL EQU +(IN 8,2,0,0) . FORWARD LINK RO )@@G@@TO NEXT REG @D@@@@RGSWBL EQU +(IN 8,1,0,0) . BACKWARD LINK TO NEXT REGRP )@@G@@@C@@@@RGSWRN EQU +(IN 8,S4,0,1) . REGISTER NUMBER @C@@@@RGSWKY EQURQ )@@G@@ +(IN 8,S5,0,1) . REGISTER CONTENTS @A@@@@RGSWIU EQU 001 . REGISTER RR )@@G@@IN USE@B@@@@RGSW1W EQU 002 . ONE WORD OPERAND @B@@@@RGSW2W EQURS )@@G@@ 004 . TWO WORD OPERAND @A@@@@RGSWXR EQU 010 . X-REGISTER RT )@@G@@@C@@@@RGSWRA EQU +(IN 8,S6,0,1) . REGISTER ADDRESS @C@@@@RGSWRR EQURU )@@G@@ 040 . R-REGISTER FLAG IN RGSWRA @E@@@@RGSWIF EQU +(IN 8,H2,0,1) . RV )@@G@@COMBINED REGISTER INFORMATION @D@@@@RGSWUR EQU +(IN 8,2,0,1) . -> AW ORW )@@G@@F ITEM IN REG @D@@@@. +----------+----------+----------+-----RX )@@G@@-----+@D@@@@. ! SGDID ! SGDCLS ! SGDSCL ! SGDPRE !@D@@@@RY )@@G@@. +----------+----------+----------+----------+@D@@@@. ! RZ )@@G@@ SGDRBS ! SGDRDS !@D@@@@. +--------------SA )@@G@@-------+---------------------+@D@@@@. ! SGDIBS ! SB )@@G@@ SGDIDS !@D@@@@. +---------------------+----------------SC )@@G@@-----+@D@@@@. ! SGDRAB ! SGDRAD !@D@@@@SD )@@G@@. +---------------------+---------------------+@D@@@@. ! SE )@@G@@ SGDIAB ! SGDIAD !@D@@@@. +--------------SF )@@G@@-------+---------------------+@D@@@@. ! SGDRSD ! SG )@@G@@ SGDISD !@D@@@@. +---------------------+----------------SH )@@G@@-----+@#@@@@SGDSCT EQU 9 . @C@@@@SGDID EQU +(IN 9,7,0,0) . TYPE OF SI )@@G@@STACK ENTRY @D@@@@. BITS 5-8 OF SDCLS0 AND SJ )@@G@@@B@@@@SGDCHR EQU 0400 . CHECK BIT @D@@@@SGDPTR EQU 020SK )@@G@@0 . POINTER OPERATOR PRESENT @F@@@@SGDRES EQU 0100 . VSL )@@G@@ARIABLE NEEDS ADDRESSING RESOLUTION @D@@@@SGDCC EQU 0060 . SM )@@G@@ CONDITION CODE @B@@@@SGDIF EQU 0040 . IF SN )@@G@@@E@@@@SGDEXP EQU 0040 . ON FOR EXPR OR CONST @D@@@@SO )@@G@@. ALSO SDCLS0 BITS CONTAINING ATTR OF ENTRY @B@@@@SGDCLS EQUSP )@@G@@ +(IN 9,4,0,0) . SDCLS1 BYTE @D@@@@SGDSGN EQU 0002 . NSQ )@@G@@EGATIVE CONSTANT @C@@@@SGDIFD EQU SGDCLS . IF STATEMENT FLAGS SR )@@G@@@C@@@@SGDSCL EQU +(IN 9,6,0,0) . SDSCAL FROM SD @C@@@@SGDPRE EQUSS )@@G@@ +(IN 9,5,0,0) . PRECISION FROM SD @G@@@@SGDSCP EQU +(IN 9,XH2,0,0) .ST )@@G@@ SCALE AND PRECISION WITH SIGN EXTENSION @D@@@@SGDRBS EQU +(IN 9,2,0,SU )@@G@@1) . AW OF BASE OF REAL PART @E@@@@SGDRDS EQU +(IN 9,1,0,1) . DISP OFSV )@@G@@ REAL PART FROM BASE @E@@@@SGDIBS EQU +(IN 9,2,0,2) . AW OF BASE OFSW )@@G@@ IMAGINARY PART @E@@@@SGDIDS EQU +(IN 9,1,0,2) . DISP OF IMAG PART FSX )@@G@@ROM BASE @B@@@@SGDRAB EQU +(IN 9,2,0,3) . AUXILLIARY AW@A@@@@SGDRADSY )@@G@@ EQU +(IN 9,1,0,3) . '' @C@@@@SGDIAB EQU +(IN 9,2,0,4) . AUXILLISZ )@@G@@ARY IMAG AW @A@@@@SGDIAD EQU +(IN 9,1,0,4) . '' @B@@@@SGDCDE EQUTA )@@G@@ +(IN 9,0,0,4) . CODE POINTER @C@@@@SGDRSD EQU +(IN 9,2,0,5) . REAL SDTB )@@G@@ POINTER @C@@@@SGDISD EQU +(IN 9,1,0,5) . IMAG SD POINTER @^@@@@TC )@@G@@. DO STACK ENTRY @D@@@@. +----------+----------+----------TD )@@G@@-----------+@D@@@@. ! ////// ! SGDTFS ! SGDTBT !TE )@@G@@@D@@@@. +----------+----------+---------------------+@D@@@@. TF )@@G@@ ! SGDLLL !@D@@@@. +--------TG )@@G@@-----------------------------------+@D@@@@. ! STH )@@G@@GDLUL !@D@@@@. +--------------------------------TI )@@G@@-----------+@D@@@@. ! SGDDOL !TJ )@@G@@@D@@@@. +-------------------------------------------+@D@@@@. TK )@@G@@ ! SGDEOL !@D@@@@. +--------TL )@@G@@-----------------------------------+@D@@@@. ! STM )@@G@@GDLOP !@D@@@@. +--------------------------------TN )@@G@@-----------+@E@@@@SGDTFS EQU +(IN 9,4,0,0) . TEMP OFFSET AT ENTRY TO DTO )@@G@@O @F@@@@SGDTBT EQU +(IN 9,1,0,0) . LOWER LIMIT OF TEMPS AT ENTRY TTP )@@G@@O DO @E@@@@SGDLLL EQU +(IN 9,0,0,1) . DO LABEL LOWER LIMIT AT ENTRY TQ )@@G@@@E@@@@SGDLUL EQU +(IN 9,0,0,2) . DO LABEL UPPER LIMIT AT ENTRY @D@@@@TR )@@G@@SGDDOL EQU +(IN 9,0,0,3) . AW IN EXPANSION OF SPEC @B@@@@SGDEOL EQUTS )@@G@@ +(IN 9,0,0,4) . CONTINUE AW @A@@@@SGDLOP EQU +(IN 9,0,0,5) . LOOP AWTT )@@G@@@^@@@@. IF STACK ENTRY @D@@@@. +----------+----------+----TU )@@G@@-----------------+@D@@@@. ! ////// ! ////// ! SGDEPT TV )@@G@@ !@D@@@@. +----------+----------+---------------------+@D@@@@TW )@@G@@. ! SGDCPT ! ////// !@D@@@@. +--TX )@@G@@-------------------+---------------------+@D@@@@. ! TY )@@G@@ SGDELS !@D@@@@. +--------------------------TZ )@@G@@-----------------+@D@@@@. ! SGDCFG UA )@@G@@ !@D@@@@. +-------------------------------------------+@D@@@@UB )@@G@@. ! SGDCNT !@D@@@@. +--UC )@@G@@-----------------------------------------+@D@@@@SGDEPT EQU +(IN 9,1,0,UD )@@G@@0) . ELSE CLAUSE MC POINTER @C@@@@SGDCPT EQU +(IN 9,2,0,1) . CONTINUUE )@@G@@E MC POINTER@C@@@@SGDELS EQU +(IN 9,0,0,2) . AW FOR ELSE BRANCH @A@@@@UF )@@G@@SGDCFG EQU +(IN 9,0,0,3) . FLAGS @D@@@@SGDCNT EQU +(IN 9,0,0,4) . AUG )@@G@@W FOR CONTINUE JUMPS @D@@@@. +--------------------------------UH )@@G@@-----------+@D@@@@. ! SGDAID !UI )@@G@@@D@@@@. +---------------------+---------------------+@D@@@@. UJ )@@G@@ ! SGDSLB ! SGDSLD !@D@@@@. +--------UK )@@G@@-------------+---------------------+@D@@@@. ! SGDDVB UL )@@G@@ ! SGDDVD !@D@@@@. +---------------------+----------UM )@@G@@-----------+@D@@@@. ! SGDMLR !UN )@@G@@@D@@@@. +-------------------------------------------+@D@@@@. UO )@@G@@ ! SGDSBW !@D@@@@. +--------UP )@@G@@-------------+---------------------+@D@@@@. ! SGDCOF UQ )@@G@@ ! SGDSLR !@D@@@@. +---------------------+----------UR )@@G@@-----------+@D@@@@. ! SGDTYP !US )@@G@@@D@@@@. +---------------------+---------------------+@D@@@@. UT )@@G@@ ! SGDCVB ! SGDCVD !@D@@@@. +--------UU )@@G@@-------------+---------------------+@D@@@@. ! SGDDVT UV )@@G@@ ! SGDSTT !@D@@@@. +---------------------+----------UW )@@G@@-----------+@D@@@@. ! SGDMSK !UX )@@G@@@D@@@@. +----------+----------+----------+----------+@D@@@@. UY )@@G@@ ! SGDNSB ! SGDNDM ! SGDNST ! SGDNSS !@D@@@@. +--------UZ )@@G@@--+----------+----------+----------+@D@@@@. ! SGDASD VA )@@G@@ ! ////// !@D@@@@. +---------------------+----------VB )@@G@@-----------+@D@@@@SGDAID EQU +(IN 9,0,0,0) . SUBSCRIPT ATTRIBUTES VC )@@G@@@D@@@@SGDSLB EQU +(IN 9,2,0,1) . SUBSCRIPT LIST AW BASE @D@@@@SGDSLDVD )@@G@@ EQU +(IN 9,1,0,1) . SUBSCRIPT LIST AW DISP @B@@@@SGDDVB EQU +(IN VE )@@G@@9,2,0,2) . ARRAY DV BASE@B@@@@SGDDVD EQU +(IN 9,1,0,2) . ARRAY DV DISPVF )@@G@@@C@@@@SGDDV EQU +(IN 9,0,0,2) . DOPE VECTOR AW @D@@@@SGDMLR EQUVG )@@G@@ +(IN 9,0,0,3) . DOPE VECTOR MULTIPLIER @ @@@@SGDADV EQU +(IN 9,0,0,VH )@@G@@2) . @C@@@@SGDTPE EQU +(IN 9,0,0,2) . ATTR OF ARRAY NAME @C@@@@SGDDBSVI )@@G@@ EQU +(IN 9,2,0,3) . BASE FIELD OF DV AW@C@@@@SGDDDS EQU +(IN 9,1,0,VJ )@@G@@3) . DISP FIEED OF DV AW@C@@@@SGDNSU EQU +(IN 9,4,0,4) . NUMBER SUBSCCVK )@@G@@IPTS @C@@@@SGDNDI EQU +(IN 9,1,0,4) . NUMBER DIMENSIONS @C@@@@SGDDSSVL )@@G@@ EQU +(IN 9,1,0,5) . DISP OF SUB LIST @C@@@@SGDSBW EQU +(IN 9,0,0,VM )@@G@@4) . SELECTOR BITS WORD @C@@@@SGDCOF EQU +(IN 9,W,0,5) . CONSTANT MULTVN )@@G@@IPLIER@D@@@@SGDSLR EQU +(IN 9,1,0,5) . ORIGINAL DISP OF SS LIST @D@@@@VO )@@G@@SGDTYP EQU +(IN 9,0,0,6) . ID,CLS,SCAL,PREC OF ARRAY@D@@@@SGDCVB EQUVP )@@G@@ +(IN 9,2,0,7) . TALLY CELL VECTOR AW BASE@D@@@@SGDCVD EQU +(IN 9,1,0,VQ )@@G@@7) . TALLY CELL VECTOR AW DISP@D@@@@SGDDVT EQU +(IN 9,H1,0,8) . DOPEVR )@@G@@ VECTOR TEMPLATE @C@@@@SGDSTT EQU +(IN 9,H2,0,8) . XG STATE SAVEAREA VS )@@G@@@D@@@@SGDMSK EQU +(IN 9,0,0,9) . ARRAY REF BR TABLE MASK @C@@@@SGDNSBVT )@@G@@ EQU +(IN 9,7,0,10) . SUBSCRIPTS SEEN @D@@@@SGDNDM EQU +(IN 9,4,0,VU )@@G@@10) . NUMBER OF DIMENSIONS @D@@@@SGDNST EQU +(IN 9,Q3,0,10) . NUMBEVV )@@G@@R CONTIGOUS STARS @E@@@@SGDNSS EQU +(IN 9,Q4,0,10) . NUMBER OF STARS IVW )@@G@@N REFERENCE @C@@@@SGDASD EQU +(IN 9,H1,0,11) . ARRAY SD POINTER @[@@@@VX )@@G@@. @B@@@@. FOR INITIALIZATION OF ARRAYS @[@@@@. @D@@@@VY )@@G@@ITRNUM EQU +(IN 9,1,0,0) . #OF DIMS/LEVELS NESTED @C@@@@ITRREG EQUVZ )@@G@@ +(IN 9,0,0,1) . AW FOR SCRATCH @C@@@@ITRFLG EQU +(IN 9,0,0,2) . FWA )@@G@@LAG REG SAVE AREA @E@@@@ITRTOP EQU +(IN 9,0,0,3) . LABEL AW FOR TOP OFWB )@@G@@ INIT LIST @E@@@@ITREND EQU +(IN 9,0,0,4) . LABEL AW FOR END OF INT LWC )@@G@@IST @E@@@@ITRPRO EQU +(IN 9,0,0,5) . LABEL AW FOR PROLOGUE ENTRY WD )@@G@@@B@@@@ITRARL EQU +(IN 9,0,0,0) . SCRATCH AW @B@@@@. BUILT INWE )@@G@@ FUNCTION REFERENCE @[@@@@. @E@@@@. +-------------------WF )@@G@@------------------------+ @E@@@@. ! SGDBMWG )@@G@@S ! @E@@@@. +-------------------------------WH )@@G@@------------+ @E@@@@. ! SGDACT ! SGDBST WI )@@G@@ ! @E@@@@. +---------------------+---------------------WJ )@@G@@+ @E@@@@. ! ////// ! SGDBAR ! WK )@@G@@@E@@@@. +---------------------+---------------------+ @E@@@@WL )@@G@@. ! ////// ! SGDCD1 ! @E@@@@. WM )@@G@@ +---------------------+---------------------+ @E@@@@. ! WN )@@G@@ SGDCD2 ! SGDCD3 ! @E@@@@. +-------WO )@@G@@--------------+---------------------+ @E@@@@. ! WP )@@G@@ SGDBWK ! @E@@@@. +-------------------WQ )@@G@@------------------------+ @C@@@@SGDBMS EQU +(IN 9,W,0,0) . MASK SAWR )@@G@@VE AREA @C@@@@SGDBST EQU +(IN 9,H2,0,1) . STATE SAVE AREA @C@@@@WS )@@G@@SGDACT EQU +(IN 9,H1,0,1) . BIF OPERATOR CODE @B@@@@SGDBAR EQU +(IN WT )@@G@@9,H2,0,2) . # ARGUMENTS @C@@@@SGDCD1 EQU +(IN 9,H2,0,3) . START EVAL CWU )@@G@@ODE @C@@@@SGDBPT EQU +(IN 9,W,0,4) . ACT TABLE INDEX @ @@@@SGDCD3WV )@@G@@ EQU +(IN 9,H2,0,4) . @A@@@@SGDCD2 EQU +(IN 9,H1,0,4) . DITTO @B@@@@WW )@@G@@SGDBWK EQU +(IN 9,W,0,5) . WORKSPACE @[@@@@. @[@@@@. @ @@@@WX )@@G@@. FUNCTION STACK ENTRY @[@@@@. @D@@@@. +--------------WY )@@G@@-----------------------------+@D@@@@. ! SGDPLS WZ )@@G@@ !@D@@@@. +---------------------+----------------XA )@@G@@-----+@D@@@@. ! SGDPSD ! SGDFSA !@D@@@@XB )@@G@@. +---------------------+---------------------+@D@@@@. ! XC )@@G@@ SGDFSM !@D@@@@. +--------------XD )@@G@@-----------------------------+@D@@@@. ! SGDFTY XE )@@G@@ !@D@@@@. +--------------------------------------XF )@@G@@-----+@D@@@@. ! SGDFRW !@D@@@@XG )@@G@@. +-------------------------------------------+@D@@@@. ! XH )@@G@@ SGDFPT !@D@@@@. +--------------XI )@@G@@-------+---------------------+@D@@@@. ! SGDFLB ! XJ )@@G@@ SGDFLD !@D@@@@. +---------------------+----------------XK )@@G@@-----+@D@@@@. ! ////// ! SGDFTP !@D@@@@XL )@@G@@. +---------------------+---------------------+@D@@@@. ! XM )@@G@@ SGDFSD ! ////// !@D@@@@. +--------------XN )@@G@@-------+---------------------+@C@@@@SGDPLS EQU +(IN 9,W,0,0) . ADDRESSXO )@@G@@ ENTRY CHAIN@D@@@@SGDPSD EQU +(IN 9,H1,0,1) . ADDRESS PARAMETER SD XP )@@G@@@D@@@@SGDFSA EQU +(IN 9,H2,0,1) . XGEN STATE SAVE AREA @D@@@@SGDFSMXQ )@@G@@ EQU +(IN 9,W,0,2) . XGEN STATE MASK SAVE AREA@B@@@@SGDFTY EQU +(IN XR )@@G@@9,0,0,3) . FUNCTION TYPE@C@@@@SGDFRW EQU +(IN 9,0,0,4) . RESULT ADDRESXS )@@G@@S WORD@D@@@@SGDFPT EQU +(IN 9,0,0,5) . FUNCTION STACK ENTRY @C@@@@XT )@@G@@SGDFLB EQU +(IN 9,2,0,6) . ARG LIST AW BASE @C@@@@SGDFLD EQU +(IN XU )@@G@@9,1,0,6) . ARG LIST AW DISP @B@@@@SGDFAL EQU +(IN 9,0,0,6) . ARG LISXV )@@G@@T AW @D@@@@SGDFTP EQU +(IN 9,1,0,7) . SAVE TEMP STACK LEVEL @B@@@@XW )@@G@@SGDFSD EQU +(IN 9,2,0,8) . FUNCTION SD @[@@@@. @[@@@@. @C@@@@XX )@@G@@. ADDITIONAL STACK ENTRY FOR FUNCTIONS @[@@@@. @D@@@@. XY )@@G@@ +---------------------+---------------------+@D@@@@. ! XZ )@@G@@SGDALB ! SGDALD !@D@@@@. +----------+---------YA )@@G@@-+---------------------+@D@@@@. ! SGDFGS ! ////// ! SGYB )@@G@@DTLV !@D@@@@. +----------+----------+---------------------+YC )@@G@@@D@@@@. ! SGDSDP ! SGDFAT !@D@@@@. YD )@@G@@ +---------------------+---------------------+@C@@@@SGDALB EQU +(IN YE )@@G@@9,2,0,3) . ARG LIST AW BASE @C@@@@SGDALD EQU +(IN 9,1,0,3) . ARG LISYF )@@G@@T AW DISP @A@@@@SGDFGS EQU +(IN 9,7,0,4) . FLAGS @B@@@@SGDTLV EQUYG )@@G@@ +(IN 9,1,0,4) . TEMP LEVEL @A@@@@SGDSDP EQU +(IN 9,2,0,5) . SD YH )@@G@@@F@@@@SGDFAT EQU +(IN 9,H2,0,5) . START OF ARGUMENT LIST TEMPORARY YI )@@G@@@[@@@@. @^@@@@. I/O STACK ENTRY@[@@@@. @D@@@@. +--YJ )@@G@@--------+----------+---------------------+@D@@@@. ! SGDID ! SYK )@@G@@GDITP ! SGDIOT !@D@@@@. +----------+----------+----YL )@@G@@-----------------+@D@@@@. ! LOOP AW (AGRL1) YM )@@G@@ !@D@@@@. +---------------------+---------------------+@D@@@@YN )@@G@@. ! ////// ! SGDITM !@D@@@@. +--YO )@@G@@-------------------+---------------------+@D@@@@SGDIOF EQU 0777 . YP )@@G@@ I/O STACK ENTRY @C@@@@SGDITP EQU +(IN 9,Q2,0,0) . IYQ )@@G@@/O FLAGS @C@@@@SGDIFM EQU 0001 . FORMAT FLAG @C@@@@YR )@@G@@SGDILS EQU 0002 . LIST ( FLAG @D@@@@SGDIOR EQU 000YS )@@G@@4 . REPITITION FLAG @E@@@@SGDIOT EQU +(IN 9,H2,0,0) YT )@@G@@. RETURN ADDRESS (LOOP ADDR) @F@@@@SGDITM EQU +(IN 9,H2,0,2) . TYU )@@G@@EMP VAL STORAGE IN ACT REC @B@@@@. AGGREGATE EXPRESSION STACK YV )@@G@@ENTRY @[@@@@. @[@@@@. @E@@@@. +---------------------+---YW )@@G@@-------+----------+ @E@@@@. ! SGDXNX ! SGDANS YX )@@G@@ ! SGDXDP ! @E@@@@. +---------------------+----------+----YY )@@G@@------+ @E@@@@. ! SGDXSW YZ )@@G@@! @E@@@@. +-------------------------------------------+ ZA )@@G@@@E@@@@. ! SGDXDV ! @E@@@@ZB )@@G@@. +---------------------+---------------------+ @E@@@@. ZC )@@G@@ ! SGDATP ! SGDXLS ! @E@@@@. +-ZD )@@G@@--------------------+---------------------+ @E@@@@. ! ZE )@@G@@ SGDXTL ! @E@@@@. +-------------ZF )@@G@@--------+----------+----------+ @E@@@@. ! SGDXEL ZG )@@G@@ ! SGDXND ! SGDXNC ! @E@@@@. +---------------------+---ZH )@@G@@-------+----------+ @E@@@@. ! SGDXTC ! SGZI )@@G@@DAXR ! @E@@@@. +---------------------+---------------ZJ )@@G@@------+ @E@@@@. ! SGDFMC ZK )@@G@@! @E@@@@. +---------------------+---------------------+ ZL )@@G@@@E@@@@. ! SGDXSD ! SGDXTI ! @E@@@@ZM )@@G@@. +---------------------+---------------------+ @D@@@@SGDXNXZN )@@G@@ EQU +(IN 9,2,0,0) . NEXT AGG EXPR STACK ENTRY @D@@@@SGDANS EQU +(IN 9,ZO )@@G@@6,0,0) . NUMBER NON-* SUBSCRIPTS @D@@@@SGDXDP EQU +(IN 9,5,0,0) . NUMZP )@@G@@BER ELTS IN PROCESS @C@@@@SGDXSW EQU +(IN 9,0,0,1) . SELECTER BITS WZQ )@@G@@ORD @C@@@@SGDXDV EQU +(IN 9,0,0,2) . AW FOR CONTROLLING DV@C@@@@SGDATPZR )@@G@@ EQU +(IN 9,2,0,3) . LOC OF TEMP ALLOC. @B@@@@SGDXLS EQU +(IN 9,H2,0,3ZS )@@G@@) . SD OF REP. VAR@C@@@@SGDXTL EQU +(IN 9,W,0,4) . TMPLV SAVE VALUE ZT )@@G@@@D@@@@SGDXEL EQU +(IN 9,2,0,5) . CURRENT ELT IN LHS SLT @C@@@@SGDXNDZU )@@G@@ EQU +(IN 9,6,0,5) . NUMBER INHERITED DIMS@C@@@@SGDXNC EQU +(IN 9,5,0,5)ZV )@@G@@ . NUMBER CURRENT DIMS @C@@@@SGDXTC EQU +(IN 9,H1,0,6) . OFFSET TO TALLZW )@@G@@Y LIST@C@@@@SGDAXR EQU +(IN 9,H2,0,6) . RETURN ADDR FROM SAX@C@@@@SGDFMCZX )@@G@@ EQU +(IN 9,0,0,7) . LOC OF FIRST MC @A@@@@SGDXSD EQU +(IN 9,2,0,8)ZY )@@G@@ . SD PTR @D@@@@SGDXTI EQU +(IN 9,H2,0,8) . OFFSET TO TALLY CELL INDEXZZ )@@G@@@[@@@@. @C@@@@AGRL1 EQU +(IN 9,0,0,1) . REAL 1 ENTRY @D@@@@AA )@@G@@AGIM1 EQU +(IN 9,0,0,2) . IMAGINARY 1 ENTRY @C@@@@AGARL1 EQUAB )@@G@@ +(IN 9,0,0,3) . AUX REAL 1 @C@@@@AGAIM1 EQU +(IN 9,0,0,4) .AC )@@G@@ AUX IMAG 1 @C@@@@AGRL2 EQU +(IN 9,0,0,7) . REAL 2 ENTRY AD )@@G@@@D@@@@AGIM2 EQU +(IN 9,0,0,8) . IMAGINARY 2 ENTRY @C@@@@AGARL2AE )@@G@@ EQU +(IN 9,0,0,9) . REAL AUX 2 @C@@@@AGAIM2 EQU +(IN 9,0,AF )@@G@@0,10) . IMAG AUX 2 @D@@@@. +---------------------+----------AG )@@G@@-----------+@D@@@@. ! AWRWPT ! AWOFST !AH )@@G@@@D@@@@. +---------------------+---------------------+@B@@@@AWDS AI )@@G@@ EQU 10 . ADDRESS WORD DSECT @F@@@@AWRWPT EQU +(IN 10,2,0,0) AJ )@@G@@. ADDR OR REGISTER WORD POINTER @F@@@@AWOFST EQU +(IN 10,1,0,0) AK )@@G@@. OFFSET PAST REGISTER CONTENTS @E@@@@PLCGD* PROC *0 . AL )@@G@@ CODE GENERATE STACKS @#@@@@ END . @#@@@@ DEFAM )@@G@@ . @A@@@@. FIELD DATA BCD ENTRIES @D@@@@. +--------AN )@@G@@--+----------+---------------------+@D@@@@. ! SDBCL4 ! SDBCLS AO )@@G@@ ! SDBCLK !@D@@@@. +----------+----------+----------AP )@@G@@+----------+@D@@@@. ! SDBAC ! SDBCUS ! SDBCNT !AQ )@@G@@@D@@@@. +---------------------+----------+----------+@D@@@@. AR )@@G@@ + SDBBCD . . . . . +@D@@@@. +--------AS )@@G@@-----------------------------------+@[@@@@. @#@@@@SDBCD EQU 2 . AT )@@G@@@B@@@@SDBCL4 EQU +(IN 2,7,0,0) . CLASS 4 BITS @C@@@@SD4BIF EQU 000AU )@@G@@1 . BIF BCD BLOCK@D@@@@SDSORT EQU 0004 . TAV )@@G@@HIS BCD IS SORTED @C@@@@SDBIFS EQU 6 . BIF SD SIZE AW )@@G@@@B@@@@BCDEPR EQU 0200 . EXT DECLARE @B@@@@SDBCON EQU 010AX )@@G@@0 . CONSTANT BCD @C@@@@SDBCLS EQU +(IN 2,4,0,0) . CLASS (LEXICAAY )@@G@@L) @F@@@@SDBCLK EQU +(IN 2,1,0,0) . -> VARIABLE WITH THAT BCD STRINAZ )@@G@@G @B@@@@SDBAC EQU +(IN 2,2,0,1) . ALPHA CODE @B@@@@SDBCUS EQUBA )@@G@@ +(IN 2,6,0,1) . USGAE COUNT @C@@@@SDBCNT EQU +(IN 2,5,0,1) . CHARACTBB )@@G@@ER COUNT @C@@@@SDBBCD EQU +(IN 2,0,0,2) . CHARACTER STRING @C@@@@BC )@@G@@SDBCST EQU +(IN 2,Q1,0,2) . FIRST CHARACTER @D@@@@SDBCC1 EQU SBD )@@G@@DBCST . FIRST CHAR IN BCD @D@@@@SDBCC2 EQU +(IN 2,Q2,0,2BE )@@G@@) . SECOND CHAR IN BCD @E@@@@SDBCPT EQU +(IN 2,U,0,2) . POINTERBF )@@G@@ TO BCD STRING @ @@@@. SYMBOL TABLE ENTRIES @D@@@@. +--BG )@@G@@--------+----------+---------------------+@D@@@@. ! SDCLS4 ! SBH )@@G@@DCLS5 ! SDBDLK !@D@@@@. +----------+----------+----BI )@@G@@-----------------+@D@@@@. ! SDBCHI ! SDNXDC BJ )@@G@@ !@D@@@@. +---------------------+----------+----------+@D@@@@BK )@@G@@. ! SDBKLK ! SDSCAL ! SDPREC !@D@@@@. +--BL )@@G@@--------+----------+----------+----------+@D@@@@. ! SDCLS0 ! SBM )@@G@@DCLS1 ! SDCLS2 ! SDCLS3 !@D@@@@. +----------+----------+----BN )@@G@@------+----------+@D@@@@. ! SDPROF ! SDLCOF BO )@@G@@ !@D@@@@. +---------------------+---------------------+@D@@@@BP )@@G@@. ! SDDCNM ! SDXREF !@D@@@@. +--BQ )@@G@@-------------------+---------------------+@[@@@@. @#@@@@SDSECT EQUBR )@@G@@ 3 . @E@@@@SDLNTH EQU 14 . SIZE OF NORMAL SD BS )@@G@@@B@@@@SDCLS4 EQU +(IN 3,7,0,0) . CLASS 4 BITS @C@@@@SD4FLB EQU 000BT )@@G@@1 . FORMAT LABEL @C@@@@SD4UDF EQU 0002 . UBU )@@G@@NDEFINED @C@@@@SD4RFE EQU 0004 . REFERENCE @^@@@@BV )@@G@@SD4DCR EQU 0010 . @D@@@@SD4PVA EQU 0020 . PSEUDO BW )@@G@@VARIABLE @B@@@@SD4ENT EQU 0040 . ENTRY @D@@@@. SDBCBX )@@G@@ON EQU 0100 . CONSTANT BCD ENTRY @C@@@@SDSTRU EQU 020BY )@@G@@0 . STRUCTURE @E@@@@SDBCSD EQU 0400 . SBZ )@@G@@D ENTRY (NOT BCD ENTRY) @B@@@@SDCLS5 EQU +(IN 3,4,0,0) . CLASS 5 BITS CA )@@G@@@D@@@@SD5STR EQU 0001 . STRING INIT IN CGBK@C@@@@SD5PTRCB )@@G@@ EQU 0010 . PTR IN STRUCTURE @C@@@@SD5ARE EQU 0020 . CC )@@G@@ AREA IN STRUCTURE @D@@@@SD5OFA EQU 0040 . OFFSET VAR HCD )@@G@@AS AREA @^@@@@SD5MSG EQU 0400 . @F@@@@SD5MG2 EQU 0200 . CE )@@G@@ MESSAGE GIVEN, LOWER BOUND MISMATCH @D@@@@SDBDLK EQU +(IN 3,1,0,CF )@@G@@0) . -> VAR WITH SAME BCD @E@@@@SDECHN EQU SDBDLK . ECG )@@G@@NTRY CHAIN IN BLOCK SD @D@@@@SDBCHI EQU +(IN 3,2,0,1) . -> FIELDATA BCH )@@G@@CDSTRING @C@@@@SDBSLD EQU SDBCHI . STATIC LINK DISPLACEMENT .@D@@@@CI )@@G@@SDNXDC EQU +(IN 3,1,0,1) . -> NEXT VARIABLE IN BLOCK@B@@@@SDBKLK EQUCJ )@@G@@ +(IN 3,2,0,2) . -> BLOCK SD @A@@@@SDSCAL EQU +(IN 3,6,0,2) . SCALE CK )@@G@@@B@@@@SDPREC EQU +(IN 3,5,0,2) . PRECISION @ @@@@SDINLB EQU +(IN CL )@@G@@3,1,0,2) . @B@@@@SDSON EQU +(IN 3,1,0,2) . SON POINTER @B@@@@SD2SP CM )@@G@@ EQU +(IN 3,1,0,2) . SCALE , PREC .@C@@@@SDOFPA EQU SD2SP . ICN )@@G@@MPLIED AREA IN PTR@^@@@@SDLCHN EQU SD2SP . @B@@@@SDBKAW EQU SD2SPCO )@@G@@ . BLOCK ADDRESS WORD @B@@@@SDCLS EQU +(IN 3,0,0,3) . CLASS WORD CP )@@G@@@B@@@@SDCLSS EQU +(IN 3,2,0,3) . CLASS BITS @B@@@@SDCLS0 EQU +(IN CQ )@@G@@3,7,0,3) . STORAGE CLASS@C@@@@SD0ART EQU 0001 . ARITHMECR )@@G@@TIC @B@@@@SD0ENT EQU 0002 . ENTRY @B@@@@SD0STR EQUCS )@@G@@ 0004 . STRING @B@@@@SD0BLC EQU 0010 . BCT )@@G@@LOCK @C@@@@SD0CNT EQU 0020 . CONTROLLED @B@@@@SD0BSDCU )@@G@@ EQU 0040 . BASED @B@@@@SD0STA EQU 0100 . CV )@@G@@ STATIC @C@@@@SD0AUT EQU 0200 . AUTOMATIC @B@@@@CW )@@G@@SD0UNK EQU 0000 . UNKNOWN@C@@@@SD0STU EQU 0003 . CX )@@G@@ STRUCTURE @B@@@@SD0LAB EQU 0005 . LABEL CY )@@G@@@B@@@@SD0FLE EQU 0006 . FILE @B@@@@SD0PTR EQU 000CZ )@@G@@7 . POINTER@B@@@@SD0ARE EQU 0011 . AREA DA )@@G@@@B@@@@SDCLS1 EQU +(IN 3,4,0,3) . ATTRIBUTES @E@@@@. IN EQU'S OF DB )@@G@@THE FORM SDXXYY, OFF MEANS XX, ON MEANS YY@G@@@@SDVRCN EQU 0001 . DC )@@G@@ VARIABLE / CONSTANT (1 = CONSTANT ) @D@@@@SDCCNC EQU 000DD )@@G@@2 . CONSTANT IN SD @D@@@@SDARST EQU 0004 . DE )@@G@@ ARITHMETIC / STRING@D@@@@SDCHBT EQU 0400 . CHARACTDF )@@G@@ER / BIT @E@@@@SDBLUS EQU 0010 . BUILTIN FCN / USER DG )@@G@@FCN @D@@@@SDBGPR EQU 0020 . BEGIN / PROCEDURE @D@@@@DH )@@G@@SDPREN EQU 0020 . PROCEDURE / ENTRY @D@@@@SDDCBN EQUDI )@@G@@ 0040 . DECIMAL / BINARY @D@@@@SDRLCX EQU 0100 . DJ )@@G@@ REAL / COMPLEX @D@@@@SDPTOF EQU 0100 . PDK )@@G@@OINTER / OFFSET @D@@@@SDFXVR EQU 0200 . FIXED / VARYIDL )@@G@@NG @C@@@@SDFXFL EQU 0200 . FIXED / FLOAT@C@@@@SDCLS2DM )@@G@@ EQU +(IN 3,6,0,3) . ADDITIONAL CLASSES @E@@@@SD2RES EQU 0001 . DN )@@G@@ NO RESOLVE PTRS (BIFS ONLY) @D@@@@SDBDEX EQU 0002 . DO )@@G@@ BOUNDS EXPRESSION @E@@@@SDLNXP EQU 0004 . EXPRESSDP )@@G@@ION IN LENGTH SPEC@D@@@@SD2ARE EQU 0010 . AREA CONSTANTDQ )@@G@@ EXPR @D@@@@SDMEMS EQU 0020 . MEMBER OF STRUCTURE@B@@@@DR )@@G@@SDARRY EQU 0040 . ARRAY @C@@@@SDPARM EQU 0200 . DS )@@G@@ PARAMETER @C@@@@SDEXDM EQU 0100 . DUMMY EDT )@@G@@XT @E@@@@SDEXTN EQU 0400 . THIS IS EXTERNAL SD DU )@@G@@@B@@@@SDCLS3 EQU +(IN 3,5,0,3) . CLASS 3 BITS @C@@@@SD3CLR EQU 000DV )@@G@@1 . DCL STMT @D@@@@SD3LCN EQU 0002 . LDW )@@G@@ABEL CONSTANT @C@@@@SD3OBK EQU 0004 . ON BLOCK DX )@@G@@@D@@@@SD3ENT EQU 0003 . ENTRY PARAMETER @C@@@@SDATTRDY )@@G@@ EQU 0010 . PREDEFINED SD@B@@@@SD3ARE EQU 0020 . DZ )@@G@@ AREA @B@@@@SD3BSD EQU 0040 . BASED @D@@@@EA )@@G@@SDCHK2 EQU 0100 . VAR ON CHECK LIST @E@@@@SDINTL EQUEB )@@G@@ 0200 . INITIAL ATTRIBUTE BIT @C@@@@SDCHCK EQU 040EC )@@G@@0 . CHECK FLAG @D@@@@SDPROF EQU +(IN 3,2,0,4) . OFFSET ED )@@G@@OF PARAMETER IN AR@C@@@@SDADD EQU SDPROF . CODE ADDR . EE )@@G@@@E@@@@SDBPLT EQU SDPROF . BUILTIN PARAMETER LIST @E@@@@EF )@@G@@SDLCOF EQU +(IN 3,1,0,4) . OFFSET OF VARIABLE IN LOCAL AR @C@@@@SDBLACEG )@@G@@ EQU +(IN 3,Q4,0,4) . OPCODE FOR BIF @D@@@@SDBFSC EQU +(IN 3,Q1EH )@@G@@,0,4) . SEMANTICS CODE FOR BIF@E@@@@SDBFSR EQU +(IN 3,Q2,0,4) . SEMAEI )@@G@@NTICS RESLT CODE FOR BIF@F@@@@SDNMEN EQU SDLCOF . NUM OF PROC ENTRIES EJ )@@G@@ASSOCIATED WITH BLOCK @A@@@@SDBFCL EQU SDCLS5 . BIF CLASS @E@@@@EK )@@G@@SDXREF EQU +(IN 3,XH2,0,5) . CROSS REFERENCE WORKSPACE@E@@@@SDCHLTEL )@@G@@ EQU +(IN 3,XH2,0,5) . CHECK LIST @D@@@@SDLSTN EQUEM )@@G@@ +(IN 3,H1,0,5) . LABEL DEC STMT NO.@E@@@@SDDCNM EQU +(IN 3,H1,0EN )@@G@@,5) . STATEMENT NUMBER OF DECLARE @C@@@@. ADDITIONAL WORDS FOR ARRAYSEO )@@G@@ AND STRUCTURES @D@@@@. +----------+---------+-----------------EP )@@G@@-----+@D@@@@. ! SDNDIM ! SDENUM ! SDDVA !@D@@@@EQ )@@G@@. +----------+----------+---------------------+@D@@@@. ! ER )@@G@@SDRTC ! SDMXDM ! SDDVLG !@D@@@@. +----------+---ES )@@G@@-------+---------------------+@D@@@@. ! SDDAD ! ET )@@G@@ SDBROT !@D@@@@. +---------------------+----------------EU )@@G@@-----+@D@@@@. ! SDSTCH ! SDDVCH !@D@@@@EV )@@G@@. +---------------------+---------------------+@D@@@@. ! EW )@@G@@ SDA2BS ! SDA2DP !@D@@@@. +--------------EX )@@G@@-------+---------------------+@D@@@@. ! SDA1BS ! EY )@@G@@ SDA1DP !@D@@@@. +---------------------+----------------EZ )@@G@@-----+@D@@@@. ! SDKID ! SDEXPT !@D@@@@FA )@@G@@. +---------------------+---------------------+@D@@@@. ! FB )@@G@@ ////// ! SDDVLG !@D@@@@. +--------------FC )@@G@@-------+---------------------+@[@@@@. @D@@@@SDNDIM EQU +(IN 3,7,0,FD )@@G@@6) . NUMBER OF DIMENSIONS @B@@@@SDENUM EQU +(IN 3,4,0,6) . ENTRY NFE )@@G@@UMBER @G@@@@SDNSPS EQU +(IN 3,Q2,0,6) . NUM OF STRING LEAVES IN STRUCTFF )@@G@@ PARAMETER @B@@@@SDDVA EQU +(IN 3,H2,0,6) . DV ADDRESS @F@@@@SDSTRBFG )@@G@@ EQU +(IN 3,H2,0,6) . STRUCTURE BOUNDS META-CODE POINTER @D@@@@SDRTC FH )@@G@@ EQU +(IN 3,7,0,7) . SIZE OF DATA ITEM IN WORDS@E@@@@SDMXDM EQU +(IN FI )@@G@@3,4,0,7) . MAXIMUM DIMENSIONS IN STRUCTURE@D@@@@SDENAD EQU +(IN 3,XH2,FJ )@@G@@0,7) . CODE ADDR - PROC ENTRY @F@@@@SDINTM EQU +(IN 3,H2,0,7) . INITIAFK )@@G@@LIZATION META-CODE AND CODE @B@@@@SDDAD EQU +(IN 3,2,0,8) . -> FATHEFL )@@G@@R @E@@@@SDPLST EQU SDDAD . PARAMETER LIST (ENTRY) FM )@@G@@@B@@@@SDBROT EQU +(IN 3,1,0,8) . -> BROTHER @D@@@@SDENCH EQU SDBFN )@@G@@ROT . ENTRY CHAIN LINK @ @@@@SDSTCH EQU +(IN 3,2,0,9) . FO )@@G@@@F@@@@SDALFD EQU SDSTCH . INIT D.V. CODE FOR BASED STRG FP )@@G@@@D@@@@SDDVCH EQU +(IN 3,1,0,9) . DV CHAIN OF SD'S IN BLOCK@C@@@@SDA2BSFQ )@@G@@ EQU +(IN 3,2,0,10) . ADDR WORD 2 BASE @D@@@@SDENBK EQU SDA2BS . FR )@@G@@ -> BLK OF ENTRY @E@@@@SDA2DP EQU +(IN 3,1,0,10) . ADDRESFS )@@G@@S WORD 2 DISPLACEMENT @C@@@@SDNARG EQU +(IN 3,5,0,10) . NUMBER ARGUMFT )@@G@@ENTS @A@@@@SDLBIN EQU +(IN 3,2,0,10) . @B@@@@SDLBCC EQU +(IFU )@@G@@N 3,1,0,10) . LABEL CODE@D@@@@SDA1BS EQU +(IN 3,2,0,11) . ADDRESS WORDFV )@@G@@ 1 BASE @E@@@@SDA1DP EQU +(IN 3,1,0,11) . ADDRESS WORD 1 DISPLACEMFW )@@G@@ENT @E@@@@SDKID EQU +(IN 3,2,0,12) . USED IN STRUCTURES IN XREF FX )@@G@@@F@@@@SDALSI EQU SDKID . INIT CODE PTR FOR BASED STRG FY )@@G@@@D@@@@SDINCL EQU SDKID . ATTRS OF INIT LIST@D@@@@SDEXPTFZ )@@G@@ EQU +(IN 3,1,0,12) . EXTERNAL SD POINTER@E@@@@SDBPTR EQU SDEGA )@@G@@XPT . BASED(P) POINTER TO P SD@E@@@@SDPTRC EQU +(IN 3,H1,0GB )@@G@@,13) . CHAIN OF PTRS DCLD IN BLK @D@@@@SDDVLG EQU +(IN 3,XH2,0,13) GC )@@G@@. DOPE VECTOR LENGTH @A@@@@. ADDITION FOR CONSTANTS @D@@@@GD )@@G@@. +-------------------------------------------+@D@@@@. ! GE )@@G@@ SDSTDV !@D@@@@. +--------------GF )@@G@@-------+---------------------+@D@@@@. ! SDSTML ! GG )@@G@@ SDSTCL !@D@@@@. +---------------------+----------------GH )@@G@@-----+@D@@@@. ! SDSTRG !@D@@@@GI )@@G@@. +-------------------------------------------+@C@@@@SDFXPT EQUGJ )@@G@@ +(IN 3,0,0,6) . FIXED POINT VALUE @D@@@@SDFLPT EQU +(IN 3,0,0,8) . FGK )@@G@@LOATING POINT VALUE @C@@@@SDSTDV EQU +(IN 3,0,0,6) . STRING DOPE VGL )@@G@@ECTOR @D@@@@SDSTML EQU +(IN 3,2,0,7) . MAXIMUM STRING LENGTH @D@@@@GM )@@G@@SDSTCL EQU +(IN 3,1,0,7) . CURRENT STRING LENGTH @C@@@@SDSTRG EQUGN )@@G@@ +(IN 3,0,0,8) . STRING POINTER . @ @@@@. ADDITION FOR BLOCKS GO )@@G@@@D@@@@. +----------+----------+----------+----------+@D@@@@. GP )@@G@@ ! SDBKNO ! SDBKDP ! SDRCTS ! SDBKAC !@D@@@@. +--------GQ )@@G@@--+----------+----------+----------+@D@@@@. ! SDNXBK GR )@@G@@ ! SDMXDO !@D@@@@. +---------------------+----------GS )@@G@@-----------+@D@@@@. ! SDNMPM ! SDCHLD !GT )@@G@@@D@@@@. +---------------------+---------------------+@D@@@@. GU )@@G@@ ! SDFXLN ! SDSCIN !@D@@@@. +--------GV )@@G@@-------------+---------------------+@D@@@@. ! SDDVC GW )@@G@@ ! SDDOOF !@D@@@@. +---------------------+----------GX )@@G@@-----------+@B@@@@SDBKNO EQU +(IN 3,7,0,6) . BLOCK NUMBER @B@@@@SDBKDPGY )@@G@@ EQU +(IN 3,4,0,6) . BLOCK DEPTH @C@@@@SDRCTS EQU +(IN 3,6,0,6) . RGZ )@@G@@ECURSIVE TEST @B@@@@SDBKAC EQU +(IN 3,5,0,6) . BLOCK ACTIVE @D@@@@HA )@@G@@SDNXBK EQU +(IN 3,2,0,7) . NEXT SEQUENTIAL BLOCK @B@@@@SDMXDO EQUHB )@@G@@ +(IN 3,1,0,7) . MAX DO NEXT @B@@@@SDNMPM EQU +(IN 3,2,0,8) . NUM PARHC )@@G@@AMS @E@@@@SDCHLD EQU +(IN 3,XH2,0,8) . CHECKLIST START IN BLOCK SD HD )@@G@@@B@@@@SDFXLN EQU +(IN 3,2,0,9) . FIXED AR SIZE@C@@@@SDSCIN EQU +(IN HE )@@G@@3,1,0,9) . SCALAR INIT CODE @B@@@@SDDVC EQU +(IN 3,2,0,10) . DV CHHF )@@G@@AIN @C@@@@SDDOOF EQU +(IN 3,1,0,10) . DO STACK LOCATION @D@@@@SDSTONHG )@@G@@ EQU +(IN 3,2,0,11) . BLOCK CONDITION FLGS @E@@@@SDONAW EQU +HH )@@G@@(IN 3,W,0,12) . AW FOR ON UNIT BLOCK JUMP@F@@@@SDPTRB EQU +(IN 3,HI )@@G@@H1,0,13) . START OF CHAIN OF PTRS IN BLK @ @@@@. ADDITION FOR LAHJ )@@G@@BELS @D@@@@. +---------------------+---------------------+@D@@@@HK )@@G@@. ! SDLLIM ! SDULIM !@D@@@@. +--HL )@@G@@-------------------+---------------------+@D@@@@. ! SDLDOF HM )@@G@@ ! SDNDWD !@D@@@@. +---------------------+----HN )@@G@@-----------------+@D@@@@. ! SDLINT ! SDLBBC HO )@@G@@ !@D@@@@. +---------------------+---------------------+@D@@@@HP )@@G@@SDLLIM EQU +(IN 3,2,0,6) . LOW LIMIT ON BRANCH @D@@@@SDULIM EQUHQ )@@G@@ +(IN 3,1,0,6) . UPPER LIMIT ON BRANCH @B@@@@SDLDOF EQU +(IN 3,2,0,HR )@@G@@7) . DOSTK OFFSET @E@@@@SDNDWD EQU +(IN 3,1,0,7) . WORDS ABOVE LABEL IHS )@@G@@N DO STACK @D@@@@SDLINT EQU +(IN 3,2,0,8) . INITIALIZATION CHAIN HT )@@G@@@E@@@@SDLXCT EQU +(IN 3,W,0,8) . EXECUTION COUNT OF LABELS@C@@@@HU )@@G@@SDLBBC EQU +(IN 3,1,0,8) . LHS BCODE ARRAY @E@@@@SDRTST EQU 2 .HV )@@G@@ STRING DOPE VECTOR SIZE @C@@@@SDRT4B EQU 1 . HW )@@G@@ 1 WORD DATUM @C@@@@SDRT8B EQU 2 . 2 WORD HX )@@G@@DATUM @C@@@@SDRTFB EQU 4 . 4 WORD DATUM @D@@@@SDRTPTHY )@@G@@ EQU 3 . POINTER (3 WORDS) @E@@@@SDRTAR EQU 3 .HZ )@@G@@ SIZE OF AREA VARIABLE @ @@@@. ADDITION FOR FIA )@@G@@ILES @B@@@@SDIOFN EQU +(IN 3,0,0,6) . FILE NAME @D@@@@SDIOCB EQUIB )@@G@@ +(IN 3,2,0,9) . CONTROL BLOCK LOCATION @B@@@@SDIOAT EQU +(IN 3,1,0,IC )@@G@@9) . ATTRIBUTES @B@@@@SDIOIN EQU 0100 . INPUT@C@@@@ID )@@G@@SDIOOT EQU 0200 . OUTPUT @C@@@@SDIOEL EQU 040IE )@@G@@0 . ELEMENT @C@@@@SDFLRC EQU 0001 . IF )@@G@@ RECORD I/O @B@@@@SDIOPR EQU 0020 . PRINT@C@@@@SDFLKYIG )@@G@@ EQU 0004 . KEYED FILE @ @@@@. DOPE VECTOR TEMIH )@@G@@PLATE @[@@@@. @D@@@@. +----------+----------+----------------II )@@G@@-----+@D@@@@. ! SDDVSZ ! ////// ! SDDVBM !@D@@@@IJ )@@G@@. +----------+----------+---------------------+@D@@@@. ! IK )@@G@@ SDDVMX !@D@@@@. +--------------IL )@@G@@-------+---------------------+@D@@@@. ! SDDVSL ! IM )@@G@@ SDDVSM !@D@@@@. +---------------------+----------------IN )@@G@@-----+@D@@@@. ! SDDVML !@D@@@@IO )@@G@@. +---------------------+---------------------+@D@@@@. ! IP )@@G@@ SDDVEX ! SDDVLB !@D@@@@. +--------------IQ )@@G@@-------+---------------------+@D@@@@. ! SDDVET IR )@@G@@ !@D@@@@. +--------------------------------------IS )@@G@@-----+@C@@@@SDDV EQU 4 . DOPE VECOR DSECT @B@@@@SDDVSZIT )@@G@@ EQU +(IN 4,Q1,0,0) . DV IN WORDS @C@@@@SDDVBD EQU +(IN 4,H2,0,0) . IU )@@G@@BOUNDS EVAL CODE @D@@@@SDDVBM EQU +(IN 4,H2,0,0) . BOUNDS MCDE POINTEIV )@@G@@R @G@@@@SDDVMX EQU +(IN 4,0,0,1) . CONSTANT 010000177777 UNITIALIZIW )@@G@@ED DV FLAG @C@@@@SDDVSL EQU +(IN 4,H1,0,2) . STRING LENGTH @D@@@@IX )@@G@@SDDVDW EQU +(IN 4,W,0,2) . DATA WIDTH (NON STRING) @C@@@@SDDVSM EQUIY )@@G@@ +(IN 4,H2,0,2) . STRING M CODE @B@@@@SDDVML EQU +(IN 4,0,0,3) . MIZ )@@G@@ULTIPLIER @B@@@@SDDVEX EQU +(IN 4,H1,0,4) . EXTENT - 1 @E@@@@SDDVLBJA )@@G@@ EQU +(IN 4,XH2,0,4) . SIGN EXTENDED LOWER BOUND @C@@@@SDDVET EQUJB )@@G@@ +(IN 4,0,0,5) . REMAINING BOUNDS @E@@@@. NOTE - SL, LB, UB ARE FILLEDJC )@@G@@ IF PROGRAMMER SPECIFIED A @F@@@@. CONSTANT. ML IS COMPUTED IF ALL BUJD )@@G@@NDS ARE CONSTANT, ELSE IS 0 @C@@@@ELWDST EQU 30 . ENTRY PARAMETER LJE )@@G@@IST WORD @G@@@@ELWNXT EQU +(IN 30,H1,0,0) . -> NEXT ENTRJF )@@G@@Y PARAMETER WORD @E@@@@ELWSD EQU +(IN 30,H2,0,0) . -> SD JG )@@G@@OF PARAMETER@C@@@@TGDSCT EQU 15 . TEMPORARY ALLOCATOR WORDS @F@@@@JH )@@G@@TGSIZE EQU +(IN 15,H1,0,0) . SIZE OF TEMPORARY AREA @G@@@@JI )@@G@@TGFSET EQU +(IN 15,H2,0,0) . TEMPORARY LOCATION OF OFFSET JJ )@@G@@@^@@@@PLSD* PROC *0 . @#@@@@ END . @[@@@@. @A@@@@JK )@@G@@. ACTIVATION RECORD DSECT @G@@@@. NOTE THAT THEJL )@@G@@ TEMPLATE 'GENLST' HAS BEEN OVERLAID ONTO @E@@@@. THE STAJM )@@G@@RT OF THE AREC FOR BASED STORAGE! @G@@@@. SIMILARLY NEWJN )@@G@@ FIELDS FOR THE ON UNIT MANAGER HAVE BEEN @C@@@@. OVERLAIJO )@@G@@D OVER AREC IN ARCOND! @[@@@@. @D@@@@. +--------------------JP )@@G@@-----------------------+@H@@@@. ! ARINCT JQ )@@G@@ ! (ALSO GENNXT,GENLEN) @D@@@@. +----------+---------JR )@@G@@-+---------------------+@I@@@@. ! ARTYPE ! GENFLG ! GENJS )@@G@@PTR !(WAS ARTYPE,//////,ARDYNM) @D@@@@. +----------+---JT )@@G@@-------+---------------------+@H@@@@. ! ARRTAT ! JU )@@G@@ AREPTR ! (ALSO GENARE,GENPRV) @D@@@@. +--------------JV )@@G@@-------+---------------------+@H@@@@. ! ARFMAT ! JW )@@G@@ ARSTMT ! (ALSO GENSD,GENADR) @D@@@@. +--------------JX )@@G@@-------+---------------------+@H@@@@. ! GENAAT ! JY )@@G@@ GENPAT ! (WAS ARESDP,ARPRES) @D@@@@. +--------------JZ )@@G@@-------+---------------------+@D@@@@. ! ARBSDP ! KA )@@G@@ ARVDAP !@D@@@@. +---------------------+----------------KB )@@G@@-----+@H@@@@. ! ARWORK ! (ALSKC )@@G@@O ARFWPT,ARHWPT) @D@@@@. +--------------------------------------KD )@@G@@-----+@D@@@@. ! '' !@D@@@@KE )@@G@@. +---------------------+---------------------+@D@@@@. ! KF )@@G@@ '' ! ARSDDV !@D@@@@. +--------------KG )@@G@@-------+---------------------+@F@@@@. ! ARSVX7 ! KH )@@G@@ ARSV11 ! (ARSVRG) @D@@@@. +---------------------+----KI )@@G@@-----------------+@D@@@@. ! ARSVX8 ! ARSVX9 KJ )@@G@@ !@D@@@@. +---------------------+---------------------+@D@@@@KK )@@G@@. ! ARSVA5 !@D@@@@. +--KL )@@G@@-----------------------------------------+@D@@@@. ! KM )@@G@@ ARSVA6 !@D@@@@. +--------------------------KN )@@G@@-----------------+@D@@@@. ! ARSVA7 KO )@@G@@ !@D@@@@. +-------------------------------------------+@D@@@@KP )@@G@@. ! ARSVA8 !@D@@@@. +--KQ )@@G@@-----------------------------------------+@D@@@@. ! KR )@@G@@ ARSVA9 !@D@@@@. +--------------------------KS )@@G@@-----------------+@D@@@@. ! ARSA10 KT )@@G@@ !@D@@@@. +-------------------------------------------+@D@@@@KU )@@G@@. ! ARSA11 !@D@@@@. +--KV )@@G@@-----------------------------------------+@D@@@@. ! KW )@@G@@ ARSA12 !@D@@@@. +--------------------------KX )@@G@@-----------------+@D@@@@. ! ARSA13 KY )@@G@@ !@D@@@@. +-------------------------------------------+@D@@@@KZ )@@G@@. ! ARSA14 !@D@@@@. +--LA )@@G@@-----------------------------------------+@D@@@@. ! LB )@@G@@ ARSA15 !@D@@@@. +--------------------------LC )@@G@@-----------------+@D@@@@. ! ARSA16 LD )@@G@@ !@D@@@@. +-------------------------------------------+@D@@@@LE )@@G@@. ! ARSAX1 !@D@@@@. +--LF )@@G@@-----------------------------------------+@D@@@@. ! LG )@@G@@ ARSAX2 !@D@@@@. +--------------------------LH )@@G@@-----------------+@D@@@@. ! ARSAX3 LI )@@G@@ !@D@@@@. +-------------------------------------------+@D@@@@LJ )@@G@@. ! ARSVX6 !@D@@@@. +--LK )@@G@@-----------------------------------------+@D@@@@. ! LL )@@G@@ ARSVX4 !@D@@@@. +--------------------------LM )@@G@@-----------------+@D@@@@. ! AREXFT LN )@@G@@ !@D@@@@. +---------------------+---------------------+@H@@@@LO )@@G@@. ! ARDED ! ARDYNM ! (WAS ARDED,/////LP )@@G@@/) @D@@@@. +---------------------+---------------------+@D@@@@LQ )@@G@@. ! ARESDP ! ARPRES !@D@@@@. +--LR )@@G@@--------+----------+---------------------+@D@@@@. ! ARD