*PASCALX PR0200R^PEIII?III PPW_hhRx= No errors iPiR=1 error iPh= errors jP= detected i Y_Xh?`# P hZ)RhZ=RLjZK$63'hNRvhZPLKRhZPjZ0;hh=P;hZIRjZPRhZ0;hh=X;hZIRjZg=Y5PjZPhZhjZhXWYP2I'_'Y_ijZhXhX2jjZ^0=A=PI=YLRijZYPII I II?III P_\rhjZrR=0=YR*ehrZ 0=YR=hjZ[PII I II?III PP_=A5)YP_ =A5!)YP!_=A5+05)YP^_*=A5)05 ( YP_ =A5)!YP_ =A5)YP_ =N5!#YP^_ =N5!#%YP_ =05!YP_=A5  )YP-_09=AR)jZ v vP9=0RP:Y_ \Q Q QQRhXPQQQQQQR%hXPR5hXPREhXPiQSR[hXPjRihX!PRyhX^PhRhXPRhX^PQ RhXP'0=NRhX-[PFIII?III P7I@PY_RqjZYPu_KRhZPjZYP_ hjRjP RiiP RjP RP R RiP R[   Q7 hR@ jPW RW iiPW P Qs Qs R iP Q R jP R P P YP P _  hRT  hR jZ hR   NRE   i  P YPX _$jhER hZhh3R hZ" P " i"@R <jZhZKFNR P )_hZqjZhR 'ihZBR* hZOR8 P hZ@R] qjZ 'P 8,NR LjZP  jZ j!j" R !P j  NR q Z qjZ R hKR+ hZ3N@RA P FRT hZP <jZKh'$36NER @ONE@R hZP j   NR   R Y_#'NRhZ@RA jZ_hZqZ NR i ' jX hZPh)qjZ 'q  3Z hZhXX q  jZ q  Z ROXYhZJRD@RDjZqjZ'Xq Z  iR  jq   Z q  'Z hXuRhZR PP  0u (E ji  = 5i(0`a  ( J05P9 aRa PRP _q  Z _iP4RhZR PPPhhZ P4R& P0P0P4q Z  NRi0=XRy"=Y5PiR"=F5P"=P5Pq0;i "0;Z jX hXuP YP_R`RE    RE   P"PYPPg_ZR!iP[R!hPqjZYP_DR!P!iqjZYP_DRi i 05+05jqjZYP_qjZYP6__hZqZR`hXPiRv!hXPjR+05hXPjZPY_@RjZ)_hZhZRjZhZCQDRhZP?RhXPn@R'hXPn>R7hXPnZQG[ROhXgPn@RchX6PkjZPnhZYPx_?R!hhqjZPjZhZYP__hZqZR)_hZqjZ'hZRjZhZqjZq'Z YP:_hZ@R6 q@R)_hZqjZhZBRhZPgORjZhZ 'qjZ!'  R.  q jZ q Z PhXuPBY_m\n@KNE09=FRp iPPhhZ =P:q0=X$RhZhXxBRhZhXxPhXuRhZhXhXu@RhXhXuP6R3hZhXhXu@R3hXhXuP3RChX:0=XR_hZ hX ^0=YRq0;Z0=XhRhZ hRq 3Z "h"h"_hZ =0=YR \hhZ 0=YRhR0u (E ji (0 i@`s(  J= 5PZ0=YR^=* (0@<5jP^(0@5^i h5^j h5fjhZ hZ@RPq"Z RhXuP R/jZhZ0=YRhR(0@= R0=YR~^=* (0@<5P^(0@5ghZ "hR"jZ 0=YR[hhZ PYhhZ hXIKN'hN"Z[P`III?III PI PI _cRhPciR t tiPihhR} tR`RTiP]PRuiPzhPRh tZ jhZ Y_\hXhRujZ -R7PhR'Q Q QQQR      PtR  PtiQR!PtjR&+05PtRU0 5 (PtRt!Pt[PIII?III PP7IP_RjZYP_R Z YP$_hhZ YP& IPH_ hZ=L;=N;Z 0=IR6jZMXhZiYP_ hhZ 05 0=TRljX$CDE?>N@R  i=L;=N; Z     905 0 0RjZBRhZPMXhZ 09=FR hR PiR =Y5PjZPhZ PW9=TRWmjX$ hR8zjX$PSiRS{jX$=Y5PSPW:YP\_  hhZ@R~jZ_hZRjZP R R hRjhZ  iP P R jZhZY_$h=N5Qi  R| iXP! R iXjX$P!R P! Q  Q  R 'iiXP!jZP!hZLIR "LRc!RG!hXHP`!R[!hXHP`!hXP "IRs!hX\P "R "hZR!jX$jR!R!""P!P"R! jX$P"GjZP"P "P !jR," =I5P#R_" =C5iRU"xP\"0P#R|" =B5P#R" =R5 P#R" =N5pRP#R" =F50P#R# =I5P#R"# =E5@P#Q2#RR# =C50P#Rz# =N5pP#R#Q#hR# =I5P#R# =C50iP#P#P#0=YR#00=LR7$ 0=F0=FR7$hZ YPc$_jR~$=I5P%R$=C5P%R$=B5P%R$=R5P%R$=N5P%R$=I5P%R%=E5P%Q%R"%=C5P%R7%=N5P%R%Q]%hRj%=I5P%R%=C5P%P%P%YPi5IP3P)P%_=L;=N;Z YP%_=L;=R;Z YP%_0=N=CLR&jZYP&_hX%=jX%BR:&hZYP>&_hZER&hZ_hZZ=S;=Y;Z 0=FR&'jZFXhZP&hiZ R&jX$P&R&jX$P&=B5YP'_?R0'hZ =I5Pa(@R]'W05=R5$hhZ Pa(>R'^05=C54h Z Pa(!R'=I5hZ Pa(Q'iR'h!Z =I5P](jR (W+05$hhZ =R5P](R9(^05=C54h Z P](R](h!Z =B5P](Pa(hZYPk(_ h0=SR(hX&  05P)  jQ(R(jP)R(iP)R(P)R(R iP)  R) iP)_hZ iRG)hZ hZERl)Z h Z  Q) R)XP) R)ZP) Z  R)wjX$Xc$Y_@R*_hZZXR1*=R1*P* QM* QM* RY*'jXk(P*Q}*iQ}*jQ}*Q}*R*hX'05P*hX&  05P*P3?Q*@Q*>Q*!R*hX'05P3ER.+hZ=L;0;Z hZ05P3 RK+hZhX)jX$P3ZRm+hZijX$=B5P3[R+hZhjX$=B5P3R+hZjX$=I5P3]R+hZhZ =I5P3bR",hZhZhX%0=IR,6jZhZ=C5jX$P3NR,hZhZhX%AjX%hZhX%0=IRc,BjZhZhX%0=IR,CjZFXhZjX$=N5P3RP-hZhZhX%DjX%hZhX%EjX%BR-hZhX%0=IR -FjZShZ P)-NhZ FXhZjX$=I5P3PR-hZhZ_hZZ=S;=Y;Z 0=NR-HjZhZjX$=I5P3QR .hZhZhX&FR-hX&<jX$P-hZ=N5P3^R5.hZhZhX%hZ=B5P3 R.hZhZ_hZZ=S;=Y;Z hZ=I5P3#R.hZhZhX%09=CR.jX$P.9=IQ.9=BR.P.%jZP.:hZ=I5P3R:/hZhZhX%0=IR /jZhZjX$=C5P3LRH0hhZMR/ihX%TR/ 05hZhX% 00R/#jZIjX$BMNR/$jZBR/hZPL/hZ09=IR/NP*09=CR 0LP*0hR 0$jZP'0NP*0:hZ =E5P3QX0R`0hX>&P3eQp0dR$1hZhZhX%09=IR0=I5eR0jX$P0dR0jX$P0P19=CR1=C5eR0jX$P 1dR 1jX$P 1P1%jZP1:hZP3mR]1hZhZhX%hZ=jX%jX$=C5P3kR1hZhZhX%hZ09=IQ19=BR1jjX$P19=RR1hZ P19=ER1hZ P1:jX$=C5P3lR>2hZhZhX%0=RR2:jZhjX$hjX$jX$=C5hZP3fQN2gR2hZhZhX%0=RR}2:jZhZ=I5fR2jX$P2gR2jX$P2P3hR"3hZhZhX%hZ0509=IR3jX$P39=RR3jX$P3@jZP3:P3iR3hZhZhX%09=IRg3jX$jX$=I5P39=RR3)jX$jX$=R5P3%jZP3:hZP37jZP30=RR30=IR3=R5jX$Y_ hX)i0=IHR4jX$=R5P 405hRh5hGR{409=IRS4Pw49=RRe4Pw49=ERw4Pw4:P4HR4P4 R4P4R4P4R4=B5P4hRe5hZhX)09=IR50=RR5jX$=R5PB59=RRB50=IR?5jX$=R5PB5:00R\50jZjX$P 4Y_ hCR5hZP5DR5 ihZP5hX30505 iR509=IR5jX$P59=RR5jX$P5: i hRO7 hCRi609=IR'6 Pe69=RR96 Pe69=CQI69=NRS6 <Pe69=ERe6 Pe6:P6DR609=IR6 P69=RR6 P69=ER6 P6:P6R6 =B5P6;R6 =B5P6 hRL7hZhX300RC700<50=CN0=NCRC70jZ jX$P5Y_ \0=YRy7hX&  05PD9hXi505 hR7 iP7R7 jP7R7 P7R7 P7R7 P7R7 P7 hRx809=IQ89=BR*8  Pw89=RRA8  Pw89=NQQ89=CR`8  Pw89=ERw8  IPw8:R809=IR8 P89=CR8 P88jZP8:=E5 hR49hZhXi500R900<50=CN0=NCR90jZ jX$=B5PD905[P9II I II?III P9_\iR9P;jR9 P;R:P;R3:  P;RR:  P;Rq:  P;R:  P;R:P; R: P; R: P; R ;P; R+;P; RJ;P;Ri;P;R;P;jZP;[_\">+++V+^">+V+^">+V+^">|=<ʞ>)=};< <4@|;!">;*>|;;*>|;}%<.<7<;!h">;!i">;!j">;*>|;">!=">;*>">;:>U>:>*>_~2>@<:>U>:>G ʦ^#V*>s#r:>U>:>U>:><*>~U># ³<:><:>~U># <*>!">!3">!=">!W">!^">!?">!5"> ? ?;:>O*>~U># 0=;:?2>*?">ڜ=> !">"?*>|t=*>"?Ä=*>>*>s#r*>>6#6*>">>2>*>>:>o&)*>N#Fq#p:><2?:?2>*?">A>> !">"?*>|=*>"?>*>>*>s#r*>>6#6*>">>2>*>>##*>+))*>s#r#*>|I>*>^#Vs#r:><2?*>^#Vr+s* ?w#" ?: ?<2 ?!.?" ?.? ?? ?: ?ʱ>O>_> ¦>>_> ?*>?w# >*>:?w#6#:?w#6;.?TEMP2 $$$P@II II?III P%BP@_@R@jZYP@_jR@=I5P#BR@=C5iP#BR@=B5P#BRA=R5P#BR0A=N5RP#BRJA=I5PBR_A=E5PBRA=F5PBRA=N5PBQARA=C5PBRBQAhRB=I5PBRB=C5iPBPBP#BY_\hZ F hRD  i  hR}B    INRB  hRB  P}B  RB=S5PB=L5 X@0=RRC=R5PC=N50;0;Z 00<9=IIQzC9=RRQzC9=EEQzC9=BBQzC9=FFR}CPC9=NNQC9=NCRC  RCvh Z PC9=CCQC9=CNRC  RC;h Z PCjZPC:BFN X@BRDhZPFBFRFD jZFKNRFDhZP,D hRqD!jZFKNRqDhZPWDhZ[PzDP}D_\@RDjZ@@E@RDhZPD[_\~+D^#Vz<ʺIVHI>y2J͡HDͺEED͡H*Ow#6E*Ow#6Wz_E?rE>ʘE@ʃEx'E:JyD>n2J͡H*FRGWʆGy~GzvG~fG}nG|VG{^GE͡H*Ow#r*O6=E͡H*Ow#͡HwE*O͡Hw# ˆEE͡H*Ow#6EO*O͡Hw# ªEE>n2J*tK*rK|E}H*O^#V$F>Z*tK#"tK*J#"J*Os#r>Z#*F~# F$FVH:J F> cH=F1F0000 0000: $*nK~#TFF MFcH4F"nKcH:mKIʋF!K"nKJ?LJ1F!L"nKLKF@MLKF1F>2L1F>2@M1F:mKIF>21FLK*pK"nK>S2mK2J1FH͡HEG>y2JD͡H?.G͡H2rK͡H2sK͡HF.GE9G  Error in %PAGE directive $*O6YE*O6NE*O6YE*O6NE>Y2JE>N2JE͡HE¼G͡H͡H?ҼG2KEO!xK͡Hw# ¤G͡HF¼GEG  %TITLE error or string > 64 bytes$͡H !LK͡Hw# Gw# H͡H5HͺE2JLK*nK"pK!M"nK>I2mKE@H  Error in %INCLUDE $$cHVH_:JY{ ʉH |H2HÀH!H4:HOGO> cH ”H*KN}H|HM KAN K!M~#"K|!"tK*vK#"vK>Z##{I~# H5IVH:K> cH> cHO!xK~#cH !I~IVH JRT Pascal ver 4.0 1234567890 Page 000 $*Ks#"K:K<2K!N"KN+KAO+K:KIO>̓I I+Kɯ2D2D2D!"O!"O! "O! "O!"O!"O!"O!3"O!"O!^"O!t"O!r"O!`~2K*O#~:+OJ~2J##J~# TJJ K*O [I~# |J:KQڱJX˜J2HDY©J2H>2HD>2cHD2+KJ!,Kw# ¾J+K+K!I"HDY7 PASTEMP1 $$$ LST12345678123SLNN_\+++V+^~?w#6PYPII I II?III P\P_\=RvP PP55[PAS401 LEX tPAS404 ADDMAIN >tBLOCK tFIND tPAS402 PAS403 EXPR vtUPDATE E9tGEN ;tFLDLST PARMREF .@tSYMBOL TEST wDtLEX2 DtBIT6 OtCOMPLEX OtPAS405 PAS406 RUbv| !2Blt#RWx 5?\\+=du~  #+03;@CIQVY_dgotw}GWfs  / 5 > F U Y a i q  . R V p # 3 6 G [ u  $ < ? J R   7 k -:\:HV_z$.2Zkw +C^be{4V[^dqtz "%-25=EJMY^alv8Lq,14]n $).1<ANbr![hq~%?HXe|aq"3R^fs{ &5Khpx $,S[rw"6F~#`z +36<DQUZt   _ g w z !%!1!=!B!E!Q!V!Y!^!a!i!n!q!y!!!!!!!!!!"" ""*"3"I"S"]"f"z""""""""# # #(#0#P#X#x########## $%$a$o$|$$$$$$$$$$$$% %% %(%5%=%U%[%h%p%}%%%%%%%%% && &(&3&<&W&&&&&&&&&&''.'6'['c''''''''((7(?([(_(i((((((((((((())6)U)))))))))*!*,*/*;*C*K*T*W*_*e*k*s*{*************,+4+>+F+I+Q+^+k+s+++++++++++, ,(,7,?,I,Y,k,{,,,,,,,,,,,--4-A-N-V---------- ..!.3.;.............//+/8/@/U/d/o/////////0 000(0F0N0V0[0^0f0n0000000000000001 111"1*191F1N1[1c1r1111111111111 22"2*2<2D2L2c2s22222222222223333 3(373H3P3X3e3m3u3}333333333344'484G4Q4Y4c4k4u4y4444444444444555,545@5R5c5f5{5555555555555 66%6-676?6G6Q6Y6c6g6o6}6666666666666 797J7M7_7d7w7|7777777777777888(808?8G8O8^8f8u88888888889"929F9999999::1:9:P:X:o:w::::::::: ;;);1;H;P;g;o;;;;;;;;;;;;;;;;;;;;;;<< < <<<< <#<)<,<2<5<;<>=A=D=G=J=O=\=_=b=i=l=o=r=u=~========================>>>>>(>0>9>>>A>N>R>V>`>e>h>l>p>s>v>~>>>>>>>>>>>>>>>> ?/@@@@@@@@@@@AAA.A;AHAPA]AeAAAAAAAAAAABBB!BVBrBBBBBBBCCTC]CfCoCxC{CCCCCCCCCCDDD"DFCFGFKFNFQFUFZF]F`FiFqFyFFFFFFFFFFFFFFFFFFFFFFFFFG G GGGGGG!G$G)G,G/GWG\G_GdGgGlGoGtGyG|GGGGGGGGGGGGGGGGGGGGGH HHHHH"H%H(H+H0H3H6H]HaHeHnHsHwHzH}HHHHHHHHHHHHHHHHHHII I IIII&I,I/I2IIIIIIIIIIIIIIIIIIIIIIIJJJJJ$J+J2J:J=JEJKJRJZJgJoJuJzJJJJJJJJJJJJJJJJJJJJJJnKKKOZPiPtPPPPP7QJQ]QQQQQQ