ALGOL.SV  +X Bv;v%Zwv!  *0 "9X)H6)H;!C C )4 ) *!PB +)B -B +  * )4  *  * ) *# , 01"SҭBCK# /#) ." ,"  *!  !<V 7#т* )4  *  * ) *# 01CK# ,# /# /#+Ѫ ( /# /  *! &#҂#  *  *!P28@#խ  02K֠  !!!Z~=)  *B>=  *=)  *>=  * ( ,>==#9B>=C)K 1# 1J#>IMPOSSIBLE DOS EXCEPTIONAL STATUS FATAL ERROR FROM ALGOL PHASE ONE FATAL ERROR FROM ALGOL PHASE TWO FATAL ERROR FROM ASSEMBLER PHASE FCOM.CMASM.SVAL1.SVAL2.SV T;0BJpBZ;);Z81#/!JZP9X; 6 ?XPK KK83""*8;XX3!@;##+3? TT707BJZ 9T707BJZ8#T707BJZB&)㏐99ݪ"9 "9  ##!ANALLL@NCAA7AALLNLKRKLLNLKKLLMALOCBOOOKLRERLPOGGGIMNHNX5*Z"*:X8:2! H`:Y:2` Y8 ` =CKS8Z9(J+J@Z*J8H` AL1.SV  &p%Sg  (09Fad4Xn$Q`_u^;O Nh &&S&S% Xz !J< } oP(L w,o1xH7 p)n l(L h e _H8(L Y V(L R O 0A ?J G!<  > ):zFCOM.CMFALG.$$FALG.$1Xz :zXzH>P?(:09H:(>0?z MEMORY OVERFLOW Xz  @:H9@< z  Xz0A  !<   ) :8 +H:H;1: Z;\o oP(J :Z;,oPP   ";:X= 56%x4 %p ) 9P(L ,91H7 ) (L o  H8(L   )- *%<< )$1 9P(J ,9:Z;H;8<PP :  :(;@: = %, %   {vq\{ 0K PA os INCLUDE FILE DOES NOT EXIST \{ ;Z;P@>0A ?(!#*8]8{ >08 06  +1+0S $  - 9  '0A8K 8{7S PA 8{;I/O ERROR $\{ ;Z;P  \{ ;Z; 7P  8 P  \{ P  \{ ;Z;P07  06 08  )\{ ;Z;P 8{ \{ H=\{ H=)>H>)DH@ H;(dH?<>>!80;10!3;0@Ґ:1(0@ғZ@!(= !  !  md 0  OCYPIRHG TC( )GD,C91371,79,491571,479A7LLR GITH SERESVRDEILECSNDEM TAREAI-LRPPOREYTO FADATG NERELAC ROOPARITNOeioCrsu7y{x} cc eegmsvwx~} |{x{{8{0P3+#X{<{Xj8d(b Xb 1o08^8d  K 2 2 2K 2j 2!8{#@{ ^ *** *** Xz8{CKS#C#C PCX{#;z\{ 0l :Xl M . ,BBBBB0{ P"@zP{"*2zXz#8{C[zz\{ 'D{;;  {"C"C"C"C8{ \{ 'D{{3Z2 3{(l#K.HlF8{ \{{ 3Zf2 "ZC0{2"C"C"C"C 7 XzT{3zz:z{z\{ \{ P+# 8{C 8{;+T{34{4{T{34{\{{ /G 3 lCHl ` 519B 19B 1 ,"N .K )ߵ 1J&*F K!ו  ( )\{  @@ /.(0rB0 6 ͕ r" (W #2_FKW\grwER 1(X ER 2**   / *x / ER 7(W (΍@ (X ER 30iBBB / / JUa  , \  7 ? G J r % 3 U b w ER 5 *  .(\( ER 60"P@" 22" _" \_ ]_ ^_ [_ Y_ Z_ W_ T_ U_ S_ V_ R_ _z_ `_ X_ _" " _w" 22" _" _h" ]_ Y_ Z_ T_ U_ S_T" _O" " _ _C" _>" R_ ^_ `_3" 22" _(" _#" "8^ _"  "(8^L _ حH _ . J":; LC JC C ` h ` @ IDENTIFIER IS NOT A LABEL0i BBB Z hC aC fC C@ n n@a@0iBPBBB ` k ` 0a B h(q@q"@2"@h2Pa2"@ l ` 0" T I@@) U J@@" S K@ I@ Z& L@ I@ ]. N@ I@ Y< P@ ^@ K@ I ILLEGAL TYPE DECLARATION H @ 0 ` 0i"@ I  '9IXgySYNTAX ERROR ERROR IN PROGRAM DECuLARATION STATEMENT DOES NOT END PROPERLY UNRECOGNIZABLE STATEMENT ILLEGAL SUBSCRIPT ERROR IN DECLARATION ERROR IN PROCEDURE DECLARATION ERROR IN PRECISION DECLARATION NO PRECEDENCE SPECIFIED ERROR IN LITERAL DECLARATION ERROR IN SWI{ TCH DECLARATION ILLEGAL ARRAY NAME OR SEPARATOR ERROR IN DIMENSION SPECIFICATION UNDEFINED CONTROLLED VARIABLE MISSING CONTROLLED VARIABLE 'UNTIL' MUST FOLLOW 'STEP' CLAUSE MUST END WITH ',' OR 'DO' MISSING 'THEN' IN CONDITIONAL ERROR IN PROCEDURE CALL ILLEGAL PARAMETER 'IF' MAY NOT IMMEDIATELY FOLLOW 'THEN' SAME NAME AS PROCEDURE THIS IS AFTER END OF PROGRAM  " h(q@q  ` 0"8^@H ` I@@@@@@ o ` @@@@@0" W  Kf@ V  I@ \ ! I@ L@ ILLEGAL DECLARATION0" R 5 I@ W < J@ ^ C K@ [ J L@ ` Q M@ ILLEGAL DECLARATION022 B ҂B (B(J"  "R8^  "  ("     0 ` Y ` (  "  "  (!6J""    hB@h) tB@t$Q("  (J  B PRECISION CAN NOT EXCEED 15 WORDS("    ê  DECLARATION OUTSIDE BEGIN BLOCK0i KB BB B 0" t  ` I-0` I  20" t 3 ` V ` I0 `2 ` (0 0 (B0i BBB n0n Z hC aC fC ރC@ Z qC C n@a@f@@q@h@ h(q@q0a B"@2"@h:Xa"@f;#@"@2h* qBHq n `  J"  "  2*2"@   O@ H8](J(KH PRECISION MUST BE AN INTEGER LITERAL PRECISION MUST BE A SINGLE PRECISION INTEGER@ I22* J2:# # IC LC C:# K[L "CZ CK@ DUPLICATE SUBSCRIPT J* L22BJ8;3"0^@H0i;Z Z aB B n8nX0Z @ O@ I \ C SPCC  J22:* ZK0"C0" "@ "  ILLEGAL PRECEDENCE΁ ILLEGAL OPERATOR0"8^@H I0P  0P ; 0Ґ o8^" B T@c 0oP 4!P@"\{ 0"  ILLEGAL SYMBOL IN EXPRESSION "@"@ A A A A A A A A A A AILLEGAL OPERATOR IN EXPRESSION MISSING VARIABLE IN EXPRESSION PREVIOUS EXPRESSION WAS NOT TERMINATED ILLEGAL USE OF RESERVED WORD02P2P2P0"@"0("@" "@"@"]0:X *]Ό  ILLEGAL OPERATOR028^   0*:X0  0" `0 ֠@" `0"@ ` 0 K0i L J A -EXPRESSION DOES NOT END PROPERLY - PARENTHESES DO NOT BALANCE [ - [ILLEGA^L SUBSCRIPT CLOSE J ` J0" E  e 6 PARENTHESES DO NOT BALANCE J:;#+ `0 `  R0*8^8L J0i  J ` J0" E [ d x ILLEGAL SUBSCRIPT CLOSE J `0 ` J0i J" I  0" a 0" K J - ILLEGAL PARAMETER SEPARATOR K" H- G 0i KB B K `" i ` 0i `0B ` g ` M ` h ` 0 M J L K K" F J" tg0iB KB B ` K ` f ` 0 K I 02P22P v79 >0 ` i ` 0i ` J0i KB B ` g ` 0 `0"0`B0 `0 ` h ` 0*0"J 0 M I0 ` i ` 0i ` M0 ` h ` 0 L K A0 `0"  `0ۅPB `" W e \{ 28^22(P8{S \{ 0*"0 T"8^ _$3ER 20 ^BJTJBJTER 21 ^TBlJJTTER 22 ^JlBJ}JTER 23 ^TTT~BTTTER 24 ^BT}JBJTER 25 ^TJTJTBTER 26 ^JJJJJJBER 278{0S"C'C 8{0S0"C3"C 8{0S0"C3"C 0"@ UNDEFINED VARIABLE"@ BOOLEAN IN REAL EXPRESSION B"@ ILLEGAL POINTER0"&@ ILLEGAL USE OF LABEL\{ 6 `@@`"@" 8{#B8 22" ILLEGAL VARIABLE" 8 NO SUBSCRIPTS SPECIFIED UNDEFINED VARIABLE8{3JV ` e@" 8{#3  _C ` *8^ = ` !$ILLEGAL TYPE CONVERSION x w y z { |8{# ` 0i8{;"C"C"C"C @` \{ 4`2 2 _ "Z"8^":;#8MP :;;#;(f ܄ \{ U c(ʸX8"80dX 1ILLEGAL CHARACTER H O  [ (H  ւ  D c@ Q @  * /Q C S KCPC " `' 0" " }P ~ J c E e ‚; 4  ILLEGAL CHARACTER(c P e- + ILLEGAL EXPONENT8XX8RX 8X ‚ 4 c .ЊH @  cH  ILLEGAL OPERATOR@@0"  (M0iJB .i i0" i2@Ґ2" v" y e ILLEGAL FUNCTION REFERENCE   Q MISSING 'END' c ILLEGAL CHARACTER ւ > ILLEGAL USE OF RESERVED WORD @iR[@ R@ c@ @ @   ILLEGAL CHARACTER c E e + - . R r PB pB @c @ @ (RH(@ H :Z#@P  % c 0+ c R% r% P% p% ( R@@ H :Z#@P  c TTllTILLEGAL CHARACTER 0iJJJ B @ \{ P)ց H cړ sK ڐ0sJ\s 0\{ P9#X< X0"+ "+ 2;(LH ."+ 2;p08Z#0](J(K#0P + C@(^  TOO MANY LITERALS02 P 8#+0P  0iB JBZ B 0i JBZ B K SPCC 02* I P0B \{ " : !:J3* ^ ?8^ 0p* 22"8{C 2" V*8^ ILLEGAL PRECISION\{ W  0i8Z;#(K#Q#; B B IB ` 83" | "  DUPLICATE SYMBOL DEFINITION0i8ZB;CK KC NC IB B 0i8Z;JK KC MC IB B 0"0i(MJB 80iZ;#B BB \{ 8X  ;XX00s"3  $s 8;X8; XX0s"C$s  \X 0iZ aB B B n0nPP8{ \{ 38{S:Z;#8^([!*D{8L2Z2+ ${ ^ !" (^  8{32 S8{3"C"C \{ 9 1 +"8{C v\{ 8^0k* 202P CS0`222S(kKXk 8; P;  CS Z kBPk(^"C \{ 8^8; P# 8^8J Ҝ8^ 8{C Xz84PH(O0 \X8Ґ+K c I ӂ  MISSING RIGHT QUOTEmbTRUEmiFALSEmFoIFmGvTHENmHi}ELSEmKiSTEPmLiUNTILmNi YWHILEm<iANDm=iORmAiXORm>iEQVm?iIMPm@ONOTmIiFORmJiDOmMGOTOmPBEGINmQENDmOiCOMMENTmRiOWNmSiBOOLEANmTiINTEGERmUiREALmViARRAYmWi PROCEDUREmYiQSTRINGmZiLABELm[i!VALUEm\i)SWITCHm]i1POINTERm^i8BASEDm_i@LITERALm`iIEXTERNALmXiROPERATORmiZINCLUDEmGOmgSIGNmoENTIERmuSINm{COSmLNmARCTANmTAMNmSQRTm ABSm EXPm ADDRESSmLENGTHmSUBSTRmASCIImSHIFTmROTATEmHBOUNDmLBOUNDmSIZEm FIXm FLOATmBYTEmCLASSIFYm OPENmqCLOSEmREADm WRITEm&REMm.OUTPUTm5UMULm>ALLOCATEmEFREEmMACCESSmVWORDREADm_WORDWRITEmgDELETEmpPOSITIONmxRENAMEmCOMARGmLINEREADmLIuNEWRITEmBYTEREADmBYTEWRITEmFILESIZEmMEMORYmINDEXmFILEPOSITIONmSETCURRENTmERRORmAPPENDmCHAINmFORMATmFETCHmSTASHmFLUSHm NODEREADmNODEWRITEmNODESIZEm'BUFFERm0HASHREADm9HASHWRITEm@GTIMEmGSTIMEmMMODmVOFFTRACEm^ONTRACEmeTRACEmmRANDOMmtSEEDm}DATAOPENmDATACLOSEmDATAREAD6mDATAWRITEmBLKREADmBLKWRITE/*8h>=8h=>:h=<:h<=Dh:=;h->6h<>0R+1R-2i*3i/4i=5i^7i>9i<Bi:C ;Ei,aa(bi)di[ci$])"`}i3+~i8-m@iNOTmMTOmQiJENDmHiELSECV;ah[(Bh:CMPYFENTLSGNNTRSINCOSALGATNTANSQRPOSEXPFMFDXENTLXMXDtrtvxz|iknrtvxz|~jrtvxz|~rtvxz|~  !"#$%'0:?A[\]_`a{~    a                oo    `                   P ] o x !!.!7 !Y!!!""""""# ##,#>#I#X!###$%$%%%$!%m#%!#_###%$$\$$%u%%%%%&&&%4%@%N%V%`%i&&""3"J"V"""!?!Q" """'&-%%!"!!!$!$%!"% &8&K///*.Q///./v//./*//.///*f.P/vjm//./v/ /m.///.B/*//*e.///./*/ /*g.O/*//*.P/j/ /m.v// /m./*/ /{*h.O/*//*.///*i. ///k.F/u//.M/*//j.///*.I/*//*z.P///*g.a///k.C///l.Q///l.///v.s/hq/ /.uH/h//.u/h/ /.vWC///*.WC/h/  /.WQ/h/  /.vC///*.C/*/ /*h.PQ/*/ /.jQ/*//.vQ///.v///*g.///v./*//l.d/t//*.B//Դ/*h.B/*//*h. ///k.4/D//.D///k.;///k.d///k.///.///v./g/ /./*//l.///l.///v.tcB///*h.tcB/h/ /.///v./*//./*//*h./*/ /*m.O/*//*._/*//*.X///*.\// /*. ///*.vZ///*n.WZ///*n.Z/*//*.///*n.V/U//.`W///.WW// /*o.jW///.vW///.///x.a/t//.X///*.`W///. ///.WW// /*o.jW///.vW///.V/t/ /*q./*//*p.///x.E/*//*o.C/*/ /*u.///x.tb/*//*}.///x./*/ /*o.///./V//}.a/*//**.///x.X b/W//.///x./*//m./*//*.///x.E/*//*.C/*/ /*u.///x./T//*.// /x.a/t/  /.// /x.t b/*//*.// /x.E/*//*.C/*/ /*u.// /x.///.///.\/g/ /./*//.///*.// /x.4/D//.D/t/ /**.// /x.///./h/ /./*//.t///.tE///.tC///.///.tE///.tC///.// /x./g/ /./*//./*O//.C/*//.E/t//**.// /x.\///.// /x./*//*u./h/ /.///*.E/*//*q.C/*//.d/tt//r.// /x.tB///s.///.t///s.// /x.tE///r.tc///*t.// /x.tC/*/ /*u.///q.O/*//*.// /m.///h.t/*/ /*u./*//.C///w.Q///w.v///*v./*//*v.W//_/l.P///l.j///l.v///l.///w.// /.C///y.v///*y./*//*x.W///*u.P///*u.j///*u.v///*u./*//y.// /v.///*{.///v.4/D//.D/*//|.d///.///v./s//~./hg/ /./*/ /./*//./p//.d/I//*.///v.4/D//.D/*//.///v./r};/ /.I/*//.///v.///./hq/ /./*/ /./s//.s/sh/ /./*//.N/*//.s///.L///v.K/*//.E///.J///.///v.E/*//~.sJ/hg/ /.///v./*/ /./p//./s//*h.s/sI/  /./*//.///v.s/K/  /.///vc ./t//*.~///*.}///*.~///.}///.///*.///.L///. L///.L///.///./hg/ /./*/ /./p//./t//.tL///.///v./i/ /.///./hq/ /./*/ /./t//.t///.///v.///./h/ /./t//.t///.///v./L/  /./s//.///./hg/ /./*/ /./p//.///.s/sK/  /./*//.s/sN/ /./*//.///./hg/ /./*/ /./p//./t//.tL///.///v.uG///.//M/v./uf/ /./*//*.F///.///h.///v./ug/ /./*/ /./*//*h.e/t//./W/ /.tE///.tb///*.///v.C///.B/*//*.e/W//.// /.a/t//./*//*.///l./*/ /./*//l.v///.vW///.W/h/ /.///*.Q///l.H///l.C/I//l./*//*.C/*//*g./*//*.C/*//*u./*//*.C/*//*h./*//*.C/*/ /*u./*//*./*//*.C/*//*u.///.W// /*.vW///.///.///x.///./g/ /.W///./mh/ /./*//.// /*.a/W//.C/*/ /.///x.W/*//*.///*.///x.b/*//*.E/*//*.///x.C/*/ /.B/*//*./*//*.a/*//*./*//*.m///.// /./*//*.[/*//*o.///u./*//*.Q///.H///.C/*//*.///.///.///.///.&p5*Z"*:X8:2! H`:Y:2` Y8 ` =CKS8Z9(J+J@Z*J8H` AL2.SV  E'%Sg  (09Fad4Xn_$Q*   \ #uS 5' \e | Z ; T'''Sw% Xz !J< } oP(L w,o1xH7 p)n l(L h e _H8(L Y V(L R O 0A ?J G!<  > ):zFCOM.CMFALG.$$FALG.$1Xz :zXzH>P?(:09H:(>0?z MEMORY OVERFLOW Xz  @:H9@< z  Xz0A  !<   ) :8 +H:H;1: Z;\o oP(J :Z;,oPP   ";:X= 56%x4 %p ) 9P(L ,91H7 ) (L o  H8(L   )- *%<< )$1 9P(J ,9:Z;H;8<PP :  :(;@: = %, %   {vq\{ 0K PA os INCLUDE FILE DOES NOT EXIST \{ ;Z;P@>0A ?(!#*8]8{ >08 06  +1+0S $  - 9  '0A8K 8{7S PA 8{;I/O ERROR $\{ ;Z;P  \{ ;Z; 7P  8 P  \{ P  \{ ;Z;P07  06 08  )\{ ;Z;P 8{ \{ H=\{ H=)>H>)DH@ H;(dH?<>>!80;10!3;0@Ґ:1(0@ғZ@!(= !  !  md 0  OCYPIRHG TC( )GD,C91371,79,491571,479A7LLR GITH SERESVRDEILECSNDEM TAREAI-LRPPOREYTO FADATG NERELAC ROOPARITNOeioCrsu7y{x} cc eegmsvwx~} |{x{{8{0P3+#X{<{Xj8d(b Xb 1o08^8d  K 2 2 2K 2j 2!8{#@{ ^ *** *** Xz8{CKS#C#C PCX{#;z\{ 0l :Xl M . ,BBBBB0{ P"@zP{"*2zXz#8{C[zz\{ 'D{;;  {"C"C"C"C8{ \{ 'D{{3Z2 3{(l#K.HlF8{ \{{ 3Z`T2 "ZC0{2"C"C"C"C 7 XzT{3zz:z{z\{ \{ P+# 8{C 8{;+T{34{4{T{34{\{{ /G 3 lCHl 1 9 B  *   +\{  P0`2 "T @ /  Ԝ    0PP CF X J S T4 F< USE OF AN INCORRECTLY DECLARED VARIABLE I J XD I 0"P0B B }ER 11  (FTgER 13 J 0 K B J 0 K SB L 8SC0"$  IP0 0 : #*F" " I I ( V U I C F R @ I DP x1 N I :H# C I 0!B"@B8 I  LB10`2 I L& I  ,gDg  I%( J B(v D(g  I PDP J    0@ 0P@ VO RV f  I" =>,g _ J  I  -. 0e"8] x{" ro{ or  I I$  I J̍  0a h(q@q2"@a"@h8;+SK K  q(hHq qD J  D0p5P" *H(E2(P " 2(E4 (P .S *2 "8] (P B@4 ͂)P (P 0p"P" P .S" :2۠(P .TXT(U " "H4n1P4iP"2" ""8^ "" "2"@@2"@P  02" .L :(P .J .I P .I :(P K !& "P .J :2"(P (X   G" [A0f2"@h"@a"@f2"@q "@0f2"2*HÂD `J2Pa2 hB0`222Pf0n"Pf20fPa2 hB"D2 qB"@q@h B@ J "@D1 P4P":2"8^8Y(P .ENT(U n1P4P":# f:# 2(P .EXTN(U P - 1P4P02"8^8Y (P .TITL(U  K  L  J L J  K 8^D L ^D0k"8^ (P .EXTD(U 2(P .EXTN J  tD J PP  LH K 08 + (;8 + ;8 + ; (KX(hK C@h(q@q + SC#(D J 2P@8 J  D J  D J "  222"!*:3" K L CODE GENERATION ERROR0}8~B  \{ 3 5 3 3 3 7 3UNDEFINED VARIABLE P J8{C \{ 7P e" O Ƃ8{ C 8{32S \{ 7P e* e Ƃ108{32S c k n t d a p b l i  x  f X ER 10 ĪE(ʪB e"   e2J52" 2P/"  e22" 2" 2"  :J3"8^ 2"  e22" 2"  e22" 2 V 2"  222:*0a2:" 2"   e2:+22":3"8Q8^ 20f#42"2*"@p 2 e  222*0k8^ " 2" 2 e8{C \{ 7P e"!B o K oR K or V V Ƃ08{S 8{32S or\{ 7P e"!&B r { R { ro { x  Ƃ ʂ8{C C 8{32S r\{ @@@@@@@"@8]H8^ X w xvX#@K@" 8^ R o r 800`2P"@$gPP8} F@X<"+  "+  (KH @ 8 J0 y@$gPP }#@X 0y(F# (F# (F#(F KD@8{32S \{ @@@0"K*8} F@X<#J*@ #*  8KX @ J y@ }#@ 8{32S \{ 0{@ B / B l  / o r R - 8^8Y 8^1(^ 8X 8^PP8X 8^ - 08^p8 eSK  \{ $gPP0}P"DvP F@02  8yS:(L P(N P(8yC8`; "+ "+T 8yPC \{ + = ([ = / D ; K X r l o ! t s y 8 I Q  I Q"  ? _ d j . . .ILLEGAL OPERAND ^@ Q@!o2*2"     V"8^  "  "8(  2"  " G   "8 +U);8 + ;8 + ; (KX(hK #C@h(q@q + "CC#8(  $g F  8;;#8^8YM" .L   I Q"  :+"K @#(^(P #PPPP8^ 8]) )"   22"PPPP:  !022  "0*8^0k* 2"8^ F   ILLEGAL FUNCTION "8+U; u 8{C 8{ TC3"C 8{C3"C ILLEGAL OPERAND\{ "Z"8^  s"  q8^" P J 8](J (K@ \{ "   :J3* ^  8^ 0p* 22"8{C 2"*8^ ILLEGAL PRECISION\{ + ([ /  I Ҋ t kN c} IH"  ILLEGAL OPERAND2@Ґ2  LITERAL GENERATED LABEL TEMPORARY8{ #).4:@ER 291 INTEGER) REAL$ BOOLEAN LABEL COMPLEX POINTER INTEGER STRING / \aelqv\eER 30 LOCAL OWN PARAMETER BASED VALUE EXTERNALʢ FHER 31 ARRAY PR6OCEDURE\{  8Y8[ r o8^8^8X8^8eKS \{ H\{ PP0CPpP@PD8X8  X Xz8z#8^z\{ P"0^  8{S \{ 2 \{ F@8 +8^ #   E@2\{ E@\{ $ P \{ (  1# H (Ъ 9 3FPH 8 3u(uPHPH\{ #( @ 3c 3d 3c \{ 08uPPҐ*B \{ `(I -c c8^   yH -cb c8^@@ci(P -iiDi1=c 8{0iS0`2P X"CZ -c(J -d /o(Ъ 0PP  - 3H 9 3 3o8{/K ; `w<R  ;#)MfgwD0?r{R  (FNfr:EYMkLV,Mcy $ 2 @ !k!!"N""## #!###$4$K$\$$$$$$%%)%5%M%W%%%&&&-&8&&&&' 'I'z/T no2 2 27//C 8/ tADD rob,roa//C 7//X//F to2 l[1 -40//F do2 1 -53//C 1 a 1/ INC ro1,ro1//X ro1//F no2 2 66//F to2 1 54//F do2 1 42//C 1 a 1/ NEG ro1,ro1/ COM ro1,ro1//X ro1//C 8//T a 2 20/ tSUB rob,roa//J 67//F noa 2 27//F nob 2 15//T doa dob -59/ tNEG roa,roa/ tADD rob,roa//C 7//X//TR to1 0 27//C 8/ tMPY rob,roa//C 7//X//S c 1//T no1 2 19//S c 2//F no2 2 78//S d 1//T c 2 7//S d 2//F tod 1 43//F doc 2 31//C 1 a d/ MOVZL rod,rod//X rod//S a 1//S b 2//F nob 4 14//S a 2//S b 1//C 3//C 20 v y/ SUBO 0,0/ MPY//SU r2//SV r0//X r1//TR to1 0 40//C 1 a 1 2/Ǭ tDVD ro2,ro1//SU ro2//X ro1//S a 1//S b 2//C 3/ SUBO 0,0/ JSR @SDIV//S x y//SV r2//SV r0//X r1//T to1 8 13//TR to1 0 23//C 17/ SUBCL a,a//X ra//C 8/ SUB rob,roa,SZR/ SUB roa,roa,SKP/ INC roa,roa//C 7//X//F no2 2 51//T do2 2 120//T do2 3 107//T do2 4 9~5//T do2 5 102//C 41 h 1//S rb o0/ tALG ro0,ro0//C 41 h 2/ tMPY ro0,rb/ tEXP rb,rb//SV ro0//X rb//F to1 1 9//C 31//X//C 41 h 1//S j b//S rb oh//T do2 3 12//F do2 5 18//C 33/ tMOV rb,rj/ tMPY rb,rb//T do2 2 36//F do2 5 12/ tMPY rb,rb/ tMPY rb,rj//SV rb//X r:j//T to1 8 13//TR to1 0 22//C 17/ SUBL a,a//X ra//C 8/ SUB rob,roa,SZR/ SUBZL roa,roa//C 7//X//S c 1//C 15 d 2//X//S c 2//C 16 d 1//X//S c 2//C 15 d 1//X//S c 1//C 16 d 2//X//C 8/ AND rob,roa//C 7//X//C 1 a 1 2//F to1 3 56/ MOV ro1,ro1,SNR/ M#OV ro2,ro1//F no2 4 8//SV ro2//X ro1/ COM ro1,ro1/ AND ro1,ro2/ ADC ro1,ro2//SV ro1//X ro2//C 8/ ADDZR rob,roa/ SUBL roa,roa//C 7//X//C 1 a 1 2//T no1 4 36/ SUBZ ro1,ro2/ SUBCL ro2,ro2//X ro2/ ADCO ro2,ro1/ SUBCL ro1,ro1//SU ro2//X ro1//C 1 a 2//T to1 q1 33/ NEG ro2,ro2/ INC ro2,ro2//X ro2/ COM ro2,ro2//X ro2//C 1 a 1 2//S b 1//T noa 4 14//S a 1//S b 2//T to1 1 55/ ADDR rob,roa/ SUBCL roa,roa//F nob 4 8//SV rob//X roa//C 33//S c j//SV rc/ MOV roa,c/ ANDZL rob,c/ ADD rob,roa/ SUB c,roa//J -102//S i 1//IC 19 h 2//F io1 1 29//F io0 0 17//T to0 8 6//X re//X//C 54//C 34 j 2//C 4//T co1 1 3//E//C 39 a 1//T e l 58//F to1 4 3//E/ JSR @EXSBSC/ d//C 37 a 1//C 32 a 2 d//J 83//T po1 0 12//F po1 1 28//F d 2 18/ JSR @SBSCR//J 19/ JSR @SUBSCRIPT/ d//C 32 a 1 d//S r2 ؕo0//SI r2//X//F ko1 6 9//C 36//X//F to0 8 10//C 71 s 0//C 62/ d//C 37 a 0//C 75 a 2 d//C 68//X//C 1 a 1//C 26/ #MOV ro1,ro1,SNR/ JMP @.+2/ JMP .+2/ o2//SV ro1//X//F ko1 2 26/ JSR @ABRETN//C 32 a 1//X//F io1 1 56//C 26//S e 2//C 51 k 1/ COM# 2,2,SZR/ JMqTP 0,2//SV r2//X//T no1 3 65//T to1 4 3//E//C -12 lo1 a c//C -12 y b c//T a b 13//C 76 a 1//X//C 6//C 59 a 1 bo1//C 61/ o1//X//C 24 c 1//SC a//T a 3 3//X//C 2 k a//S r0 oa//X//S e 0//C 51 k 1//X r0//C 41 h 1//X rb//C 42 h 1//X rb//F to1 8 13//C 58 h 1//X//S h 1//C 40 i 3/ MOV c,b,SZR/ SUBZL b,b//X rb//C 1 a 2//X ro2//C 1 a 2/ tNEG ro2,ro2//X ro2//F io2 1 51//C 1 a 1/ ADD ro1,xo2//SU ro1//S xo2 o0//SI ro0//X//F co2 1 51//C 67/ JSR @BSARR//C 37 a 1//C 32 a 2//C 32 a 0//X//T to2 8 50//T io1 1 3//X/ /S e 2//C 51 k 1//S r2 o0//SI r2//X//C 67/ JSR @BSSTR//C 37 a 1//S a po2/ a//C 32 a 0//X//C 62//C -11 a d -1/ a//C 75 a 2 d//C 68//X//C 54//T y 0 36//C -2 a b/ JSR @RETURN/FSa= b//C -9/L= -200/S= -167/SP= 1B0//C -9/LP://C -3//C -9/ .END//C -9//X//F ko1 5 3//X//C 4/ JSR @ARRAY/ d//C 37 a 1//C 32 a 2 d//T ko1 2 23//T ko1 3 11//T to1 8 3//X/ JSR @SARRAY//C 37 a 1//S a po1/ a//X//S h 1//C 19 i 2//C 60/ o3//X//S h 1//C 19 i 2//X//C 23 d 5//TR to4 0 65//C 1 a 4/ tSUB ro4,ro5//SV ro4//S ro5 o0//C 23 d 3/Sv/C 1 a 0//J 6//J 74/ tSGN ro3,ro3/ tMPY ro3,ro0/ tNEG ro0,ro0//C 54//C 73/ MOV# 0,0,SZC//J 60//F no3 2 106//F do3 -1 40//C 1 a 4//C 73/ SUBOL ro4,ro5,SEZ//J 46//F do3 1 41//C 1 a 4//C 73/ SUBOL ro5,ro4,SEZ//J 100//S ro5 o0//C 23 d 3//C 1 a 0//C 1 a 4//C 73?5/ SUBOL ro4,ro0,SNR/ ADCZR ro3,ro3,SZC/ ADD# ro3,ro3,SNC//C 5 n 66/ JMP o6//C 60/ o1//T no3 3 36//F no5 3 12//C 29//J 62//C 30//J 50//C 22 c 4//C 60/ o3//F no5 3 12//C 27//J 06//C 28//T no5 3 18//C 11 e ro5//J 14/ tSTA ro5,0,2//C 61/ o2/o6://X//C 1 a 3//޼C 73/ #MOV ro3,ro3,SNR/ JMP o4//SV ro3//C 60/ o1//C 61/ o2/o4://X/ INC 3,1 ;SAVE//S x 0//X r1//C 54//C 26//F or1 24/ MOV 1,3/ JMP 0,3//J 57//C 20 v lo1//T v y 22/ LDA 2,.FP/ STA 2,.SP/ JMP @S+y1,3//C 5 n 66//S x y//S z y//X//C -10/ .EXTU//C -7//C -8/2./C -13//C -9/ .ZREL/.LP: LP+200//C -14 a//T a 0 11/OP: .BLK a//C -9/ .NREL/ .TXTM 1//C -9/.DALC FNTR=100360 ; ENTIER//C -9//X//C 54//T or2 63//T ro1 42//C 34 j 2//C 20 v lo1/ LDA 2,S+o1,3//J 11/ MOV ro1,2//X r2//C -6 a//C -12 y b c/ JSR @SAVE//SC f//S z[ y//S x y/ FSa//F f 0 10/ bB7+f//X//F to1 0 27//C -11 a f -1/ bB7+a//J 17/ bB7+f//C 37 a 1//C 37 a 2 f//X//C 5 n 66/ JSR @RETURN//C -2 a b/FSa= b//C -9//C -4//S x y//S z y//X//C 25//C -5/ JSR @BLKSTART//X//C -1//C 25//C 59//X//C 42 h 1//X rb//C 43 h 1//X rb//F to1 8 3//X//C 71 s 0//C 67/ JSR @CVST//C 37 a 1//C 37 a 0//C 68//C 72 c 1//X//C 71 s 1//X//F toa 8 3//X//C 2 k a//F roa 3//X//F ioa 1 28//S m 33//C 35 k a//S b j//X//C 33//S b j//S e b//C 44 f poa//C 10 f a//S rb oa//X//C 50 g tok//X//C 2 k a//C 9 c 0 2//F ioa 1 34//S e 1//C 51 k a//F xoa 8//SV xoa//F iob 1 44//T rob 17//S e 2//C 51 k b//F xob 8//SV xob//F or1 64//F or2 104//F rob 2 3//X/ MOV 1,0/ MOV 2,1/ MOV 0,2//S R2 ob//X//F roa 41/ MOV roa,1//T rob 2 -37//SV roa//S r1 oa//F rob 54//VT rob 2 42/ MOV rob,2//T roa 1 -110//SV rob//S r2 ob//T or1 33//F roa 23//T roa 1 11/ MOV roa,1//T roa 17//S e 1//C 51 k a//T rob 38//S e 2//C 51 k b//S r1 oa//S r2 ob//X//T rob 2 -34/ MOV rob,2//J -52//SC d//C 22 c 2 d//C 54 x y//C 39 a 2 d//X//S b t//]S t 1//C n a 0 2//S t 0//C n a 0 2//S t b//C 54//X//SC a//F a 2 39//S b t//SR toa//F roa 8//SV roa//S t b//X//SU rob//X roa//C 1 a 1 2//S b 1//F no1 4 14//S b 2//S a 1//X//T orc 10//C 34 j c//X//SV re//T nof 2 96//F kof 5 15/ tLDA re,of//X//F kof 1 2ٴ2/ tLDA re,OP+of ;of//X//C 20 v lof/ tLDA re,S+yf,3 ;of//X//F tof 1 97//F dof -1 20/ ADC re,re ;(-1)//X//F dof 0 19/ SUB re,re ;(0)//X//F dof 1 21/ SUBZL re,re ;(1)//X//C 18/ tLDA re,L+of,3 ;of//X//F iore 1 9//C 47//X//C 44 f pore//F kore 5 16/ tSTA re,or&e//X//F kore 1 24/ tSTA re,OP+ore ;ore//X//C 20 v lore/ tSTA re,S+yre,3 ;ore//SU re//X//C 1 a c//C 1 a d//X//SU ro1//SU ro2//C 54//C 33//S a j//X//T toc 8 24/ tSUB# roc,rod//C 13//X//S u c//S w d//C 67/ JSR @STRCMP//C 37 a u//C 37 a w//C 68//C 72 c 1//C 33//S a j//X//C 12//T to1 8 13//TR to1 0 23//C 14/ SUBCL a,a//X ra/ ADDOR roc,roc/ ADDOR rod,rod/ SUBZ roc,rod/ SUBL roc,roc//SV rod//X roc//C 12//T to1 8 13//TR to1 0 22//C 14/ SUBL a,a//X ra/ ADDOR roc,roc/ ADDOR rod,rod/ SUBO roc,rod/ SUBL roc,roc//SV rod//X roc//T to1 8 34//C 1 a 1 2/ tCEQ ro1,ro2//C 13//X//C 67/ JSR @STREQ//C 37 a 1 2//C 68//C 72 c 1//C 33//S a j//X//T x -1 45//T t 0 16/ tLD3 .LP//J 11/ LDA 3,.LP//S x -1//X//F toi 8 52//C 67/ JSR @MOVSTR//C 37 a h//C 37 a i//C 72 c h//X//F noi?p 3 69//S c h//C 21 a i//C 1 a h//C 44 f poh/ tSTA roh,0,2 ;o2//S roh oi//X//C 2 k h//F roi 8//SV roi//C 1 a h//S roh oi//C 11 e roi//T toi 6 3//X//S a 0//F xora re 7//SV ra//F xori re 7//SV ri//X//F v x 3//X//S x v//F v z 37//T t 0 13/ tLD3 .SP//X/ LDA 3 #,.SP//X//F v y 37//T t 0 13/ tLD3 .FP//X/ LDA 3,.FP//X//C 56//C -12 v x z/ JSR @GETSP/ xB7+z//S z v//S x y//C 55//C 20//X//C 22//C 60/ oa//X//F ioc 1 40//F xoc 30//F noc 4 18//C 54//C 11 e xoc//S b t//SR toc//F roc 20//T noc 4 18//SV roc//S t b//X//S t  b//C 2 k c//C 11 e roc//C 54//X//T nod 3 12//C 1 a d//X//F d 5 12//C 22 c 3 5//C 60/ od//C 2 k d//T d 5 12//S r0 od//X//C 33//S b j//C 42 f pod/ tLDA rb,0,2 ;od//S rb od//X//C 25/oc://X//C 26//C 5 n 63//X//C 5 n 64//C 73//X//TR to4 9//C 2 k 4//S r0 o3//C 11 e 0//C 23 d 5//S e 1//C 51 k 3/ tADD 1,0//SV r1//X//TR to4 9//C 2 k 5//S e 1//C 51 k 5/ tADD 1,0//SV r1//S r0 o5//X//C 23 d 5//C 1 a 3/ tADD ro3,0//SU ro3//X//C 1 a 3//C 1 a 5/ tADD ro3,ro5//SU ro3//X//C 2 k 1//F ro2 8//SV ro2//S b 1//S a 1//C 3//C 20 v y/ SUBO 0,0/ MPY//T do2 2 42//F do2 4 16/ MOV 1,2//SV r2/ SUB 0,0/ MPY//SU r2//SV r0//X r1//S x y//F noa 2 14/ LP+oa ;oa//X//T coa 3 64//T koa 7 14//F toa 0 3//E//F koa 1 14/ OP+oa ;oa//X//T toa 4 12//F coa 3 36//T noa 3 36//F noa 1 12//T koa 0 12//F koa 5 11/ oa ;oa//X/ SP+oa ;oa//X//F noRj 4 10//C 11 e j//X//F norj 4 10//C 11 e j//X//F rok 20//F xok 8//SU xok//X//T xok 9//C 45//X//F xok 2 9//C 46//X//C 54//F or2 33//F nok 4 12//C 11 e xok//C 45//X//F nor2 4 10//C 11 e 2//S g xok/ MOV rg,2//SV rg//S r2 ok//SI r2//C 46//X//S h 2//F ao1 1 121//TR to2 0 32//C 40 i 1/ FSGN c,b//C 54//X rb//C 1 a 2/ ADDZL ro2,ro2,SNR/ JMP .+3/ ADC ro2,ro2,SNC/ SUBZL ro2,ro2//X ro2//F ao1 10 12//C 42//X rb//F ao1 11 12//C 41//X rb//F ao1 2 32//C 43//C 50 g 7/ FNTR b,b//X rb//F ao1 9 49//FR to2 0 36//C 42/ MOVL# b,b,SZC/ NEG b,b//X rb//T fo1 2 12//F fo1 3 14//C 70 h 37//X//F fo1 4 14//C 70 h 32//X//F fo1 0 30//C 41//C 50 g 2/ o1 b,b//X rb//X//C 69//F e l 27//C 32/ soa ;toa koa coa//X//C -15 oa k/ SP+k ;oa/ @soaG ;toa koa coa//X//S n t//S t 0//F noRc 4 10//S t n//X//C 54//C 11 e c//S t n//C 55//X//F koa 3 3//X//C 69//T e l 101//F toa 4 37//C -17 j/ JMP .Rj/.Qj://C 76/.Rj://X//C -15 oa k/ JSR @GETADR//C 32/ soa/ eB7+g/ SP+k//X//T toa 4 3//X//F koa 2 54//C -17 j/ *5JMP .Rj/.Qj: JSR @ABRETN/ SP+oa ;oa/.Rj://X//F boa 0 3//X//C -17 j/ JMP .Rj/.Qj://C 59 k 1 boa//S c a//C 61//S a c/ oa/.Rj://X//S d t//SR toh//S n t//T roh 23//S t d//C 1 a h//S d t//S c roh//SU roh//S t d//SR i//F n t 26//S t d//C 2 k h//S b c//X//T t 0 31//T d t 6//C 57//C 33//S b j//X//T noRb 4 19//S t d//C 2 k h//X//C 57//C 11 e b//C 53 g n//X//C 74 i 2//X//F toh 1 21//C 1 a h//S b roh//X//F toh 8 9//C 58//X//C 40 i 1//TR toh 0 19/ FLFX c,b//C 54//X//F toh 3 9/ NEG c,b//S t 0//X//C 74 i 7//X//F t 0 3//X//F p f 3//X/ tPRC f//S p f//X//C 2//C m//C 44 f pok//SV rj//S rj ok//F kok 5 16/ tLDA rj,@ok//X//F kok 1 23/ tLDA rj,@OP+ok ;ok//X//F nok 2 83//S g dok//C -12 g f l//F f 0 20/ tLDA rj,@g ;@ok//X//C 18/ tLDA rj,@L+ok,3 ;@ok//X//C 20 v lok/ tLDA rj,@GS+yk,3 ;ok//X//C 2//SU xok//C m//C 44 f pok/ tLDA rj,0,2//S rj ok//X//T xore 9//C 48//X//F xore 2 9//C 49//X//T nore 4 9//C 48//X//C 56//C 20 v lore//S f xore/ STA rf,S+yre,3//SU xore//C 55//C 48//X//C 44 f pore//F kore 5 17/ tSTA re,@ore//X//F kore 1 25/ tSTA re,@OP+ore ;ore//X//C 20 v lore/ tSTA re,@S+yre,3 ;ore//SU re//X//C 44 f pore/ tSTA re,0,2//SU xore//SU re//X//FR g 3//X//C 56//SR g//C 55//X//S n e//F iok 1 25//C 35 m 52//F rok n 3//X//C 2//C 44 f pok//T rok 13//C 10 f k//X//F rok n 3//X//Ct 52/ tMOV rok,rj//SV rok//S rj ok//X//S j n//F norj 4 10//C 11 e j//X//F t g 3//X//C 56//S t g//C 55//X//C 56//S t 0//X//F t 2 13/ XENTL//J 17//T t 0 14/ FENTL//S x y//X//T t 0 20/ tEXT//S x y//S z y//X//S t d//C 50 g i//X//C 67/ JSR @STCV//C 37wg a h//C 37 a 0//C 68//C 72 c 1//C 1 a 0//S b ro0//X//C 54/ JSR @BLKEND//X//C 5 n 65//C 5 n 66//C 73//S x 0/ JSR @.+1//X//C 26/ JMP @.+1//X//C 5 n 65//C 5 n 66//SC d//C 39 a 2 d//C 69 a 1//F ko1 2 123//T e l 112//C 33//C 20 v lo1/ LDA rj,S+y1,3 ;co1 o1//C 73//C -15 o1 k/ STA rj,S+k,3//SV rj/ JSR @CALL//C -15 o1 k/ SP+k//X//S x y//S z y/ JSR @CALL//F ko1 5 7/ o1//X//T ko1 2 11/ o1 ;o1//X/ SP+o1 ;o1//X//T ora 6//C 66//X//T ora 6//C 65//X//T nora 4 3//X//S g tora//S t b//C 50//S b t//C 11 e a//X/j/S p -1//SV ra//X//T ko1 6 10//C 22 c 1//C 4//C 39 a 1//X//SC d//C 72 c 2 d//X//S e 0//S j 0//S l 0//T noa 1 3//X//S g koa//F g 3 26//T toa 8 14//T coa 1 3//E//F g 6 3//E//F g 1 3//X//F g 5 3//X//F coa 3 14//T koa 2 3//X//C -12 loa e g//C -12 y l k//C -12 z j k//X//C 4/ JSR @o1//SC d//F fo1 2 3/ d//C h a 2//C 32 a 3 d//C 32 a 0//C 68//X/ JSR @SALLOC//C 37 a s//S a pos/ a//X//F noc 7 13//C -16 oc//X//T noc 6 3//X//SF oc/ JSR @SFREE//C 37 a c//S x y//X//C 20 v y//T z y 18/ STA 3,.SP//S z y//X//TR toh 0 67//S d t//SR toh//S t d//C 1 a h//S d t//S b roh//S t d//C 50 g i//X//F toh 8 9//C 58//X//C 40/ FXFL c,b//X//F toa 4 75//C 69//F e l 24//F boa 0 12//F koa 2 35//C -18 j/ .Qj/ soa ;toa koa coa//X//C 37//X//C -19 oa k/ JSR @.GLRET/ oa ;toa oa/ k }!;PROCEDURE-BLOCK LEVEL//X/'5*Z"*:X8:2! H`:Y:2` Y8 ` =CKS8Z9(J+J@Z*J8H` TRACE.SV &U& okeny>k%<);D .g09Ww S !'!"##+##$$b$$$$$$%%N%X%c%%%%%v&&%&&^%< _* | o 1 ? @ r 2 r o D Dm _q#8(+38`K [ 4`h(#` 4`# 4# 4`K mC _a |+@ #C+C#P7 KA {8`#8X`  {8`#8+ @8`+83֠@X` # {8`+38K+8`#@8X` A# {8`+838(# @8X` #+ {8`38K8`#+8CX` {8`#8CC+8`KK8X`#8(+P8`K lD#PC la {8`#8+8`K8X` } m _ |# ] w \P+ @+8(3֠ @8` } s Y w#8(+8`K s V wf } m l U ^ l U 1 = @ q a"  l ? b l ? e x g@  l U  @ l"  j#C  u #C+8(38`CS s !" w j" l D  l D m lsm. U l$2a pCC lo D T ?a'C# 4 = lo Da La#8(+3*8` S =#8(+3*8`K lo Da La#8(+8`K8(#"8`C8(32#8`S lo D q Ua#"vC/KC 18(#8`C#8(+@8` 8(#8`#C lo Da a#+KC#+3eԒ  8`#+K%8`#38(#28`S֠@3C#"P3K PC#P#֠@ $#+  @8(#8`C#8(+8`K@ 71#8(+8`K#+K l? q! s 4`#ЀC s ?" r$ lE$ w$" v$#+K+8(38` 'C s U"8(3 z r$ K lE$! w$" v$ s l"+8(3 z8(38` # r$ K lE$! w$" v$#+K l? q! u 4`#ЀC s d" r$ lE$ w$" v$#+K+8(38` 'C s i"8(3 z r$} K lE$! w$" v$ s ? i" l  ? w" z l  ? |a l  ? a lo Da La l  ? a#8(+8`K8(3#8`C8(#8`CS l  ? 'a!a a#8(+*P38`KS l  ? '!a#8(+*38`KC#+#8(#8`KK#+K#8(+ˆ@8`  lo D a lo DaC#8(+̆@8` 8(#8`#+f P8`+K8`K | r#8(+8` S+8(#ͮ@8` #8(+Ύ#Ϗ8`K #C#+K l  ? a w  s l a"#C r( -a( w(" v( l  ?#+3K/֠ @+S*3֠ @3  w  s l a(+*3 r"K -!a" w"(  v" l  ?#+ r(K -!a( w( v( u!+K s! a( w ( l  ?#C }#8(+̩8`K#8(3̖8`S@  l  ? #+3K lo D'a La#8(+3"8`C lo D3a La#8(+8`K#3K#8(+*8`K lo Da ?a'C8(+ۆ@8` C 2# @ V l  ?  2C#+f iP8`+KX 28`K |2=HS\^2i#C l  ? !#P+kC lo D! Ua#C8(+38` 'C+*8(38`K#"8(38`C'C#8(+8`  l  ? +@  l  ? #8(+ r"K -!" w" v" l  ? l  ? z 0+@ a[#8(+8`38(#8`K lo Da+8(3ۅ zK q !2  l  ? z 0 l  ?" z 0 l  ?1 z 0 l  ? a 0 l  ?a z 0 l$2a l'G+8(38` 32֠@ #328(+8`C8(3 zO#/"G#8(+8`328(#ϗ8`KW#"@ #"8(+8`7G#8(+8`38(#"8`KG#8(+*3֠@8` 8(+38`KW/8(3 z#8(38`K*8(3 zK lo D! a+H 8(38` 'PKO p D#S l  ?! z l$(a 0 } l  ? #C) } m2,^z  l@( 111B&&& Ƈjt   LLLABCDEFGHIJKLMNOPQRSTUVWXYZ.0123456789 COM.CM$LPT$TTOTRACE.SVBREAK.SV PROGRAM NAME: RETURN LOCATION: ###### CALLED LOCATION: ###### STACK POINTER: ###### AC0 ###### V AC1 ###### AC2 ###### CARRY # STACK LEVEL ### ######/S+ S+ NO PARAMETERS PASSED PARAMETER###: ARRAY AT CALLERS S+LABEL AT LOCATION: ##### - - - - - - - - - - - - - - - - - - x&- - - - - - - - - - - - - - - - - - Aoqsuwy{} _ PCSS32S" mC/ /J2*K m83+/ 'J2S+1) )K)!K5 P"C dp 8#C lU     "8+!+#K m 8')) K  JTRUE RFALSE 8/K/1-J#/K +K K ! !   @#1 'C1#/ 0:#B;#B#+ Z#3 0:J28 \h83Ґ"1ւe\h83Ґ*1ʪ3ғJ\h8#3 ?#8\h8#C3 ?8 #C#C ?8C 8+;# *H n\d8') ) /KJ)#/K+K K 2 2+####KC!"    @#1 ˷'C1#/ d @ K 0:#B;#B#+ Z#3 0:J28 q\h83Ґ"1Ղ\h83Ґ*1ɪ3ғJ\h8#3 ?%8\h8#C3 ?8 #C#C ?8C 8+;# *?\H n\d8') ) /K?<=i}` j)I1)I0)HJ)HK j)I&)I%)HJ)HK0gPE3*KR'CJ' H)ҏU ) G#  hp) 12) u12) \#)!K)K)ۏ D GK1S ]# F ]3;20g*3J+3 g \ 2)1  1  ;K)K F ] R+1 /3B )F &3"0g)Pg S# G I0g B g \ 8#3B k8# *8\hP@@8\h8~) )!8K~)`#A~1"8S)K!33* * +K#)7SK\dd ILdd0a8K Vd,d g \d ,4d8\ddDdd0a+ S ]d,d0a8J52d4d S0a~! K E@g8 L3pB\dd,g  g ] g ] Q L! ^ @ Qd4dA\dd0g"B Vd4d 0gB8\dd8#)#)!@a# *hd4d\d83)# 'B4d83"G M?efgDDDDDjhiDA@DjhiD65Dl8kDDml7kDDm\dd1! 1 H0g""*!J0g"*Q 0g) Pgd4dA6\dd8g#+8g#Pd4d8\dd0g"PLddLdd Y8d d,dd 0g* Vd4d8g|\ddLdd Qd,d8g#K1uDd#1 dDdd Y8dil#8gCdd8d4d [@\dd Q8g+K Vd4d\dd8g+!)Ld)1dC Y8dd8g#)ҍ CKd84d#)ÍPKKKK) [\dd0g*9 9 "9J*d84dED\dd8gPK)K+oJKC Vd4d\dd V0g"J) )J"Jd84d )xJ\dd V0g)\d8d!NXdK!G0gS*" 3):J+BB*#S"C B8d#P3*J#)C!/ #+0g Z8dK W8d! ~#Xd38@\dd): Z  P: 8g Yd4d8\ddK3\dd8d!C!0gS"Dd"Bd38d4d\dd8d!C!0gS@"Dd"@Bd3p8d4d\dd )X!8g!KP!K#+K8d4d@\dd")Dd"Cdd4d8\dd(g1Hg\dd8g)#Xg"C"C#C) "Cd8g4dC8g!  ~81#/!JZPP`!@h c )X'*8hPK KK);J)^]:0dB#B#B'/9Q jB. J. J.J;.J5!9 I9 X9 U! 9 W9 MAp 0@"B. J.9 N8 &B&B8;3/!P0J#@#+38&F&F& CƌJB.J.N&F9& &P)".J.9N&P9FN .NXi9^i 69W9V 0d/J:2*K0d*KiCi0d:K+B2"J  "J$d݄C "JC,dC0d" *;XiB&KC"2 OCYPIRHG TC( )GD,C91371,79,491571,79A7LLR GITH SERESVRDEILECSNDEM TAREAI-LRPPOREYTO FADATG NERELAC ROOPARITNO +H @cHd 0d),), )(Pg!#PhB JHe8h!XX` CP "18 38!C   Bu f?y ( Th0BJpBZ;);Z81#/!JZP9Xh c )XPK KK83""*8;XX`!@h##+3Th0P`Z;K10Z3p@80d B;')U+J;Z+B0+ *0dJ. s&J;Z. &J;Z9ϟ 9͟)̽  9Ɵ)Ƚ )ƽ *%8; +xXX`23*PK!@h#@#+3 S. &F&.9 &P)#.J.9N&P9FNB&F~83S/0dJ/ J/#8hZJ#B!*9,$ +߈!!9!$ +ߘ!9 +ߨ9 M *pN"F "*2B8h c +X8S3S * :*(c +X"C0h0Z:Z:+&:Z8c*Z : *N >#C!:Z +XHc8h28S3S8#*C&B * :*(c +X"C8h8C* :6#B83S& 0BJ+Ld#8dKCB!?C3J"C2"P  +߸S32#J"7?KJ 8d7!# 8#+8d3+P")  +߸1A 0BJZ!%3J*Ld+:J*3#KJ 1;$d 8#+#)  +߸1A ~83S0d#B8h#BZ8/ J/J!:!9 0/J:Z;# Z; t8*C8hK83S*+P^F: FN8"*FK& ~83S0d/!J JJ/ 'J+J91 l0dB:+JI9ۂJ8/ #*KPB8* / +:J:JJ8/ ""*C"C*KPJ "C"C"C83oS+;@JZZ.J90dJZZ.J0d8/ #*8/ *0d2P8/ SCCZ *9R!Q (!L P"PF""F: c +X h8 "F N:"8c*NPXcF*! +X8" N F".PFB J*N&)*B &K )@.J"* F:"* J c +X(hZ: :#9Â: +9: K  PB 0" &C.J&*B FFN _  u u#+^_CPC#+C'C#CC#+C 'KC C m3Ґ"1Ƃ3Ґ*1  x p m C m~83S/ 'J;+138/ S83S~83S/ q'#8h;;*B2*2ҐZ!8?J8#8h;S83S~83S/ /J2:!t"*J 0dJB8/ /J28dSK"C:!Z*J 0dJ*B:*#K>" ##1=0d2҂CK8d#+#3 Ґ"1%)&3ғB3Ґ"13Ґ*13ғJ83S ~~P8dC83S/ /J2:!L"*J 8dKC8/ /J2:!8"*J 8dK+ $ 3Ґ*1'3Ґ"1   #8C3SPCD?~8J0J0S8[  8;B08K3S + _a3(eJPe m _a+KP1$:# 8cK +X0 +XXcK#B0ZC me~8/!# 3"0dBPB ;# 3"4d0d20dBZ0d:0&)X`s~83(hJ J~83(h2 +STh0BJZXfpB;1;0""28##+3Z"F*N "PB:  +X:#1 0d: +X#BJ Z :*JL +HK8/K:+J+ +K:+J Z B ("C +H #+S +ȪJ #+S +ȪZ2 0dJ :: 8 #+S +ȅ0\h8K@98\h8K;@98\d8dK))"@C)"C 3"+3 #K /## H0dZ8C#)K(h)8c +X8B#C8"\d8dKS3")/K3)"/@K) "+4d0Xi9 Ɛ8iXi 9P@ @!8i&5*Z"*:X8:2! H`:Y:2` Y8 ` q=CKS8Z9(J+J@Z*J8H`LIBRARY.CM: 0 1I)ALGOL0.LB ALGOL1.LB ALGOL2.LB ALGOL3.LB SMPYD.LBALGOL0.LB !$ 2#Vt;H|qV~Y*#qvKX$$  /3 Q#D$8U ?  ? 3D$$2"3)J"C 02)D$$A*P2!  #1 ? Xƛ8  _qwn@wnvKX$$c +D873#CK @+ _#httU{h`t lYbKäIvN{D$X%#&-5- R3D$$2*SK*!PCC D8$?*K / "CC"D$$yx*/RX1"CC CD$$Jf8 0 Ca ) ) ) D'$XFX / /J2!!D$$T J*#!K!A D$$b$1RPpP@PE9D$$p. PpP@P@1PpD$$=e~! 8 1"D$$ Ԍ ! " DID$7#+CK"C'*JD$$}!* K +D$$#+CK@S'D$$#1'C1'/\X$$V8KS3"13+D$;+K+K+\8KSD$$ <3*13JD$$E+1 3*!JD& 3+#C0+P0 3D$$^ ? #C#CD8'*& K+K H8# D$^h4'd  _2mVYt9 IgVY ;VY:yVY8CVY :l*+K C+C #+ ;3CD$$ 98Ґ 3 83 7CD$$]FҐ 3 B18 #BD$e$aT S2 ## Z  ;#KCD$$Jb8+ #;*KD$$o3"  C  SD$$G> *" ? ; 3J@G88;#1 H  _8ВP_В| _*/I(HԾ KN N/IU ,Yxn v D$)(?0 TXl$t0BJZ T0BJZ8#lG$$[T0BJZB&)D$$=*99## 9*D$$m8## !9#B8 D$$F1 %B. *1DPpP@D$$TPD<9 !D$$nb (! 0&PR"*Dے$pp:2X8Z:#9D$$~   D$I$Iy kkkk $I$I$Ikkkakkkaa"I$)$I3kkuk a$I$)$I1kk000KuIDI=0&UUUU"I"%D`BUUU0UKDd%,UU :OLACITNO USSBD$,hRCPI TUO TFOB UODNSTSCA KD,$VORELFWONIETEG RVORELFWOE$%o IDIVISNOB YEZOR,/I OD$$.APIRYTE RRRO@NE DFOF LIEL$,&NLIELAG LIFELN MAEbLIELAGD$dc4 LHCNAEN LUNBMRE|XEOPENTND$deBO EV/RNUED RLFWOUO TFOD D,$iPSI KPSCAELIELAG LSU EFOA D$$^F LIE/I OOFMRTAE RRROD$d0lLIELAG LAPAREMETRRPGOAR MD%$zON TOLDADEIDEMSNOI NREORE$$_RLFAOITGNP IOTNE RRRO,D$$푖QSAUERR OO TFON GETAVI EUNBMD$$ߤRENRPCODERU EENTSNI GREORE$%9RhOCVNREISNOE RRRO|NUNKD WO NREORR _YK fc[Yot!t]KvNGv@zX$ $Q D$$Y3/!+# "3+# "bGؒ$j  H  D$$E(* "CK !SD'$I'28 "SKCDLPUX[]$IH$F`cglpuAJUNRAYEFRBAUYRD$$]oTAMCRHPAIRLAMYUJENUJYLD$$bUAUGTSESTPMEEBRCOOTEBRD$$)pONEVBMREEDECBMRE"I$$~USDNYAOMDNYAUTSEADD$$~YEWNDSEADYHTRUDSYARFDIYAD$[ASUTDRYA _ ALGOL1.LB 4 )DQTh) KNN/IYxn vDD$??]TT0BJZ [8 5T0BJZ8#T0BJZBD$$Uw&)99""D$$:v*9 "9 #D$$b8#!ANALLLD$$`F@NCAAALLNLKRKLD$$jbTLNLKKLLMALOCD$$abBOOOKLRERLPOGD$|pGGIMNHN _X]cF@cFlll#qbSnKIvFNNfI#KX$$C  PCCC  ՘SD$SPՙS32ӎS" C/ D$ģ/J2*K [  8D'$ i_*3+/ 'J2S+D$$q81) )K)!D$%ĞFK 5P"CCp D$$#oT+K) &9+  )))1 D$$-b )1 ) ) D$'p% )1  )8C$I$$,~:)od019Rr )D'4͌ !8C 8 C  D$$S     8+D$'/+#K H'$CA) ) !P8G CTK$$8PC/K/#R1J@D$$@ϐK<#C H) I D$$y B)  8#+/JG$(rg38+B8*&9D$$ J7*#Ӓ*;D$$#, 9:@'ƊCD$$31ϒ/" y D$$&) [!) R  m ) D$$94 I h e ) ) ` G$$B0:#B;#B#+D$')P Z#3 0:Db+$&^J282\83"1DĒ$lǖ\83*13Db+$/zJo\8#C3 ?+D$$>'!:1:) D'G)Z8d80D$' CZ d1*  8 G$b?u 8+;# H \8D$$) ')! D$$i/K 'w )) D$8/K<@0Z8D$j 9+  8;);9 D8$5 9) 8# ;#)!DI(0  0/U U HE'-UU 8+D8$";# +-EZe."D$0 , ;H+Zz{ _UH*{ll)bSnKIvFNfI#KX$$T  PC՘SS32ӎS"GĒ$L C/ U/J2*KbG$= 83+/ 'J2D$$*S+1) )K)D$%S8!K 5P"CpHĒ$@F88#C  D$$wT   " 8++#D'^bK W8') )Dd$pK [RTEU AFSLE8D$$%)~/K/-1J#ϒ/KD$$ +K K! !    D$$ֈ[@# 1'ƖCD$bIm1#ϒ/0:D$$p#B;#B#+4 D$$TZ#3 0:J2XĒ$X8'\83"1ǖ[$$k\83*13JD$bz\8#3 ?#8\8#D8$5C3 ?8 #CD$'Rm #C ?8CD$8t 8+;# H \8D$$&' )) /KXHE\4<@9KJ J khE(8=BKJJ } 8+D_P;#  Hn{N _6.@6ll)bSnKIvFNfI#KX$$T  PCաSS32ӎS"GĒ$L C/ /J2*KG$$ / 'J2m)g9 X$$*8S*KK* J *1ϟKD%$8K&'1ĞCCD$~F +;# Ƞ J*D$$dT'@CC*) X$$_b83+/ 'J2S+D$$p1) )K)!D$$~K5P#"C0HDD'.pZ8#C  D$$    D8$`# 8++#KD8$  a8') )KD$b%P RTEU AFSLEU8/D$$#WK/>1J)#ϒ/KD$$1T+K K2 2 +##D$$##KC"!   DD$I @# 1'D$$%.p ƖC1#ϒ/^:EG$$R 0:#B;#B#+D$')& Z#3 0:Db+$4sJ28k\83"1DĒ$Bǖ\83*13D;$!PJ\8#3 ?%8[$$k^\8#C3 ?8 #D$$RxlC#C ?Xd$?z8C 8+;# GĒ$H '\8' ))D8– /K<@0Z BBD$$~BBBBB# x9+  G$$ɭ8 s98C4 #+D$H+K/9+  zG,8DĒ$5)K8 <) ) D$$  3`) )  )D)$9d) A~{#.E D$$Ο) ~)  W)W1)D$ !K)K!8C8D$'p##+C 0X$$a"8#C#C X$$b00ZB 9+  X$$n&>8  9+  D$$xQL)8  019 I(Ek8K*bK$$Ku\83"1NJbK$$\83*13DUJ@z{ _,%  / D$/#+  H  _а4IHUFа IKv'T1ޒX0$.  )KPPPDİP)@C 6 `FI#@  _yNo@oKvX$$e +3 DAKC @ac\ _2l@J,nKvX$$ +3  3D8Pf#C @+ _а4bHv`l`KvN4ْX$$ b3+# ?bG$$4G  b3+#D ?  H  _z z{@z{lvEiiUI{KX$$׍ 0D$$)P !B#3 09"*2D"))U )+))) `[t*    oC _n{@n{llۗhKv?riviz`iɓ:X$$P OM !D$"EqPCC1#!3D$b'+B!!#3  #3 0*D$'AI*C))#3 #3X$88 C)) 8+1KD$8;FJ3oP 8# 6XĒ$50T8;J / E3+CX8_}b 8K #8S !+l[ؒzp L  8  ,K# 0B#D$T~C1 83+ + L ['" 8)X   _yԅ@ǟyll[ۗhKv?riviz`i:X$$N= O MD$$| !PCC1#D))Q )2))#bG88*3  #3 C #3 #3 D$$8C#+#3 +/ -D'$NsF E0*KB+3 #DbۻT+8S !3 T  8  4SbG$8nb# 0)JJ#C1 +Gb`;p 3 T  8)X   _:UI{˺UI{}lltCHggwnNl?w D$ @0+-.Ee \ 8K) XD$$CS 0 CBCC*P9J*D8$B J1 1 DĒ$q|*1  =1 !1 $1D$$n8 !1 1) )3D$8F  +3 X$8MT  0G) PPB#lF$;Tb1  8+C 09) P 0#BD$;6p+.J0KpK 0:D$bǒ~ J 8 3+  8 G''Bq 0*P1  0) P28G yu    _Y*:q:llll?wnCHv?TCgNwD;U@ \ 8)a XCS KD$$KK 83J# )G8ĩ 022 08 D'm* 08+P! !+D'A8   8#)R X$c[F8+P3!P 8!KD$8ShT 3 8+%#) lBD'$Kb# #C )+D$gpKC 0#B#) X 8 4D$ ~0 +K@!c\N _!z9ozll?v?wlGKĜ$ \T81XCCKN0DĒ$"*CK0"C*JSB#D$$SCKC+##D$'o*##4!K D$$i8# +*!)! %!+$!DĒF"!+ #  #Db'$(fUTC! 08"*CK")D$$2bP2 +-0 CCD$jgpKCK _hhll?v?wbG;$я \81X0CK"*CK0D$$"+C#(K D$$,C)! #C"! #[$G*  #C! 80D'$8"*CK)P2CK0DF. _rSl?Ӷl?CԺ Xx[$Ā\83"14 _v?ʘv?CԺx[$$%\83* 13JGo4 _ NNllluJPPfEi/IBUTrii`iFSIAH`?gg*cIxwDؒԞp 8S/ /JD$$2!9 9 1 X;$A6 S)@" 0+ B1[Ē$*  / /J2!9 D$u8#9 1   . b[8$9F  8/ 'J*1 X؜$T«1  " D.J l[b'b D   8 )  E$"p 0BBBPB 0)PlG'b;~   $K !   Xǒ\ ! 0)PAD$ Kf _RD@jöDKvX$$( #J#+GfijC  _ ALGOL2.LB t suZ~uZl/Irii`iSIx[$$ܖ87%!J/J21D$8H1/90)PD;\"   EDD1Ɍ*, # _fY~قlZEi/IiSIgx[$$ז87')J'J21D$l;o+1'9L X;b_4B0 )BP  D)%*.#& _TP~llPfȓKfpTggNewDbG;@u\0!P8)[Xb'$X#Z 8#U![$$ 8#)K 0BpB! lGĒ$.\*! 80" #ClG$$Ue8 08+"K#9#B8D$vF)X!( 8!lGb'T   0 ) 8)bGb;( .bX8)X84 8CD$$!pCCPCD$$~@>9N(2D$$Ɍ@*ͨx>3D׺ _CEUt@JaxPEUl l؈,AȓKoO9Thggev$IHbTKZgtQ\L!l[;$P  8#4P D;8C1L!  8[';*$C!X  )[bۜ8N8 )!  8!X Xb'F8!X ! ! l[Ē$ T 84AD$$AbA0D$$1pA@D$$8~@nDN)'fVD$$Œ@ k#,-3D$$?a'ANu D$$m>~>$p D$$ٶ<#GR0{@:D$$#f"g9S8D$$VwSQ;t5ʠD$$l= ["j35VmD$=A`b _BPPxPll؄Pf,ABUoO9ThggwDlIb'IS`\8!X0"Dbے$"CB!  8KK!l[$8 8+#0J+Dl6*pK      )!  Xۯq8 )!   )P 8 b[;(F  )@0!P 82D$$TA_m0ɥ?ID$$bHH׾HD$$B'p|Me?`FD$$6v~-S/!)cD[BD$$,O$ABEgKZD$$ u8 Id4qD$$2RD\u H~d+D$$GML.χ6CD$$EȇYy^fD$$Cɕ:ve NfD$$6aAD _`IPZx Ill\WqPfBUThgegw D$IbKkAxk.\8!bG$$6X0"Q"CCCB")Dlb;!    ! 0"D8;I*)P8  ! ! D@[lb8 !        )bGl;$F! )!  8! Xb$[T8! 80#B1X8X$$b4BBBPBA!TD$$#-p-DF@ kD$$~#,-@DzQ5{XD$xƒ$eyAzLXsWD$$XBBʼnm+;9D$$BKCyQX /|D$$BD mɤ3D$$);BL1Sx$lD$$qMAHEgqD$$z@["!q "[D$$PBʼnm+;93CD$$ MXqCD$$ 9[ BD$$09½ufB; D$$}& $AD$4 _bIHUP)U AHllؼPfBUTghgNgew D$Ib'džD@'\8)bG$$@X0"n"k") J@DD$$~<C"J "C"@BG;*0!  )  8!0D$b;[k8*!C )@ 8#l[l;l;eF  8#       XNjT )! )!  )0PX$$#b8#JJB!B"BD' ۔pJ ! 0!X'$~P2 0BBBPBD$$@rѫyf@D$$}@D$$;3d}Y?B KD$$Lö{rEбvB!D$$g;x*B#JK D$$թ'^A\d&P D$$|zM@,UD$$(RbB%=S"hND$$<BOO SwD$$ B)8lHT¿tD$$^,IA#蚎vVnU$ՀD$$`&A _*cP *clllilUpszRxl[;$v\L 8+J+ b[$'48+#B8 )l[$ sX84+  _"TeFhe l>ݏUȓKTvZlG$$\8#31)D$$K8CC#+Dl'$Vl3#8SKPbGl'$ *  838#3  DH8t  80!P4D8' F  )  0 B tXlǐ$lT8  \8#C _bnz4xb[$$\8#) D##+#CDJ84 _YUqU4xb[$$`\8!+#Dl'$5C84 _JzIܯy$lll۔1e,h#M#KIxhg<AHgsfAggPfbEilll۳./IPrBUȓKPFfpEUTFiril`igII`iSIo*cH *F$IdےD(`$I$IKl|UZ)D$p1I)0I)H)H )&I)%IF:$ *)H)H0P3*KR'CJF$$8' )U)   # D$$F hp) 1D$$T2)u 12) DH$b\)ŏ!K)K) R$p  K1S #  3;D$,~20*3J+3  2 )D$$s1  1 ; K)K [$$Ś +1/ 3B F)Db29S& 3"0)P$ #  0 D%$BB   P#8#3B& XĒ8 #8# 8\P@@#8\X$$w#8%) )!D;$|#8K%)`GĒ$/%"1#8S)ŏK!D$$.‰33* * +K#)G8L;+ 7SK \  LB[l'  08!  ,  , 4X؜$&#8 \  D 0+ S h[;$4  ,08  4 S$GĜ$B0%! KbSXb;.P @#8G 3pB \ , lGl;O^     !  X$$ l 4oADb;\z \ 0"B !  4Glǒ$ 0B#8 \ #8##)!)DD8;hp@# h  4 \#83)D8$&֤# ‹'B 4#83"GX$9HȲ ?#(I$hSl[lH%" ' lK,h"' Q-@@@ݽ"@˽4 _xpfwpf m4 _ff`Iehg<x[o'b;F\ 1 10" )P4bGz _uXsfAsfA`Iehg<x['$\!1 10""*!D$$m^J0"*Q 0D$ )P4 _IxPhIx4xb[$$a\8#+8#DiP48 _TH@H`|gxb[$b)\0"PLLbG$Į 8 , 0*D$ۤ; 48 _xps3psl zRzgwDlےz[|\L ,8#KD'l'1uD#1 DD$l; 8#8C8X SnSn!bxb[$'T0PZ;K10ZDр3 _vFNvl bNIFvD$$72p@80 B;'U)D$${+J;Z+B0GĒ$_W+ *0J. &J;K=D$$!*Z. &J;Z9 9D$$w8) 9) ) *%D'ĜpF8; xXX23D$$TaT*PK!@#@#+3D$$b S. &FD$$p&.9 &P#)D$$&~.J.9N&D$$PІ9FNB&FD$T@A3ak _L{#C!:D;*Z XH828S3SG$ğ8#*C&B *:*DDD88ި ( X"C88CD$8nw *:6#B83SDH& ]G _$$<3$חNxXĒ$q0BJ+L#8KCB?!D$$C3J"C2"P  D$$S32#J"7?KD'$D*J87!#H$$8/8#+83+P")D$DiF  1AP@+8 _]-c?3-c?חNxX8'0BJ+L3#8S0KD$$CBB!C3J#J2"CD8$2"P  S32#D$$-v*J"7?KJ8D$Ļ;87!#68#+X$kTF83+P")  1DgTAW@+? _+=DC=DחNxX$$0BJZ%!3J*L+D$$D*:J*3#8KJ 1;X$'G$8#+# )  1DDM*A/@+ _TT`/IFSIx[Ēľ%8/ "/ 2*:D$8VKJ"8/ B _4qW qlp/IbFSIx[$e83S0#B8#BZ8/X$${ J/J:!9! 0/JD$$ :Z;ȯ# Z; 8D8$**C8K83S*+PD$Ҧ8^F: FN8"*FKD'QF&  _$Ԕ1$l//IFSIwDؒ$83S0/!JD8$ JJ/ 'J+J9D$$1 l0B:+JI9J8D$8! */ #*KPB8*DĒ$8 / +:J:D8$&FJJ8/ ""D$$vT*jC"C*KPJ D$8K6b"C"C"C83S+D$$p;@JZZ.J9D$$~0JZZ.J08G$'/ #*8/ *D$802P8/ D SCC _\ :;`l6b/IZvFSIx[ǒ$X83S0/ J'B>D'$o#B  "`9_! 58D$$  J/ J .J J  >+J8#(D8'I* B/J8B#BZ "*D'$Y8:BJ8K"    "D8 FB "0B% J8/ JD$$T .J#B/J  >+CD8$abK8B " 8D8Yp*K8#C _e #Fl0bNKxD$$qz Z*R9Q! (L! P"PFD$$W""F:X8$  X 8 "FD'$* N:"8*ND'$$8PXF*!X$$F X8" N FD$$T".PF BJ*D$$ybN&)* B&K )@D$$_p.J" *F:" *D$8|/~J  X(D$$jZ ::#9 :D$$N+9 :K  D$$2 P B0" &C.D$$J&* BFN _6zTO@0z@O`vXK cNvD1Ғ$'J  G$$ #+^_CD$$PC#+C'C#CCD$$*#+C 'KC C D$$83"1nj3*1D$}F  p  DmT C  _8XPX`/IFSIx[8$Q83S/ 'J;+1D'ćy38/ S83S _,ܷLD{ܷLl9nb/IFSIwbG$8(83S/ #8;;D$$=*B2*2Z!8?J8D'u#8;S83S _ȓNxWȓl/I05NFhSIx['$k83S/ /J2:t!D;č"*J 0JB8/ DĒ$:/J28SK"C:Z!D$$Z**J 0J*B:*#D$$Pb8K>" ##=1X$$6dF0m 2CK8#+#3D$$pT "%1&)3D$$bB3"13*1D$$p3J83G @~S  _6TԔi C `Nl/I5NoFSIvX8$)P8C83S/ D$b'/J2:L!"*J 8KGĒ$GC8/ /J2:8!DĒ$*"*J 8K+ $ 3*D$$W8'13" 1 DĒ$_IF#8C3SD$$TPC _#St#S`/IFSIx[8$B83S/ 'J2"/X8$ / *JJ: D'$C83SP _":::`/IFSIx[8$B83S/ 'J2"/X8$س / *J DĐ$C83S@@ _3UUIta)PKUI`al//IFSIwDb;$r80')B/X'$_ 'J*0JB)) D$$6,.&C J.:9D$${[*J8" / J*&D$$`8J/ J:#98G$$|FF"/ "P0*D$'%{TP* !/ BXb  _0s[oyrlNF/ISIx[8$83S/ 'J2&)%)D$$Z  2/ +"D$$  P"8/G'"s* B3Sp __3?VylA FN/ISIx[8$83S/ 'J2&)%)D$$Z  2/ +"D$$  P"8/G'"s* B3Sp _\K|\Kl9NZvNF/ISIwD;8p83S/ 'D$$TJ*0J)9 )9D$$$  &J&&)JD8$*8/ C&B&D8!8B *ǎ / C8#G.qFC _9/@Q/ KvKX88  C  _t}(`:/ISINx[7$$8J0J0шS8[ 8D$8;B08K3S @ec\  _ +F"F/ISIx[$$8'"1J'J2)D$o9 )9 8' )JDĒ$ZS22pD* _rZl8ڶl8l/F/ISIx[$'83*!# :3"0BPD$ĮB ;# 3"M402D$30BZ0"83*1D$$*/B )'J2DĀ$df8/ S _9FH~H=ohKFH~ lKv8NX'Ή &a3(JP  D$$^a+KP$1:# D''48K X0 XXD'$$*K#B0ZC[˜8  _OۖO`/ISIx['$P832"!DJ'/X$$$JJ;;PZ8'@D$P )BBJ _ OO`/ISIx['$V83`2!DJ'/X$$;$JJ;;Z8'$JD +J _lT l@l/ISIx[$8l8/!# 3"0BPBD$'] 2;# 3"402G'$xT0BZ0:0&)[G*X _\CmN"l;bFNxD$8#38C)K2PPL D$8;+A 3*04LX;$\y84"!2!D$$*2+1$0 ;CK$G$$;8S ;33 2SD3F _mNC8NNNlC b/ISINv [$l'A83(J J8G'8J3(2 S _$4/ISIbnv[8$3 T0BJZXpB;1;0D8$ ""28##+3 _$T/@U`l`ZvFNv*D$dpZ"F*N "PD8$B:   X:#1D'$ 0: X#B JD$$* Z:*JL HK8/D$$>8K:+J+G$$F +K:+J @+ _d$tZvחNx*[D$$\ Z B("C H #+D$$yS ߀ J#+S D$$j߀Z 2 0 J: :X$$ *8 #+S 0@+" _D$bFb-x[$ \8K@98 _$$zIbx[$$\8K;@98 _$Ԍ w5NCԺ.x[$$\8K))"@C)"D$$  C3"+ 3D$$# K/# #DK9* _$fIl&bNK,[xX$$޷0Z8C#)K()8G$N X8B#C8" _ĸ$20CԺx[$$\8KS3")/KD$$o3)"/@K )"D"+4 _)DQTh) KNN/IYxn vDD$??]TT0BJZ [8 5T0BJZ8#T0BJZBD$$Uw&)99"D$$:v*9 "9 #D$$b8#!ANALLLD$$`F@NCAAALLNLKRKLD$$jbTLNLKKLLMALOCD$$abBOOOKLRERLPOGD$H|pGGIMNHN _u$$$W(CxriiiPPEigC?#:+%=D$$8K'?# ? :C0p"JD'l;^F+PKQ( g t3tKO ( D[T!J J 8ssar@-}@l[l';cb4@I S8T C2@D@rDPZDr `h@bGb'l;hpI!+@D D@0A \HP+$c(D$b'E~ C&  /H+8D$#+).,.@ 9bGĜظŚ+8[(. 9+X/S8D$ò1u ++(K2(K2H+@Ed$K?)bG6$I$,Ig!hqex9$I,Y$I9<dI$I$ɫ&9),37>D9'GMR,K3n$\99rT[04Pr<X% Xb8M cX V(h84  GllǸ  4HSPhXh1X3P0n 3011XXbWM3P1h 3018J0m1X\(w8R3[$bw}&3PZ0:P $V83w8R#2)D4Q0 V o "w8RR0V 6 [l'$BPP+7 0\(JB}[8'bPw8R33 K !( 1 1 G8^3P! 30 11X, \0ZTGb'lN( 11X h @ 11X X;=z0 H 6 18c  X( D$'Nʈ  r$C0 ['bc)m2=2 Y271X h03Pb[l ɤ Ph4   3( 018\0D88QѲ"2 > !9 29 G$'Y 2X   2 6 D$$k1 ([]1\1PX'$3S8##+@#2@D+8 ! d1DX1X8X$8t#J0 !"<@K11 K$ےPu|"=xol() XbͫY(HʀH1X (# d[''" (181111X3P1" 30 Jr$ 6)HlGb7Lh @ @ h( 6 ( 6 lEsZ1X3P0 30 144 (GDl}8h1 m6J %LJ X n Db;b;v$!J "9 2H/@  C 2( b[l۪ C /( ^ !P n  XW0 0DllAʥ+@C + C {dJ  b[2:$OJ F, ! PNUOLKCDEB YD$$HPORETARO ! )!0!v Xb'` 0$"$Jp* 1u '<Ei@2lIĒqE QIA1B*! D$%1  9 9 H 1@X$l/N0!9 J u !A D$T)"K,) %Jk8S3S 1G;$:f0"!!k0ZiZ*!0D$$uJ *!Jk8#PBy1X$;#]1] 1HY9z3B+ ?l[$b'&19 W0 0 I!95+z3 G$88q??9 TQ:YXXT  ( bG~MԆX 85+ 5KB# D$$[ g OCYPIRHG TC( )ADATG D$$EiNERELAC ROOPARITNO1 79,39147D$$F~w1,79591671,79,79187 LA LIRD$$ÅHGSTR SEREjEVDILECSNDEM TARED$$崓AI-LRPPOREYTO FADATG NERELAD$ݡC ROOPARITNO gK _TZH鄌`gKlll$Q(Q(cBxyRǣ=c}"lllF3ǣ?ǣc^_yXRZ cDcDc`cBcC#zlcCNCCccH#7q냀KD$PPPg18#c) `18 Dd;3u`1U!( S  %8#@ =$Xb'O;#*L1" H H  (8P ; D@* ? $ $ )    &   [ؚv8 (1! P@$   lG;;T=F8 C# + 8 3 KGl +T1( !   Q0&X%  P X$$bb1YS.SRD    6_1`nIXH+bj_K4`nlllBFfQ(yc룔cxCxsClllۮc[CEgZc#wR[AYAYAq_y0RxQ \lllۢy郙cDFcTZmncB_p (0 ? ' _,ՒAHRHJ(Iڑi9@? @? N=K@? CoxgZ8b h8baRD@` b`( G( 0 NXM &8XQ[l'lǔY(0 RƔ H (!  L['FoNXK  P 4!  + D* J "( J'( lG$$1; @ ` P [ (l[b'$9q,0 H0 @1! 0D83<>NXK  !`C H (D;ɷ JNXK  o@ @8 X$$N  +    PP[bc( 8 J 0 0"@A(90PbGǍ*&@0J@029(PAH#0PPX8l+jU46P)(9jNXM @b[8BBH 82X (    0 l['b'ƽP (   0J5% 0PG$l'ܪ^8J:JB2 L3@2Hl[llUl!02(2 3L 01P03P!01(1[f{z 3 _SxHTS{SxlllۇQ(c냒sÃsCQGRClllox Q RQQQcxPTZ``S = y  9+D$8  KP+ J3( l[ۜ$F( f0 0  ?)3`PPD$x* 9)  0G'H-8 9(3  ,u!(D($FZ "()D$%hjT*+&,-."/D($gb;<%=%>%[]^E$$yjp #,MD8qz~P @  (G88wH ( 0 ( (bG$س0  P(  P!X؜8@P)H@-  D'   ,TG$  @(Q P 9A"I$$TJ93DĽ9; P@(3 ' (3D8DCRIyELNzurRTND$${NIV|EZR~DIN}OCN2SED$$CSECRER=ATBATBD$$TSPEHTNEURNILTS!ISEZD$$ IDKSAENWBYBECASEVOLD$$^DA"DGRIFPONE,IFEL<APEG9D$$ITEM4CEOH-EHPL5NITI#ACDRD$$`q"S*HSRAEONSMGSURESD$$})0NEBAELELEVL:EDALYKOGUSD$$]>BRERUTNR;@ITPNTU[@NIUPT\@D$$LRPNIT%@RLAED&@WLIRETDNEETD$$LZREHCIANGLCSOE^@RWTIE@D$$xhEDELET?ERANEMSUNIGUPCN9D$$DvHHWTAS8HCTAR7RESAE3D$$ONCEOH1ONSEC0PCRAT'@ERESD$$}RT/ERRTY+NUHSRAEIDASLBD$$EZERTSROEERUNBMREILRBD$$RAY6ERELSAEI@ARDNMOZIE _$I$I$It@C)I<Usg"* "*D'0  IoSwn@AR _\HR@7u`si뀃mZ뀀\lll Qlx\CǣK$u7hmXǬ8PX38S 8`10 D#8G8.Z8Z8Z8Z 8 Z 8 Z8 Z 8G8ǁ Z8 Z8Z8Z8Z8Z8Z 8G$l^*Z8Z:SX8X0Pl[Ǣ8c8X8X<X3 8`10E:X8,FX:X:X:X : X : X :X :X8T X :X:X:X:X:X:X:6Xllb X:X08X8\X<Xb[Jp802P _تкTH'к@lcx RD$$t!)!) ! )PD$$!)_x XG>9   !(AD$$*} ^D$$8 PCQSD$%h8FHTNUNV#/D%$T0 #D$$nb a$D$%p# H$Dt~#"DD$ӌD$$N H$Dh666E$(#6E6D(% |H%$~EE6B,6D$(vJ D($$~73MD%DWE$(E W3233D$%==x?J?K%D%$@&?BBBAWBD$$n4 D($RB H%$&PE$$,^ QQD(%"lNBTH%$wz*WBV!D$$(f@\D$$ΖB_!`B_B_H$$(!{azc!D$$|f}f~D$$i[o;Bt]mCwD%Dd\Bw^E!lED(7$EBnErD($^FrrD%$cp pEE$(4!Bz!xD$% ~ ~ \~D$$G"{E@E$(0*ED(%R>*@*D%$LEWWED( ZEED(%gh@ B$EH$DZ_v@*“E@E$$W–EWD$%2˒=(D%$LWD$$.b1¢ѢD$$<@NnpmD%$֓x2w2 @D$(Ѣy2WD$$6¢R@@H%$x_WWD$$BD$%-  D%$.  J ED$B,**10D$$:xw2,H$D\-H-D$$(V10D$$0dwBx2?!4?D$$r@"AB#BC"D"D$$b̀E-FB&G*#"8D$$\ێ!$B,*"+"D$$PkD$$>kD$$ IJP KP D$ʒ$L1M9N@ORD$$~,WRXWY{Z[D$$\^]D$$H;%„&'+(D$$y)."/0$>D$$ "<=9:D$$w 76"5"34D$$(12-B#,D$}6"!R _ BASICB.LB, K(JITth;`Kjy@U/5lllJFPIKѣ8b Q C}[UÏMxlll%#buǣ??YAyаHT|JŃ]Yc@yc8Zilll^WՒCA\KBxFn}cxCxc룔uNSinZ:ctlll۵VT[CEQ[FCzzD{CCccNcR[AlllSBIc}Zǣ=ZCCYA?cFTCd_ǣpqlllۢTbKZCKǣ8TcQ_K9En R Rlll^c룙\n_yXR0RRQxxQc#QQlllۘQZ y+b郙cDcaN_paNcDTZSpzlllWnzcgKĎb__CŃN̳xcnCnccBL_ÎlllkSQ3)P h8[l;8^3# ? g o p ) P)@X؃l'P8) QC3[ K '0_(  D-$0z JH.FB:SACIEHPL:!Xlla(T OAT O(T O T X8l;IĖ ; 18>8!T yT l[llێPVT +T T  T Ol[lLT OT k T wsT L83D8b;e" 83"  T 1Dl'l۴U1 T T 4T kl[l&3.T T 8P T l[ąkMT k-@\ ; 'P8ޟ3 Gl;V _0V )HXX ; @Hl Xb'0  ;   X > b[;b2H800  ;  3 0 H1X$"ID" -H)0 1VWY[\gGbے208 U8X-8b Y 011b[l;Mw> (X8 ! 8S0SS'' L 1 1 @Qa h Dlǜ8gCZ QQa U0( P-8Y0 e0h D$4h J#8ޟ3  P'X[lYv)@3 [ '8KK2KXl'-3KK''8) e 8j0 Z0X՘  _pZx$(ID}c bL@CF VFWƠJI "L )# N~递y`c  O'DQHRHQR<;cLLLc@N@Njcc뀀cc렏cuctBgc wc뀒DHHRc8cCcD cD gc` c c렙 c=c?cc cBc@hxlll}#\n#7qx#bmǣLglllBNm#MFfucQ(PO-hclllGERǣ=C}ǣ?ܩs?q״ACKǣQ_KXRRlll۝h\n0R9_y^ RQxxQCvc(xlllP(HFTZnzzCzn_z#nn$#zlllA_nCCc#MzVcaâD!b`b#li냃mZÔ냀K$$I$IANRp Z$$I$I3@*3G}1jL'($1G8ˣ`*LJ``*J`D'' 0#)*J)B0)"S)ZbG8;X3 0 ;8P_X^ H8 Xb86*M3 ? *8 ]( 2 1N 4 lG';78 ]3 0 ]7P_X\ 8##X$|IF!C [T3 ?[_X\ 8;P0Xb؟T";0[S_X\ 0- * [%D̐Vb  [$! <1  8&3J'X$'3~T3## ?1.1/  D$آ,*A0 P!S%3W#DĒЇ%S0! 9 [ ! 1Db' 0 $ 9  'UbH@KDl:$! ,8  (+! ! DL3'0B! 9  , >P!0lS$b 9 >0 XFJ 8T3## ?LGlǒ$Z!K DE8##/(T3 ? 9D$*J*J DC0!*!Db;b80#*!J=_X\ 8%C4  b[;,[_X\ 8#3!S_X\ 8#3!;DC 1 8!3UP!SU0 [[[؜8Cm$P(P3 (2( (['$32  ǐ*B "BD$$?d@"BJ ;XD$$pN#D$b;\B;#B;_X^ bGLbq/j@HP( P(  [l[ex]] _X^ @HPL[b8R( (P (J]0X'g 0]J ;XSDb'5;Z@XHYPX#J@0R"DĜ;?JK RJ 8# J0RBDa 8Z X(Y01N l[81:SZ@XHYPX0R"JK RZ lGbے87 Z X(Y0_X\ D 8I3 :1lGl'80PP(G0P3PF"GPPD'WPP1@$!L@J3 #G$8OP!)9 @@) @D8lǡe)5@.*@6@* @[?l['h* 8BQ ? D8$.? K 8T3  ?TC bG$b/< - 8!  DV !@Kb[bl_K'_X^ @0J*hI27 J*JJ*HG8sYJP) A H # (lGh.[g! ]_X^ @0I*J2 @7 b[؜Ku I*HIJ" H"(  D${` $I@g!ANL!!Jb& _cFH#ݰz c`Glllۃ Qc냒Q(ݺDǣc[Rǣ=ǣ??WǣQ RllxgQQQQQ_ɳc룏#b[Z60 * :  J~! | *:D88o Bv!(Y ( q8X$b''+i1 j1 3( + 3D؜8cW* 3 So W!8wQ +b['L8  0r9 "( X:n1 D'$FXFTP@!h1 0 L [!0D'$T E83u)8 E = b 9XbdFb M! ` "  "  P:0D;۫@p  " *  8*7! D8LC~;!/) q :D8'p? "P B!: 7! BX8$ۚ0! !  ,/*Y D#@QX,d  \h_l p \ vD$b;4 !P:!( : ZXJ Z@1D _:JgN(I$I Iz-R@ Dm^bF[.L4cFgĎb8gKgNlll۪TcCQ U][PaQ(c냒bc8ycclllBUxctQÔzCz`=c[RQ lllۡMǣ=cǣ??YAWYAc= KC?c?r*h<XR5Rlllc룙0R_y Rc#QQQQycD(TZ#blll%o\CxÎ_c#b#zhURCO_nCCcllY#MzDaգ#7qi냃mZÔ냀Kvs[b WXV M @L0$""08L0&*$" G'$A04"(31 L0&*G'i&JA0";(L0&"P$BXl*A(PMHO  0 MM0A8DlbI`8PL8#$S 0MPU@ H8 ( Gb82 F1K UF X P  0 08DتT  X @P   8 50K $YDظbD  @@F > XĒĹp0 G 0 (P Gے~ PP+(0 0G8 b[;ؿ=P0C B ?Z R 0P>8J#PJCX$؏M   +( @ G$@ @PX@ 8"#@[؜UM%(G0P0B ?- H  D8%.  H>8J3PҐJS[;K0G82 P0   PX;KA PR ,8 < D;8I >8J#RJCt !(lGb'8r < #7( #(( < -1K [b; WXT O S=!X(@7H8>XJ3  l[8ۧPP@3GP!8 S  I H(( bGl;b;L&(P0 ?'< S40< 1K 10K G$ɹ4  @O  0ّ ^ M+(D\>BPX0G8ݿ PP0C B ? [$lPR 8 !PR < WXT 8 [l$y^M- S=9 :XM382 8S:8l[$hlS>0( B7 BWXT ! C 9D8,'z#PCR  ?< SD$$ZDuTP T T""T##L$Do}$@eb[bō60K 8P0N# >0@* 0b[8$ :H%0"3BbG;؂8"#P0 ?< :8 :X%([lb'B>8@+ 8 :HP0 ?(< :8Dlb'3 ?'< WXT :PP0 ?(< :8D;;;A ?'< SP@8"#@\ \b[$Ĩ P0B ?E H>8J#PJCF lGb8A @PX8 P F  @XlLj XL8 P%0( 0 ( lG;۪PL%8(G [   P  [b'b;u& 0 8#C#O) + b['b'0Uo4* 2 E9 ,8 < <HG%bDzB ? 7 8 M!5(8 Gۜ8jPO  M@H8#3Q# b[blǦ^9  (8#3#S. ' 8>X>N3Gؔl 8"#+HG@)  Ibǯz?E $ O  G8lG s$HP0C B ?# R 8  O XĜl  (G8 PP0C  ? R X;Ф GP0N"P@* 8"#R bY v< H0*; P/0 __x$I J=LILHGYIbIU]@CBxhlll;⽣97qQ(c냒ǃ~c8yccctlllۑcǣ=Cǣ?cÓc=QQc룙R^lll` R7RXRRYR0R RQQ꺖QQCvQ.Pll`F״#b,RcC#zBcDi냃mZÔ냀Kx[l;;;X: c @ HP H H @X "8bGe3   ( % _ N (X;$8W [U@ 8#(3D''8*3;P1 >9D$,83 :P  (  ZKl[Ĝ$#F X  +0'( " 1 V1W!U)  DĜ8rT *" 8#) ? I8 (lGl${b89 ( Q#0 . 99 1 $Gے$op D!, P c_!_) DĜ8~] ( H W! V  SPGl8.  (P)04 0P " lG;B (   . @X[Ĝ8X8Z31 1!)   *". Xb'$ĵ P")0 #8 #r1 % 0D$8) ?.  =? (/0  0D;%E ?. )0. !MCT8 0b[$8/? (9 0 ? &0  0 ?) G$b'/ 0 ? 9 ݶ89  8 Xb8'>8+H( "8 ( 8X$ #  {!4  *". ) ?Xl;8# ?.  (D"0 )8  1X$$%. 9  1. +)fD$$3TAETPMITGNT OIFDNF ER EID RlG$A/;X8  7;X: M @G$'nO! 9!)  *".  ? P D'm] *".  ?P9!P0 ? Db;k-!( . 0 Ď?. 0 ?XĒy. ! . ! .  6[Ē8`9'& 8  0 ?. F$B$D$;u{SACIS.D63*15 bG'b'NQ!( 0  @ !   (PlGǒı . (  10  v) 8Xl'Eo2#r) 6j!P( ( % 8b[8$#08 &8 `Z9  D8$Y3X G 0Z8   Gؒ)q % 1. -( ! TQ:YD;x85!P+8 "  0) [':. ((182##+0PXb;b ;!  8+ (( 83 PG8l'Bv! 8#(Z. )( . 6D$ؑb/  9  ( . !Dl؅= $( "  (  Ld$KABISCYTEPC  ROTD LETE EDYLO:D  _W$$$xRccc~cS?$# 'Ǡ~&ǀ%](@C<ǠǠ3$$$Z @v2@s5 v4qDǠ??\Ǡ=@-ࡌ@C;zT@zL$$$vǠL`,n!`+`x:@x9ǠD0`}24@}1ǀ~ea7$$$`?]Ǡ*ǀ8q6HǠ)n" .@/`n@nǠp`[$xǓD@A hxVAC _3\NUI4Bx xUL$$ kxEetdndeB SACIR Dvesioi nD$501. 00 /3107/8$ E$$i 0B SACI0 .501R aeyd  _RVTC@jV@C@Ϳ2 _ BASICX.LB?< 9oTrH2;:7qZ zY`=hbIhb -h`9R0x/P.(-\@,ݺRݺJK+$H2.[ .Ff FaBOFgFgF*h<*h@KXWWTZVQ(UHHQTQ 'ASQ Q(QQQ(QRYR7R5R R R R$$H&QQQQQQRXR0RRQQPxOPN$$d^xMLFK\n\nh\nYAYAY[F[I[A[@En_yIHHH|_H_nQ MJm MG#*")!("b="b <HHH"b;*b:)b9(b8'b7&b6%b5$b4#b3"b2!b1HHO@  bq#z냀$$$  "$$Q,$[R.0:@S`+XMS@D`zA _u3ITHDHJ  C e[[J` ^ _頭@~3I@lllo/#Q(chQR RQhQQlllVmx(P\C"!i냃mZÔ냀K$$II/9 !pbG$>X Z @0 8 8DĒG 8JPP08P@@G' i@ Xb'$mZ*X  JbGǜţ8HX 1PPK@Xؒ$cFH)  XP 8#+1JQD$^TZ9Z6 5 BJ 1XJQD$b;ۦbZ 9Z' & BJ G$$%p1X"*9  Dǒ$~BJ* CBBBBX$l'm P@P@P@P@0(Pl[lbۈњH0(PH 0( HP0(HPb[$$qX (M L  1 X$00Ҁ @@X[l&b;z (  @ ( (' Xb!A@H08(  (D$lۖw!  0P0P@HDĒ$ 9Db;lX ( 0( ( Xbb;b @0( ( 0@HX (@ (p@X( [;L& ( 8X0P@08 DlǾ4 08@@PXPXD B  __^ UԏDIQ8.S.S.ST@F.S|SV< Ulll۵%Cx~hlllpQYR0RRXR7R5R RQQhQ[JH[lll۩TZc em`cC#cHÔ냀K[vbGll/.X- P@@@@@@@D883 ( (   X8']S ( !( X$8 (8  0@[$: H* X X HZ18 @D8-`@!M9 ( P@@D* @ H080K 0G8laA049 0}@ H @ @,Xb'8&0'9 08 1P@D8o`44!@ H99D$wB - 0 ,D؜$7P08(JJJPD8lDz^ 1 1(KH1 (0[b;l'l+ 0@ 0 ΁+EX8XbGb;b'HzX PJ 0 0 P0bG$8҈ (9P@@@ H8Xbl;F X8 PP0 bGţ$0 $P _bTDRDQGsODlo頫bz͸@Oblllۂ3Q R*hcL"bQ(Q(P*cC|lll4"bQQ"bQ "bcO7FPZ"bCQclll?NQXR R\n90RRQQxyuFTZlllGZP$PhA_À"b c#Mz飭VcPllll%b#b'b"b&bOF(b)b!b$b*bi냃mZÔ냀K$@o-Dl;QEXAH8:#@D@3@#8>XD'Z(1=X (H>>0FPj!@41g X$I,IE)  e:7>) $E$II* eZJ!Dl+'48  H 7?P)  4 ?0> [$ZWF7A(C  0?0 DĒĢTJ &A ?( GP+ X$ĸbD@:P A0 ?0' D'83p PGP2PDX "GDĤ~*GP9#GP*H*PI"I;$RY L?PC4A H  oFX;?0 @?P( ) -(?PC4. l[$[C F(t1K- JD'8; Ґ" ?0J ?0b JGǒ$tO- ?P C49   D8$)K J.!()GD@) 2 b 7((P7H.D8'u"*) 7 7PDP[ ?P_ bE$j60!  8B(XG;* #7@ (0Z C48X$GG?C8#+ Z_@X b[$l'&> @8F(J) 1>T> C@bG$f4F@%(>@% F0BBBB@)X$'lB- 1F0BJ%(FPX$įP3F0BJJJC4E! [8$^=0>(15  6!;S$$}l- P !!  D'%z    !D$8 !!  ) G$   yC8X'D0 E#+30 A0 G0?8GĒ$R(77#+A0 G80. ,#+b[b;! &FXC0%8BJF8C >@Xb;$rF@CPFXC0%8BJJJX'[jF8FXC0%8BJJJF8+XGlĨWv9X9+8E3XC49 3 $I$IKeHVgm !)D8f D@C8#+ 3 3LXXb;$}K  Js0C$,0"J$Gb'ؔ="#1(&(`B(0H7(J7@C8D$$j0#+BJCKFX G[8%*>(8S!05 15 !C8F0Db;OILI #+8 E @HC8 0F0#+X$1Z; : ?XA8K C8309 @0?8Dؒ5h?H@ C8CKC4 $J [88jvC0' * '0C4r C8#+ G$$=?8  3K 3. Db'F1n5 DX A89C4' D$$P C4 РGPC8#+PJD88¾ G8+A0 + G0: D$$̼XA8 : PC8%0Db CKC8>XFP$ CX3HD$'3 @X P@8"lG$;*GPC8%0C`KDXLXK  D$Z @ HP4 Z H0P$b; " 8"  (JG$gBJ15  &8  (lG$8:& 0 J ( & 8ZD۹,15  LXK  @ HP 60[b$3:"" ("B 0r 60""\C0 D8l'4H+PK8 @ ( 0J*[ǒ$zVC8>XFP$(CX"C"C"CDǒ$Ƙd"C3C8$0CXJ!9;l[$8l@r@X%(C0>8#+@  3 9 D ;% C(>0  315 ,ElG/.</c=0X$8T=PJ^=(=H*) lGl'$sLXI ) &!HLXI ) ) )D88,P ʓ(1P(P(0D'["2 H8&8KH]D, _!5'hb I@DhAhhlll6cQ(`=W~Q*h<mݺÓHhAilll^_PIP*cPPPǣyPR*cxlllۈPC}cc}TCqqPCscR RQQQlllQPYe#b PD ÀPhCAADGJ'MUe\dKllG :%DE2BXA 9CK J Gl;l;0*9#+@ BXA  *@l[llȯ8 *= *( *  * ,l[lےئF0 ,3 , , 68@pՐDl'* * "  " D8$  " *P$1"*6Db'8i%19#+*"8DĒ$]&#80 PP@ ΒPDDDP4P92AC0Z>+A~(ҮH8$yGBC@; K 5"G$$P8   5"@Du\^@p _ $I$I$IAJkrxz{ 裂Y`;URUx@ymzDhаH$I$I I*@ZgwY]̳xOFn@} Fn} EniHin2uNuWKlllaXR7RRcQQQc#YAWYAx??ǣ?lllic룔o#b}m\CǣLQ cCR*hlllۂ~@KgɳQ(c냒Q(ccHc8ycxlllۏCx[CEQǣQÔ[FD`=lllgCzzc[cc#wRQ [Aǣ=N=qc=>״Alll ~V<KC?c?cCsC?C? R5Rc룙_y0R RlllۓNxQQ#vQycDcDFcTCFTZnálllxÎ`_c#bÀCOCCc4 bFc룏V#Mz飭lllqD(b飫HgFgF#cHÔ냀i냃mZKX$8}F0")v8D+Jw8#, Dlǁ4  l v8DS* 1r Y0r hXll'bS` -P| B x * -0 c* -H` [8;*-(w Pw@) w(_ ' Db'8) ` ` l(Pw 8)Dؒ%F +C* 1C* OJF8# D$UT+v0DJ* 1r ! ` d(bG;bv85+J*  {4 ` C8 [$kp* u1r w 4@o -P | [b؈~B -0BJ* .@2P/X w| B 9 [H` C *2 *X w 4([$w@ "v0:B* ` m w[8D'$滨# + (  D8'A [8#(CR)[0: DlBs-Xv0D*K` F w-To B 3Pb[l;$9| B 30BJ| B [0-@"- -PDl'BJ$0 0"*| B -0X8BJ38#+8J -803D$'J @JK-0*v8b[F DK[$([D* X ! ` XbۜĨw!v0D"l0X8 *g8D;8ؓ&v8DC`wP` ) ` -8+D84 * 1r 1r 1r 1r ;DĜ$BU` [8+ K-XD8'"BP+ "(i K:P3P"*[b;U[^-08~ -0838CKv85#DCK$$l| .1BJ1-P 1-X[؁$Oz| B 1J -0 9  * X$$J39 J X;ۯ* 9 * 3@.H` -P| B [>w2@/H.3(3' 0P/ l[$8,2(2' 0( P/D8 "B /1 r  0^J(! b Dlے!8 e * Z0r K 0Pl[8*RJ* X w| B 1BJ\(n 1X$"'[ 1~ y J  3@D؜ؕ 4#| b[Ĝ$?0B wx 30KJ8X8 >#S2HC] I }0 2(JGX8L1r -rC 7 6 O D@Z! B wG f  (PXbl'h0X X 83382@/H] [vI }0G 8C4 2 /(30[bۜa83S@ 8+873 0D8lۏP  30H 2H/HG 0XU0M X8n2 /(4Xww` C( Gۜ$Ʀ8C] I }0   \ ?HIּrX -X8#E+3Hz#D;x < 8tj# #a( bG;=#L(  /X ` /Pk 0PbGbCX .@2Pk Z( 0PbG;9 2 00 i  d D9 8=K>KP3Pq3 ]0 X;q3 PҐqSm ?' --83R* [;'( 3@8-X=K>K? B : Dl;M68q3 -Po B 3P-0m ?( n X8l;ĶD30BJ* ) B $ 8-X| B y D;R J -8` 6 w8#, Gblۉ` l v8 S S* v8 C C* Y0l[nr Z0r sX -XL@aH8[gv|Xq3  }Pj3 83X-8 p b[b'l;HL( (}0 ?' ]0 $I@I(  )!  Gb۔$R* $9 P(  +! F"Kl;lג8IL %: !# %8l[lۤ$sF %6 % %z loH8Trބ;CXB @ P  0W PJ D$lt&b 0 ("*   % l[blې"p%2 %1CXB 0> P @ (HlGbl~ H A @ ( @ACXB 8Xb;l 0CKCXB  .ACXl[;$bwB (  > A>  P  lGl].ACXB 0 .A Ab[$3CXB 0 C"*@ H A1; ) l['< "= ( 9 P   Dl۱  (   $0; ,(<0lGbHP) * (<0P&  0@8?" lGbl&3 "@04 ?/ -8 @C  "b[l$'"* H-85#1; - _ BASICY.LB'D= otrH2!7qV zU`=hbEhb -h`>b9N,x+P*()\@(ݺR ݺFK'$H2.[ .Ff FaBOFgFgF*h<*h@KTWSTZRQ(QHHQPQ 'AOQ Q(QQQ(QRYR7R5R R R R$$H&QQQQQQRXR0RRQQLxKPJ$$^xIHFG\n\nh\nYAYAY[F[[A[@En_yEHHH?_D_nM MFm MC&%j$i#"! m}zHHHͺxA@?>="b<"b;"b:"b9"b 8"b7*b6)b5(b4HHH;0'b3&b2,%b1$b0#b/"b.!b- H P bq#z냀$$$  "$$,$[R.0:@O`+\MO@D`zA _u3IT 頭3I@lQ(i\Ci냃mZK v'1X$$X9|raDؔ:@JzH %` 0."P`Hb'8Fv X&   G$اƨP& 9=z9}| P (X$$s 0J (J @)D$8b9|rr}| ̩9D$"'|9zaJ @D$$ƫAP D;8cPP0X/ P ' %)Hl[l'EXXX%XXXXX8i!0D0E 1%  i!8J0 DȒ$p @!@.N-` 0  P0գ 8Xbl;vL  X8 P P0 bGؒ$Z$0 $Ph '9D$$khObv/3&GQeNs3Jb_&AD$$v #NoN[[h)CD$$SvO?(?\(@AD$$(AdB>CD$$l%'DEjE$FD$$R_G^;Hʚ%I@@D$$JvHJK*ZLD$ {C@z#$8MhL#No _btDRDQ5GsODlo頫b@OblllaFQ RO7*hcL"bQ(Q(Plll*cC|"bwQQ"bQ "bcFPZ"bCclll'QQXR R\n90RRQQxyuTZlllG$PZPhA_À"b c#Mz飭V@cPllll%b#b'b"b&bOF(b)b!b$b*bi냃mZÔ냀K$@-Dl;QEXAH8:#@D@3@$8>XD'Z(1=X (H>>0FPh!@41e X$I,IX*  `:7>* $E$II* `ZH!Dl+'48  F 7{?P*  ?0< [$ZWF7A(A   ?0 DĜ|TJ %A ?( GP|`* D@D$b'{b:P A0 ?0( D8ċp &\PGP2 PDX tGP"G8$%~9GP* H*PEMTH$ƌ L?PC4A H  F?0 bG;͆@?P ( * -(?PC4. C F(r1K- J DĜ$&" ?0J ?0` J- DĒ$,d?Pu C49    D$I#J-! ()D@Dǻ* 2 ` 7((P7HtXج$* 7 7PDPY ?P] 0Dl'8!  8B(X#7@G$'J  )0Z C4 8C8|D(b; Z_h;@X > @8F(D$bǠ&J) 1>T> C@F@&(X$8ޭ4>@$ F0BBBB@)- D'ǓB1F0}t&(FP3F0BJDĒާPJJC4E! =0>(1X$]^5  6!;- P D$'l!!   GĒ$Wz  ! !!D88׈  )   D$5 yC8D0 E|Xb'ij30 A0 G0?867#+A0 bG$G8 0- +#+ %FXC0X8g&8}tF8C >@F@<CPFXC0X$ۨy&8BJJJF8FXC0&8BDd;/JJJF8,X9X9,8Eb[8$IZ3XC49 3 `<FW]$I;N !) D@C8|Dl& 3 3LXK  Js0C$0D&b"J 1('( `B(0bGؒ$,"H7(J7@C8|}t|`}|[l%80FX )8S"05 15 !C8Xlǒ8>F0G |8 D @HC8!0F0|X$ 2L< : ?XA8K C8309 @0?8Dؒ5Z?H@ C8CKC4 $J [88xhC0( * (0C4p C8#+> G$$Kv?8  3K 3. Db'F15 DX A89C4( D$$N C4 РGPC8#+PJD88о G8+A0 + G0: D$$̮ XA8 : PC8&0DbɼCKC8>XFP% CX3 H 3D$'b3 @X P@8tb['{GPC8&0}|DXLXK  lG'B;K@HP4 Z H0 X8q{" 8" (JBJG8' 15  '8  (' ['80 J ( ' 8Z1XYBll5  LXK @HP 60#"(bGؒ8<,#B0q 60#"C0 +D;l۞:PK8@( 0J+C8>XbGĒ$HFP%(CX"C"C"C"Cb[$hV3C8%0CXJ 9;@X&([8$XdC0>8|@  3 9 ;& [d'8 YgrC(>0  315 l[b$./;.=0=PJDX$TY=(=H*) LXI Xؒ* &!HLXI ) * )P D$Ā/ (1P (P)0"2bGĀ$ H8'8KH] _X!5'hb I@JhHhhlllC-WQ(`=ji~Q*h<mݺÓHhAlllDZPIP*cPPPǣyPR*cxPC}cc}lll{0TCqqPCscRc RQQQQPY#blllr PÀPhCAhcA_ǃPPaCEUPCCcll #M飭,TPβP#@KÔ냀K$t}#$E$I$I Ou7:=@CFILU_[dKllK 0 D$ 28X7  9}| b 8+# Z|`-P l[$hp-0, 0 hаH$I$I Ia@ZgwY]̳xOFn@} Fn} Eni>in)uNuMKlllۿXR7RRccDTCFQQQc#c룔#b}lll!lm\CǣLoQ cCR*h@KgɳYAWlll7BYAxH??ǣ?Q(c냒Q(ccHc8ylll!kcxCxQ[CEǣQÔlllY_[FCzD`=zc[cc#wRQ [AZǣ=N=qc=lllX>״A ~V<KC?cCsC?C?c? R5Rc룙_ylll 0R RxQQ#vQyFccDTZnálllxÎ`_c#bÀCOCCcc룏V#MbFz飭lllqD(b飫HgFgF#cHÔ냀i냃mZKX$8#0")u8G+Jw8#/ Dlz4  l u8GS- 1r c[0r hXll'LSb 0P| E x - 00 - 0Hb [8;*0(w Pw@) w(a * Db' 8) b b l(Pw 8)Dؒ6* 3P2 5(5* 3( D$8P2 "E .1 r Dl;F 0`J'! f !8 e - \0r [l'b&M 0PSJ- X w| E 1G8$z_}t^(n 1 1~ y J D$) 6@@X Q !b [;8 w [wb F VI | E b[l;==w687X6H5@2@3H| 1XR )YlpR }#836Pz3}P X 3X7@| DbےĒO"> 4#| E wx 60KD8-W0J 8"#S5H"C_ ['Xi>K }0 5(J1r -hF 7 G$șvL8 O ! E wI b[8byZ  (P3X X 8"368Dےh5@2Hb_ K }0G 8"C7 b[;b;v5 2(60 8"3"SC  8"+8[Ĝ8J:3 3  60H 5Hl[82HI 3XW0O 5 2(7XwwX'2b F(  8"C_ K }0  DP \ ?hX 0X8[Ĝc#$#H+6Hz#  @  8j# @HbGĨ{8$#m ? 080X6( Hl''cC "E 1 r b ;8 w8#Gl]0+BPwX0Xb 9 ;00(& 08wXX#w 0`JS*PSJ10(& wX;Ǖw8S+PSK`K$!0 }@@XDؒ%c 8$#}0m ?c  8@ j3 [@@q3PҐqS0$** Q *L'o,_ b w!(8 | E b[bS:w@ H8!3#   (8X8lH!3!SY K 8 X z3) ( Q T XǒFVo %5P2XP #X8  8  bGad3P50= 302 8( F(R &30X8Dd'bKtr }0 Ӝ0r ?} G8;N U #!(}0 8!CB#;) lG;A7HH+* V 0!s +B 3 Xb'dX( }0  - ,^X Db;;J0B"9 0Ha s J"JX$l'?͸B*900    D8n8  8q#RqC - 0(lGb';V=  A#c( >#N(  2X b [bZ 2Pk 3PX 1@5Pk Xb';B\( 3P< 5 30 X$Ĺh  c 8>KAKP6PX;7 q3 _0 q3 PҐqSm ?' b[;0086-  6@80X>KAKD$l;`(> E 9 8q3 0Po E 6P[ؒc600m ?( n 60}t- ) E $ 8l[$[D0X| E y  J 08b 8 w8D8;8R#/  l u8SS- u8l[ll `CC- [0r \0r vX 0X5[؜؛nN@cH8 Xq3  }Pj386XX;/|08 p HN( (}0 ?'l[ S _0 $I@l(  )!  Gb۔$M* $9 P(  +! F"Kl;lՒ8IL %: !# %8l[lۤ$sF %6 % %z knH8Tqބ;CXB > N  0U PH D$wlAb 0(t   % %l[bup2 %1CXB 0= P @ (Hl[l"~H A @ (@ACXB 80Dlr}|CXB .ACXB ( [Ĝ$b0 > A>  P  .l[l'llACXB 0 .A ACXB Xb;l{[0 C"* @ HA1; )  "l[ĒļY= ( 9 P   lGl'> (   &0; , (<0 Pl[b;* ) (<0 P$  0@8?" 3 b[l"@04 ?/ -8 @C  "'"Xۀ8* H-85#1; - _ BASICZ.LB/D< orH2!7qV zU`=hbEhb -h`>b9N,x+P*()\@(ݺR ݺFK'$H2˂.[ .Ff FaBOFgFgF*h<*h@KTWSTZRQ(QHHQPQ 'AOQ Q(QQQ(QRYR7R5R R R R$$H&QQQQQQRXR0RRQQLxKPJ$$t^xIHFG\n\nh\nYAYAY[F[[A[@En_yEHHH?_D_nM MFm MC&%j$i#"! m}zHHHͺxA@?>="b<"b;"b:"b9"b 8"b7*b6)b5(b4HHH;0'b3&b2,%b1$b0#b/"b.!b- H P bq#z냀$$$  "$$,$[R.0:@O`+\MO@D`zA _u3IT 頭3I@lQ(i\Ci냃mZK v'1X$$X9|raDؔZ@JzH &` 0/#P=Hb'8hvm X'   G$إƨ P& 9=z9}| P )X$$s 0J (J @)D$8b9|rr}| 9D$"'|9zaJ @D$$ƫAP D;8`PP1X0 P ( %)Hl[l'EXXX&XXXXX8i!0D/E 1&  i!8J0 DȒ$p!@"@/N-` !PPPP G$ K"I 0 /bG'71X. 9( JaP @@@H[؜ĖL (@@@H-(&9&)0D$' JJJP 1 1(Dl;KH1 (0, 0 @ [$Nj 0 +-E X9( 9Xl'$X X PJ 0 0  P0P:D;6]"ժ 8  X8 Xb40 P P0 %0 %PD$$>h '9Obv/3&GQD$$;LeNs3Jb_&A#NoN[D$$BZ[h)CvO?(?\D$$uh(@AAdBD$$dv>C'DEjD$$;E$F_G^;HD$$`ʚ%I@@JvHJD$$K*ZL@z8MhL#ND®o _bDRDQ5GsODlo1頫b@OblllaFQ RO7*hcL"bQ(Q(Plll*cC|"bQQ"bQ "bcFPZ"bCclll'QQ8XR R\n90RRQQxyuTZlllG$PZPhA_À"b c#Mz飭VcPllll%b#b'b"b&bOF(b)b!b$b*bXi냃mZÔ냀K$@-Dl;QEXAH8:#@D@3@$8>XD'Z(1=X (H>>0FPh!@41e X$I,IX*  `:7>* $E$II* `ZH!Dl+'48  F 7{?P*  ?0< [$ZWF7A(A   ?0 DĜ|TJ %A ?( GP|`* D@D$b'{b:P A0 ?0( D8Čp PGP2 PDX tGP"G8$%~9GP* H*PEMTH$ƌ L?PC4ɮA H  F?0 bG;͆@?P ( * -(?PC4. C F(r1K- J DĜ$&" ?0J ?0` J- DĒ$,d?P C49    D$I#J-! ()D@DǼ* 2 ` q7((P7HtXج$* 7 7PDPY ?P] 0Dl'8!  8B(X#7@G$'J  )0Z C4 8C8|D(b; Z_@X > @8F(D$bǠ&J) 1>T> C@F@&(X$8ޭ4>@$ F0BBBB@)- D'ǓB1F0}t&(FP3F0BJDĒާPJJC4E! =0>(1X$]^5  6!;- P D$'l!!   GĒ$Wz  ! !!D88׈  )  x  D$5 yC8D0 E|Xb'ij30 A0 G0?867#+A0 bG$G8 0- +#+ %FXC0X8g&8}tF8C >@F@CPFXC0X$ۨy&8BJJJF8FXC0&8BDd;/JJJF8,X9X9,8E b[8$IZ3XC49 3 `<FW]$I;N !) D@C8|Dl& 3 3LXK  Js0C$0D&b"J 1('(`B(0bGؒ$,"H7(J7@C8|}t|`}|[l%80FX )8S"05 15 !C8Xlǒ8>F0G |8 D @HC8!0F0|X$ 2L< : ?XA8K C8309 @0?8Dؒ5Z?H@ C8CKC4 $J [88xhC0( * (0C4p C8#+ G$$Kv?8  3K 3. Db'F15 DX A89C4( D ;$$N C4 РGPC8#+PJD88о G8+A0 + G0: D$$̮ XA8 : PC8&0DbɼCKC8>XFP% CX3 HD$'f3 @X P@8tb['{GPC8&0}|DXLXK  lG'B;YfK@HP4 Z H0 X8q{" 8" (JBJG8' 15  '8  (' ['80 J ( ' 8Z1Xll5  LXK @HP 60#"(bGؒ8<,#B0q 60#"C0 +D;l۞:PK8@( 0J+C8>XbGĒ$HFP%(CX"C"C"C"Cb[$hV3C8%0CXJ 9;@X&([8$XdC0>8|@  3 9 ;& [d'8YgrC(>0  315 l[b$./;.=0=PJDX$TUY=(=H*) LXI Xؒ* &!HLXI ) * )P D$Ā/ (1P (P)0"2bGĀ$ H8'8KH] _!5'hb I@JhHhhlllC-WQ(`=5-ji~Q*h<mݺÓHhAlllDZPIP*cPPPǣyPR*cxPC}cc}lll{0TCqqPCscR RQQQQPY#blllr PÀPhCAhcA_ǃPPaCEUPCCcll #M飭,TPβP#@KÔ냀K$t}$E$I$I Ou7:=@CFILU_[dKllK 0 D$^ 28X7  9|| b 8+# Z|`-P l[$hp-0, 0 hаH$I$I Ia@ZgwY]̳xOFn@} Fn} Eni>in)uNuMKlllۿXR7RRccDTCFQQQkc#c룔#b}lll!lm\CǣLoQ cCR*h@KgɳYAWlll7BYAx??ǣ?Q(c냒Q(ccHc8ylll!kcxCxQ[CEǣQÔlllY_[FCzD`=zc[cc#wRQ [Aǣ=N=qc=lllX>״A ~V<KC?cCsC?UC?c? R5Rc룙_ylll 0R RxQQ#vQyFccDTZnálllxÎ`_c#bÀCOCCcc룏V#MbFz飭lllqD(b飫HgFgF#cHÔ냀i냃mZKX$8#0")u8G+Jw8#/ Dlz4  l u8GS- 1r [0r hXll'LSb 0P| E x - 00 - 0Hb [8;*0(w Pw@) w(a * 0Db' 8) b b l(Pw 8)Dؒ6* 3P2 5(5* 3( D$8P2 "E .1 r Dl;F 0`J'! f !8 e - \0r [l'b&M 0PSJ- X w| E 1G8$z_}t^(n V 1 1~ y J D$) 6@@X Q !b [;8 w [wb F VI | E b[l;==w687X6H5@2@3H| 1XR )YlpR 836Pz3}P X 3X7@| DbےĒO"> 4#| E wx 60KD8-W0J 8"#@S5H"C_ ['Xi>K }0 5(J1r -hF 7 G$șvL8 O ! E wI b[8byZ  (P3X X 8"368Dےh5@2H_ K }0G 8"C7 b[;b;v5 2(60 8"3"SC  8"+8[Ĝ8J:3 3 nd 60H 5Hl[82HI 3XW0O 5 2(7XwwX'2b F(  8"C_ K }0  DP \ ?hX 0X8[Ĝc#$#H+6Hz# @ 8j# @HbGĨ{8$#m ? 080X6( Hl''cC "E 1 r b ;8   w8#Gl]0+BPwX0Xb 9 ;00(& 08wXX#w 0`JS*PSJ10(& wX;Ǖw8S+PSK`K$!0 }@@XDؒ%c 8$#}0m ?c 8@ j3 [@@q3PҐqS0$** Q *L'o,_ b w!(8 | lE b[bS:w@ H8!3#   (8X8lH!3!SY K 8 X z3) ( Q T XǒFVo %5P2XP #X8  8  bGad3P50= 302 8( F( &30X8Dd'bKtr }0 Ӝ0r ?} G8;N U #!(}0 8!CB#;) lG;A7HH+* V 0!s +B 3 Xb'dX( }0  - ,^X Db;;J0B"9 0Ha s J"JX$l'?͸B*900    D8n8  8q#RqC - 0(lGb';V=  A#c( >#N(  2X b ) [bZ 2Pk 3PX 1@5Pk Xb';B\( 3P< 5 30 X$Ĺh  c 8>KAKP6PX;7 q3 _0 q3 PҐqSm ?' b[;0086-  6@80X>KAKD$l;`(> E 9 8q3 0Po E 6P[Sd600m ?( n 60|t- ) E $ 8l[$[D0X| E y  J 08b 8 w8D8;8R#/  l u8SS- u8l[ll `CC- [0r \0r vX 0X[؜؛nN@cH8 Xq3  }Pj386XX;/|08 p HN( (}0 ?'l[ S _0 $I@l(  )!  Gb۔$Mg* $9 P(  +! F"Kl;lՒ8IL %: !# %8l[lۤ$sF %6 % %z knH8Tqބ;CXB > N  0U PH D$lBb 0(t   % %l[bup2 %1CXB 0= P @ (Hl[l"~H A @ (@ACXB 80Dls||CXB .ACXB ( [Ĝ$b0 > A>  P  .l[l'llACXB 0 .A ACXB Xb;l{0 C"* @ HA1; )  "l[ĒļY= ( 9 P   lGl'> (   &0; , (<0 Pl[b;* ) (<0 P$  0@8?" 3 b[l"@04 ?/ -8 @C  "'"Xۀ8* H-85#1; - _ BYE.RB0A:aPI5N_KCKlllێgx CAQ(c냒c8c룔ݺDCzGzF#zlll۔cRǣC}c}ǣ?cÓ?N=YIqc=\lllQQc룙RYRR^5R RQQQ#TCFݺtlll$}mc냀.SWƣÎÀ#zBF#Cc#CClllۥCCLHc#zDDcH7qJcJÔ냀i냃mZKG'8XS! R! 0L!* t% 0P ? bG;$f0  > P!)( ; , 8 Q!9) 8b[lے8\D#:+4 X1  , . /( '  & DlےW*F!') 87#+4  , . /(l[ǜ$8 &  '  8+?  C !JLXXl'KFK 8# J@- L$$p@TL GOEG DFO FYBO EPAROT RL$$bS GI NFO,FC UPU ES,D L$$3pI O/U ES,D x@2lI88~B (>8=3 % =K![ <@<3 RX% 8( P ! $  8H!bG$8PP"(  .$$$P"(  8#@DcB^ ( $8 ( 8+Xb;$6l0ϑ1P5 83 1P D$8mSz8# F 8C!)CCX$ǂK9J P AX;81*0 lGlےĴC28+GLXI 0#!Pl[l'b'¤"(! '   " @ P ! ( bGb';u! (1 '   " H b[b$  ( HC/D1X)0E #0Glے8C @  LXK 0*K D;l'M- 1P*('  0* LX0jAK  bG` . /(  J@ _CALL.RB0>Sn(YSp_plllyQQ Rǣ?RQyc냀l*hhCOc飭飫<l[$$l X 1 "   D&1 %"@"@J "Xb'@8 #@ (@8 ( Gb'*  S%R@ X 0 [;;vk88 X@ X8T(XF8 !D8 38 R [;T@  0BJ@  D$lLjb P820BJZ8Z 8XT[Fp P _CHAR.RB0TD Z:Tlll۱Ô냀KTZQQQQ Rc[lll0Ҧǣ?ǣ=qy飫zy#bcRɳc룏c룔#c냀l} +Bctc=cc룙[;8U?  XO!(# K!! 0* L!(bG8a8;0 " : A!(# ;!! 0*Dbx ;!(8;0 " ) 8X X$$Z* H R HD$$N8r1* )*  "83Xؖ8iFw 8S ! (1  EdTRNM @  I1D$'Jb. (a) 83 Db'$[pX) ;V) + 0JK X'~ 8# +  B1DؒąK 0 HX  @ H P25  b[8l (Nj 09 P2  (  0"Gؒ>P* 1 # " (J "X88ж ! " 1  0 (9dG$DR}"SNOFOFLe,   Ld$3 CNRSDPLDCOXD$$NNDFON MESBPOMDTDSSEC _DIR2.RB1TZ$I AOSl[UZZiZlll#Q(c8BxyctcRǣ=lllءc}ǣ?ڑiN=c=^c룙7R_yRXR0R!QQlllbcDTCF#b}mc냀À#zcCNCCc#zl飫7qi냃mZKGlǒlD!( rC!(@1 )S#('  "i [lI/ 0HH HH H +)@(X868)3'  ? '/ 8 #D8'*_! @0"Y)0 8 Dl'$,8P X L;$ؾFAM.PRD/ ( )  SUDE:Pl[lے8ƫT( ( &  ! # $( N  ELDlbTF:P( ( &  ! # $( Xb;bۈp "8%1* / P 0" 2X1 8[Ē؅,~)3 )C!(  01Dll'V"  @,.  - *   "" 8%Dbٰ   "" X.     [;"0+ H    *[l蹶 H.   ( H'  D8)g1)   &1   # @Gbۜ8@P( ( (D8[@!1 8K / / " Db'b-+  %0* D/L!P _EXEC.RB3[cA$IIu;y@NsFMTbzScAlllHcL.Sc#N}mQ(c8Bxyh;cxlllۑCxQcRc}ǣ?cÓN=Bq CK_Kclllۚ^RXR9 RQQQxQQyTZnllleL#bc냀nnA#z*hg8bCAcCNll`ۭ&CC 7 B-6D  @b[8~H+  A83;P (X8m;P1 =S 'J.9;@ bG8b'w?1 =S 8#P=3 ? + Gl;$)8 u8#((=3 ? 3D$$F"-,8 Z 5 9@*@D$$p* S !)@F@* L  *(D$$ I "***** ?D8Lr8C CC2#<  81#  bG8b'490G 88#P3*P=34  D$Ă? @ 3*PP=3 ? G G;b;F  ;( 8=3 =K903801[l;bZ7/ *HFH 1> $0/ 0/  E$$P&:P UCRRNE TABIS CYSTSME D$,C4 C RO EMI=GA EIFEL ~RPCESID$$BOINISGNELODBUELSUD$$TPRED FEF NCN L/OGUS B/NLL$$4^OF-RENTXN L/ D$8x6l ! !) D;esz!) (, !!!( !$(b[$[ *(, !g!!( ] !$( Db;Ŗ!) ( H )! *( DlĨ7@ J !) !$( (, 3 D$QB)! F(, ) 3 !(( lG>!)( ( 0, P% Xb;b'8E  )! F( *0, Gl'l P% E   80JX2I   (lGH  H? _ERRIO.RB2;rlceD$$UzlI.pntuN1 oormof rod riceD$$otyrU3es ron tcaitevU4esD$$&Ζ rniN MOGSs atetS6atdetemtnD$$}l netghE7exuceto-lnyR8naegD$$3I:cnmoapitlb eoceri amegD$$9Z;re otspeTAT RvolfD$ S@syet mcaitev _INIT.RB5`UzDϣݺDݺݺ\ɳzlll~cCSRxǣ?ǣnbx lllgCAFf.ucQ(c냒cǃ~c8 lll,-hcǣÍݺDzCzc[F#z.[Clllfǣ=\qccG QǣXR0RCC-#YRlll/7RRQQQQQQQВb#JNcLCClll#'CTZntzccP#OCP`cÎݺÓlllhݺRhUp#LICCCC5#iLH#zll5CiVcDDOFcH##ZÞbu`0D$B&cxP "`! 83 LD8$đr! D w!>( ?  < ')KD$$&T! "Pi)N! D! , D$$*G! F"P\)A! :!  >!D$bۡ8Ph :!f N!d gP@0q <0D$,F I!  TQ:YXXD$$ T !  !  2E$,ɫbCFMOC.MMTPYSOSTUE-p@uY$%u^ T$ITT$OTFF@vLc@sL$$'ACTUOI:NP TAHCSEH VA EON TD$LEBNEA PPILDE !'JO.L}!D$$ - " " " "hG$$H> #~ !   9 2E$bk ABISC%gcD0?(17b 78O!DĒĔt K!Pi@| }1{ /(N0E! X$$]i@! %  D$ؗR  8; > @)!H D;8 =8 !!(!(GH) l[$$a !(! !  %P D$mY) UN( h <a0X{&_@׾(lG$$(K+s!J ,)-   D8&A6   @  8!)D$[ DJ)1A$NfjlGdKlg R][/tZ\FA!XSH b['}`G( S( G( %5 !X$8n ]!%PEK 0) P ! D$$|SB!AD$$8 3J AAbE$/ 8 )J!)P4@)K4)Gb&sK4 8 #(4(J E8"X)D,'X@3K3P P:L9l[Ȓ$OcRk!)9 ))Db;),@)p0b , ,@ 8/X)Xb'$M/ c )M@ H1K 1q [Ē$Ht  6"VA VEQ)UMX8 K @ENI/(E $HF!PDID$$E%J AE>AE;!6 4 8-D$$0 k#. /1 7"( *!-E-ED$$$()+E!,() P%Dbǜij82KP$ $H$ @P $ Dd @  aH@Ml[b;UaMhVT-WS]-$0b H)G'$RO[ S@*) "(%12 S (D$&Vi " <"   X1!D$L1XwJU! ) " OABIS.CDmDI@Yb[$عMLs"4  !B" ;X$8nPPORE PD8$!9KmB!)'!  EbGlBB!XB!K (s (JJXڛA H!tB!%B!PB.B 8 Db;-7mJ!)nBJ2ZB eKdKb[l'8YK)K(K 6B$( HS)"4 PX8B2:U! N@ T P ""4Kҹ!D$$; JP)I E  "A E)K PD$$$  d* 3 #/3) "DĒ$2- 1)JD *)* & ,)J (! D$$@"8 $)  ? )  )KD8 kN- 3 MPKJ58)dElKH5\hPIsu&Pa [$8j> #8^)!K*CW1PGPO)SH l[lǫ"x@ G( GSS( QeFD$$KQ# " "!-! Dl;]S ' P:%!C$!C2*@0q <0D8$8#KK *"  D';?D @%A8 0UoJL9l'酾~TQ:Y46ABISC1'D$$ !  Y @%'L%dO! !$!F!l!Ed,*l!!!!D$$Z4! REOR R10- R ae liTemC D$$colkc REOR R20- O evlryaF liD$$' eREOR R30- I snfuificne tD$$<hCnaensl REOR R40- I snfu:ifD$$,icne trFeeS otareg REOR R50D$$L{:- S awppni giFel REOR R60- D$$UHI snfuificne tCT'B SREOR RD$$V70- M Luitlpxero REOR R80- D$$dM saet riDertcro yREOR R90D$$Jr- I DiFel REOR R01- A ccuoD$$5tnni giFel REOR R21- E txneD$$Sed deMomyr ACTUOI:NH RAWDRAD$$Գ EUMTLPIYLD/VIDI EXEEPTCDEB D$$WTUD EO SON TXESI!T ACTUOI:ND$$ܸH RAWDRA ELFAOITGNP IOTNU IND$$ TXEEPTCDEB TUD EO SON TXESIDl;$ !T rH @"@ @ @w! !Xb;$@  g!S@W S( "  JG8دP`! 8!X+@0b 0!8KE$lP XN! !E0   ?(D$Py ,C  r - 0JD$\5)3)"(  "l[Ē8)v( @"@ @ @r@0! !@  G$86!S@r(,! 2! r( b[$$"D"0 (  " H/:D2Y$%yR"7 ADET( /M/D)Y? gITEMD%$I`( :H:M)S? LIELAG LADET L$n LIELAG LITEM @FHt@INIT2.RB6Wzt"I9syyВbВ@_zdlllquFf.c냒cc8c룔cxyCxlll۽ctCzzF#zcbǣR.[ǣ??qc=ǣЌCslll_cQYRc룙R^h\n\n\n R9RQQQlllxuFݺt:c냀nWƣnnÎAcCɳlllcLm#Mcc2CN_nCCCCc룏##MazVllMDcA飫OFcHFa:Ô냀KbGĒ0  6: j 0 5!,( - -!JG'8# \ <y8#") t(D$l; -( mP 0B(H @l['8=-*( -  ( ZE}l[dl'8502zS GI NNO ,UXXl;l'FT 0#!P*(" (   " @ PDb'b'nT ! ( ! (1 (   bGb;yb" H #  ( SLD/Gl[lW4p@X,0P !0 @  UXT[X$$~T 0*J  1-P+( GۜIJn S@ @J N _0d!F G8;c! b 0f!7*B  8 6+= Xb4 8;#7+ S SSM C0L!BX8?04B8>#6+B H0D!'B&B>)l[8$O0A H0%J / 8)59 1 8E3 G;~$ EK/!@D3 X$ 8DKb['Ҭ8KKKK (9 l[l8983 ( M H)0P P @Dl؞!HR.QK1I _MSCR.RB8ZUD1uaDDlll8Q(c8ct`=Wǣ?N=lllswCK~KC?c_KXR R RRQLCCTZS{#b}l`3}mc냀`CCcUC['{1  @ @ @D  21D8' T 11R 01P 8 0r x! @1 8Du   Xe ! !)D;$?* #8#"3c= P ?  D$D=8    &-R%  8lGb4F   X! 8 08  (D$'dT83 <= 8#  29 [$$ebX P #  8# (D;'p 0P0 0 PHP @Xl;~  (    (Gl'$ 1# 6$&W-J0K1R2SD$$+<p@3T4L5M6O7P8Y9X&\-[0]1U2F3GD$$4^5E6N7Z8I9V&-,0Q1D234CD$M56A789 _PRUX.RB H:aHllll|7RmQ(c8Qlllo.S ~ RXRYRÔ0R RQQ[ylllێx[TZ }c냀念ccHÔ냀KDl'K $" "@#H@ @@ X8$@@@(@ ( ! @b['l' @ Z1* # 9' (DbH2*.).X-  0ZP l[l$8, 0PH 08 XP b[8lF& @ Q( K (@@" #(D8σT +08 !8(88G'Jb 0 !X$p$0  !0 !0(8lGؒ8B~!PӪ"@#H( !(( @J'. bK8W& ( 0[ P0( 9[Kך'#( "("   #DbǜE0  P1 D8A*%.X- # @ j!@@ [;Ǭ @( 0*8 D$Ā JUdS2P 0D$I$I` $I$I$Ik"!+-*HFJM$I,I8tWO[n@ (@Gb' @ q,, [b;Wp@,@ !@ @ ( !@X8$&0o-n    JX:Q4 0ab $0" #( "@#H8G؜8aB8Q @P (K H0D8j P  J0E  @0<) [;^0( 1(J2 P1 0 HX$itl 0)!(!K!"@0+ 0G'lǕ{z#@1+E(J 0 ,G8; "0 "@#0$(#H(Xl'E| 0 H!+-E((Y$#.+-$#H(D=.$#.+ - $EE%n#,.^+-#,.H$EQ^+ - #,.\^+ DED8- #, .^#+ - #E$^^+ -  _PRUY.RB H:aHllll|7RmQ(c8Qlllۙe.S i~XR RYRÔ0R RQQQ[lll۽pyTZ }c냀#R念ccHBÔ냀KDl'K $" #@$H@ @@ X8$@@@*@ ( ! @b['l' @ Z1, # 9( (#Db12*+0X/  0ZP l[l$8. 0PH 08 XP b[8b6F' @ \* K *@@ bG8$JT908 "8*8g!h9D'$?Yb((PP(D$'Fp3SK18Db'9~I "0%8P0 "0*8b[l%w"P* "(( @J'2 ' (Db;b' 0[ P0( 9($( lG't.#(#   $0[ǜ8ƶ  P1 *&Dh )0X/ # @ j!@@b[b')M @( 0*8D$8} JS2PX$I$IS 0$I$I$I ""% 10:<9PNR$I$I$ U_Wcv@ Xb;7*@@ j.. bGl;|&b@.@ !@ @ !( ![Gݺ4@0h-g    JG'ĿB 0Z[ Հ 88Q @DĜ8TPP (K H0  J0lG$ݻ^E  @0<) 0!( 1(JbGؒ8pl2 P1 0 H 0)"(!KDؒz!"Z#@0- 0$@1+EXb;ĸ(J 0 . #0 #@bGؒ8ޕ$0%($H( 0 d[(EZ3H!+-$#.DE(7+-$#.$E$Db#.+ - $#,.^H((@x+- @#,.^+ - D($#,.^+ - #, .^H$D#+ - #^^+ - D _PRUZ.RB  H:aHllll|7RmQ(c8Qlllۙe.S i~XR RYRÔ0R RQQQ[lll۽pyTZ }c냀#R念ccHBÔ냀KDl'K $" #@$H@ @@ X8$@@@*@ ( ! @b['l' @ Z1, # 9( (#Db12*+0X/  0ZP l[l$8. 0PH 08 XP b[8b6F' @ \* K *@@ bG8$JT908 "8*8g!h9D'$?Yb((PP(D$'Fp3SK18Db'9~I "0%8P0 "0*8b[l%w"P* "(( @J'2 ' (Db;b' 0[ P0( 9($( lG't.#(#   $0[ǜ8ƶ  P1 *&Dh )0X/ # @ j!@@b[b')M @( 0*8D$8} JS2PX$I$IS 0$I$I$I ""% 10:<9PNR$I$I$ U_Wcv@ Xb;7*@@ j.. bGl;|&b@.@ !@ @ !( ![Gݺ4@0h-g    JG'ĿB 0Z[ Հ 88Q @DĜ8TPP (K H0  J0lG$ݻ^E  @0<) 0!( 1(JbGؒ8pl2 P1 0 H 0)"(!KDؒz!"Z#@0- 0$@1+EXb;ĸ(J 0 . #0 #@bGؒ8ޕ$0%($H( 0 d[(EZ3H!+-$#.DE(7+-$#.$E$Db#.+ - $#,.^H((@x+- @#,.^+ - D($#,.^+ - #, .^H$D#+ - #^^+ - D _MATARX.RBu3:$IIdw@ny Ug@%lllۘ*hy Rc>lllۋ yYc냀xcFФOcz飫H@Kl[Ē$  P8 p Pl bGؒ8jo/  ((00 P0"*Db;ZI 81  ' 1BJb[ĒZ*  J PI  0("*1XĊ!8  08 B'0"DĒ$F* 0"*  Gb&T  @0 P   P83D$8[b;   0(8#+X8bۦ2p 1 (   ( D~  @HP0 P 0 (HDۜĀD <P @ @0BJ@[l$" (P08 (P (Dl'3P@#+ 0 0BJ[lb'Q; (@@ (P@[;81 + _MATARY.RBu3:$IIw@nq Ng@lllۋ yYc냀xcFOcz飫H@Kl[Ē$  P8 h Pd bGؒ8k5,  ((00 P0t bG*81  ' 1}t Xb''* D PC  0(t1 bG؜$+8|` 08 0t  0D$b;Ft |`   @0 b[ؒ$ TP   P83;   [''zb0(8| 1 (l[b&$p   (  @HP0 [b۝~P 0 (H 8P @ @|`Xb;ʌ0}t@ (P08 (nD$bαP (P@| 0 0}tX;{ (@@ (P@X8ڶ81 + _MATARZ.RB u3:$IIw@nq Ng@lllۋ yYc냀xcFOcz飫H@Kl[Ē$  P8 h Pd bGؒ8l9,  ((00 P0t bG+81  ' 1|t Xb''* D PC  0(t1 bG؜$+8|` 08 0t  0D$b;Ft |`   @0 b[ؒ$ TP   P83;   [''zb0(8| 1 (l[b&$p   (  @HP0 [b۝~P 0 (H 8P @ @|`Xb;Ό0|t@ (P08 (nD$bйP (P@| 0 0|tX;{ (@@ (P@X8ڶ81 + _MATINX.RBXPR bDWВؒlllۏyDlc#wRclllm?UFP *h<QyoYlll_c냀*hcFcLOc#MzH@KÔ냀i냃mZKl[$;/) % P/ &P, ,P P[8bN0 +0"*1(8BJ( H(H [b;ة #  8"3P0 P PG$|*1' ~ 1' +!bG'8H 0J@XؒأF 0BJ(H0P& $H 0"PX'$4T$0 "*PE 0L   0Dl']b"*< 0BJ @ ( Xb';p 0"*, ( 0Db;l'6D~#*BK( 0"+  (D$$ u (0)"*8TBDۜ$VJ 8  (0)BJ0l[lb;Ш' 0X/  #  0 .0X- X;$K@PH0P 0P"*}1(8X':8 y1(8BJ0"*+0 0BJX 0wBJ@@(P0&  H(X8 3 P(0P"* 0 D8vT0BJ0BJ @ P0G$#(( <P("*0l[l'l'i  0* 0BJ  (  (D8}E P H0(& P0PlG'&@ ( 0"* 0 0BJ[bpo4 (@ ( ,0X- lG$'B@0(" f@0"Dl$cP ]$@@@0\ "* 0BlGb'8^J0P 2 P$ 8 J X$٠lP"*0E BJ 0P 2 PX'8" z 0"*0BWJ P(@!0 DĜ8ʌ2P* P"*8CK 0"*0D8BJ#+ 0BJ(  (lGl'H ( $ $ (DbY" ,0X- @HP$ 8Xbۭl0(  0 (, ([bqH(H(H4$ (H([ 9H(H _MATINY.RBXPR bDWВؒlll/yDlc#wlllRc?UFP *h<QyoYllleYc냀*hcFcLOc#MzH@KÔ냀i냃mZKl[$;.) % P- $P* *P P[ػh +0t1(8}t( H(H # D؜8  83P0 P! P1' Dl'ɖ*u 1' +"HX$&8 0J@|` 0}t([8 FH0P& $H 0"P$0 G$'jTt P@ 0F   0t8 0}t l[$$6b @ (  0t @0 (" Z@G$b;40" Q$@@@ 0P G0Bt 0}t 0P 2 P$  8 DP@ Pt0< }t 0P 2 PX;T^ 0t 0}t P(@0 2X$zlP$ Pt8}| 0t 0}t| 0}t[؜ؘz( ! Z(H ( $ X)$  ( ,0X- @ HGb$P$ 80(  0l[bW (, (H(H(H[bij (H(H(H _MATINZ.RB XPR bDWВؒlll/yDlc#wlllRc?UFP *h<QyoYllleYc냀*hcFcLOc#MzH@KÔ냀i냃mZKl[$;.) % P- $P* *P P[ؽh +0t1(8|t( H(H # D؜8  83P0 P! P1' Dl'ɖ*u 1' +"HX$'8 0J@|` 0|t([8FH0P& $H 0"P$0 G$'mTt P@ 0F   0t8 0|t l[$$7b @ (  0t @0 (" Z@G$b;40" Q$@@@ 0P G2Bt 0|t 0P 2 P$  8 DP@ Pt0< |t 0P 2 PX;V^ 0t 0|t P(@0 2X$zlP$ Pt8|| 0t 0|t| 0|t[؜ؘz( ! Z(H ( $ X)$  ( ,0X- @ HGb(P$ 80(  0l[bW (, (H(H(H[bij (H(H(H _MATIOX.RB>2 4b$II9fb/8z{ В97 bђlllcCcF#zR}mQ URc냒cHyc8lllc룔UxQǣؼQCz`=zDlllہ c[cR郒Q ǣ=ǣ??x?N=c= lll2V<KC?Csc?C?7Rc룙vXR5R R#vQlllۍc#Qry铃cDxPTCF#bcc냀xlll۾CCxxÎc#bOCC#Mcc룏zD飫l`0cH#7qi냃mZÔ냀KDb;8 "! '1 V @ 8 &X8#0Xl BPXXX@ 9 0( 8XXXD'ǧ 0;J0*P0J1( XlG;u*65:*X80+P0K;K7!0XĒC8 \@X1 J2 @ R P  Db';tF \0 8&#P ?! J8 O3Db' GT @T#PTC/ @(" 8 ;X;8gb/ v!>(v (U0Pm9IFtXb;lp78 G J8T#RTC^ 8I( b[;b#~G #?( #-( G | @ XN![b8 >(#8 Z ! XH PH(U0bGĜ$P. ]<8  c 88Dl'! Q] @  \ X@  Ds 8'C#) $$+ 1 Xlǜā= @ 0!W B(" 8 2}9\0bG2; 8IFH? cXb @X4H8'3]# B  (8'3[b;r/'S4 , 8JXJY3 a\\8 D,;b!nP 30V ] KN6[l'l9 @ 8JXJ]3PY3\PJ8)#l[$@@ R P@ P 80#++ E [ & (% 0 8(3[ D74 0:8XDH9 [b'l'JB, D# " %(   cX` [; @ 0!W B ' 9 2|9]0bG2; 8JG#I? cXb @XB4H8 3^# C  (8 3[b;̈/ S5 - 8KXKZ3 a\]8 D,;b!P 40V ]LO7[l'l9 !@ 8KXK^3PZ3]PK8 #l[l'|@A S PA P 80|, F  XĒ}&(% 0 8(3\ D'l'5W4 0:8XEH: - X;l;$BE# " *(  cX` 0XģP8 E@DH E D(00l[lbǞ^P% _cX` 9J_BN 0 lG$b'l  A  1V -9J< GzAY!@2 A  . A S P2 DǞˆ1 0, PT PP!0R  [؜!P P]0 Q ?  K8U#PUCbGۜ8 88 H K8HU#RUC 9JXl8*(}M#6;9J & YlGb'ǣ!@A  A S PT PPX;N!0R š !P P]0 Q ?  `G H  _MATIOZ.RB 2 4b$II @ 0!W B ' 9 2|9]0bG2; 8JG#I? cXb @XB4H8 3^# C  (8 3[b;̈/ S5 - 8KXKZ3 a\]8 D,;b!P 40V ]LO7[l'l9 !@ 8KXK^3PZ3]PK8 #l[l'}@A S PA P 80|, F  XĒ}&(% 0 8(3\ D'l'5W4 0:8XEH: - X;l;$BE# " *(  cX` 0XģP8 E@DH E D(00l[lbǞ^P% _cX` 9J_BN 0 lG$b'l  A  1V -9J< GzAY!@2 A  . A S P2 DǞƈ1 0, PT PP!0R  [؜!P P]0 Q ?  K8U#PUCbGۜ8 88 H K8HU#RUC 9JXl8*(}M#6;9J & YlGb'ǣ!@A  A S PT PPX;N!0R š !P P]0 Q ?  `G H  _DIR1.RB1TZ $I yŀ]rsT!`ѠcZ lllQmQ(c8Bxyclll۲|.S郒Rcc}ǣ?xN=c=R^YR15R_ylll%RXR7R RQQQTZL#b}c냀ÀcCll#CACO_nc#zD飫cHÔ냀K[ے<~08P @0(9X*W! D'8g7&*P" R 8-#) G8,u"4+ ".+  x  @X$9\*78*P9X8  @ @lG$b'uC88-##8( )  8XPXl'gFP!@  X % [b;bǧT@!  "  7! 7:GؒqAb$$/  @ H41 H#0( "`X;p 00""(#0 ( , 00 P!@X$$ Z~08#1 K(1#*  [b;{y @P"  0"  Gl;b'eC'J 2080 08$0D$$ r@ACDLTD$$YIpRWP#H OD$1s@E SN#0( #( ( [5b (1 #0( "( 08#)D?/ +=1$8108 # +  ) Xl'o(#0"P "  00 "lG8ws "  00 "&(m   00 "(bGb f "  a! 00 "^ p! "  08+X";g8V c 8*5  I1 b[lےh& P35  @ H @ ( @) GĒ$N4'( %( (9+ ) D'jB# 0 8 @ ?( ( 8D؜yP  ?(  ' 8*P @[b'l;f^ 0  H 0 0 18#0XDml*(*Q @5  1 ['z!z P" P H0)9X8 6)HDĒ85)11D$$;-)) DēPH* @(Db' ! ( ! ( 7PGDn<bGl' 5/9X8 #06 0@   X7 _INIT1.RB5>:zTI\zz:`bzDlll۳c룔ВC_c냒Q(c8-hclllHcǣ=Cǣ?cÓc=c?cQ7Rc룙RBlllt 0RRQQQc#QbLCCHzcc냀WƣcllqP#zBɳCAc#ݺÞD#7qD$ĥ;!J% ! 38+% -D8f{k! ! $9+",(68Dd$_%ABCT HBAMIXUM MSURE STD$$*CAOCNU TANEM :fAPSSOWDR :G;b88#@@* H* H+8Dl;tjFR! HH(  E!G8$NTB9(ͯ 1K;8&SUDE:.ELTF:Ld%S6YBETS >LBCOSKFP(,)LD( )L$$R /D8'z$0+ P H@ @X P" Db;NA68T @ 068X'b!L'( -: C+08 PB((8XD$$SՐҀҀҀҐD$#1L :XbG'$P:HBH`P H @ :KD$l;{ 6(+J780 3)0= XX25 *P @ 068'( +0 X$'Pu& P`?X- #) - ( ?9D$Į4)  -  P5 l[;$$B?? ??- JMZ&9 XfP- "9 - 8 A  1 bGb;֧^#0 ?A  1 + X;l  83;X A bGl'z $ " \   83G;?- A  H$ " (8#,0X$l;ږ @ D.RP< [ (  % Dlǽ   ( (8#)1G8/PP& "1 H( &8D;8Y,   (0 ( 8[$bǠ !C   83*!90X" _OPER.RB9ZM_D^aN_lllm[I[IK\LcCǃ~yc룔clllcRڑixǣ?N=q V<ǣQ R RQlll> yTCFݺt#b}c냀ÀcNnCAcc룏l#z飭ݺÞDDD$$IYx9t4NAR8"I'@)) Hz P P! n 0[$ء! (*:! P -  ( 9&Xb'*J)0 - 0 D$;{8& + T Mi 8&N 18XR X$8|F") F [ A  P= 18X$b;TXA " )  PK X ! lGlJb/# X / P! ( H! b[b;$p P! ( H18 (3 e 3"D؜$~  (+" 11,8X;w&34** P0 X83 DĜ  (*"  X  XD88413+J++J/)J 0 *JXؒ$(.  823'! ? ! ? X$# ? /  ? ! ? 0, [l'J *J(   022:D;b;RFMO    "$ 8& D8$F "$    / !   b[ǜ$/ @ / 0 - *M-!dEĒ8" =f^  P b[V/ @  0 !0(J.1T GD'/&20(* 00,8&X' l[`4 " % (  _OPER1.RB9I_TH!F_ŀNA_Dlllۻo}mQ(ǣ~yclll bڑicÓN=qc= QYRRXRc룙RLlll(0R RQQQQ#JyC#TCFc냀cnlll#nÀCAC#CCc#zݺÞcΓDXbۂ%X( :P' (H' P' (lG$ĶH;8(3  =" [$lG=^(4" %188+38+X[<ے$* ' :=7!/Y$l'J8t t ! ;8X[b'$F4 JP X P P [ی`TP0!P( !( 8X0e2"0Xǒٷb PPB  @!#(09lG8b'-p !( 0!P*8X;0+~#0 H 0#(ͮ 0*JDb'% 02"( " $( 0(* [$Yݚ ( >!JC02* *7%D;,)yJ  (+ 98,3lGbb;)!( 0-"v  ( 02* G$b'.!." "%Jj  (Df[  !( 0/"X %5)&D~. ..01"-M  ( 0-"bG;;CC  ( 03"-=  ( [;&0/"3  ( 0,*3  ( ![b'8 0<*J*  ( 079"(X'c0H#K  ( 0b[۽&>"5*0 1  F C8+ X Xl;ہm4 X  X0  *  (Hb[DؽQB  XG@67ANEMS D$$hmPATUT SIDERTCRO YILENS PW SD DN$$\^TA A P OR G P IR VOYLF LID+lSE PC UF9 _MDSW.RB7) @֐`HF``gxP($v G$ǥt0X9X D$8S 9P@ @! _MDEC.RB7zh,AHReg`N`HF`$vD$0 _MDHW.RB7te@֐`HF`$vD$A0vAv _MDNO.RB7}@֐`HF`$v D$$N-blv`akblAvD`ak _PATCH.RB@ 8RVTC@jV@C@Ϳ2 _FUNC1X.RBUhTA$)@qhDAβPPs*cPyP*cxlll[FFP>QRlllۦ RQ uOc ec냀tYÀllɴcC##MH@KÔ냀K[$$)#8 #1PPPP) CXl >@@ @ @  "86X; P^ @HP0"* 0 GllǿO* &$LN @HP ($ HK1 @ [;b' x808% 0X%&$@X;۶BFHP (31 @H0 [;T ($1 @H0&0 Gb;=kb P@ P@ ( G$$Fp1 @"8 b[bۜ$~0  "8)X( K%  Xb'$ƌ(HPP(0JP@lGĒu@HP g b @H(JXb;b [  1% ' "8)X( Db;8? &0"*'@Hk % CGۜ؀('f  ( B  (c  G'${P/ PD {  HKK?Dl'@@8XH (X;l' 08X@H [ے$ ''+L AWyD$$> B\!v BdǞAE=/D$$p {> $??"=@z@zr@D$$*T& @ B BI @r AD$y$$]4G ^?!U^B3^C?ަD$$WB AB(/zBD6/LbGl'P)X( @H"*P1 4Dbl^ 1   0    '"Dۜ$l*15J 6 3) Dl'z[@H @H Rl[84Yz@ @H"1 1%  (@Hl[8;͖  @H1  (! [Ty (@ "8? _FUNC2X.RBUhtA$)@{hdAUPPxIPEUPAPPDlllۃ?UFPZ>R RQlllv6uO ec냀c@KÔ냀KD= F 0 X @H"*P1lG$9 4 +1   0   bG$o "*1X PlGl8G*1@H 0 X P 1@H[lۜ$8 0 1 3 P 0 PD8$,F 0PPPXJ G ! 8Gl;'e?T 8ߛ0X 8XPD$8-bGE7 = 0ҰlGĒAp8  P D88ׇ~  8X0  ' [č@80P0E  D$$~@ ]@?N@J %D$$\ƨ_>H/@ ]>]>>+?D$8L*/?)@OX@ P1BJ[;^/0 @pP9#+ 0 G87O    ?X5D$$@x"2@UP@ AD! _FUNC3X.RBxUhA$I@ ,TPPvPPh PMPlllc냒Q(c8O7xCc RXRlllY RQoTCFmÀBc飭|S(bi냃bmZKXl'$0"*?  0"*7 @b[$/H80"*/ % @H8'1D'l--#+  H @ (Gb;l'y*0  ( 0 ( [8881   XXl֖F "* @H_0 PP l[bb' T(P ( 8 ( X'ob0"* @ G;$ p 1 =0"* P GlۜĒ~  0 @HP P b['Vi(P J0(  PXN _FUNC1Y.RBRUhTA$)@yqhDAβPP*cPyP*cx lllQ([F>QR RQuOll`p2c냀Àc#M飭Hm@KÔ냀UK[$$)8 #1PPPP) CXĜ$@@@@ 1t `d}`8[$,6PRR RQuOc냀lc@KÔ냀KDؒ$ F 0 ` (tu" fD$'=r`fiSS |`[$gX 9}| 9z1 P G$8*. P 0PPPV y G$2T8 8 8ߛ0X 8XD$$yFPGEf A 0lGĒx#T`8  P  D88b( K 8X0 1}t D$b'Cp 1}t1t 16 80bG'=f~P0E GX D$$(@!h x7 .xlT;D$$ZQ {&YZZ>5;7%D$$@@!h |8J;6%D$$JNiba<<>\}<]}@?|D$$Ik N&@ s? D$$Y5 ›"*TOC\>T;D$$'u A<~D\ &D$;OČٱp' P&1}t0 @pX;$P9| 0 1}t 1}t=D$'b 1t 1    GĒ$( A!DT- @D$$o&dUA'BF͋-EC$CD$$E4fwC1q*KCݐ AD$$.GB'BMvI{C%qvqC_D$$ՑPC $C-4s`KCݐ _FUNC3Y.RBxUhA$I@,TPPtPPf PKPlllO7xc냒Q(c8Cc RXRlllY RQoTCFmÀBc飭|S(bi냃'mZKXl'$0"*=  0"*5 @b[$/H80"*- $ @H8%1G8b;x|  H @ (Xl;9*0  ( 0  ( X8b' 8 |`1   X "lGbl;F* @H0 衆PP (Pl[YT ( 8 (   DĜRvb0"* @  GĜ$p1 =0"* P  Dbl'F~ 0 @HP P (PXl`;H݌ J0(  P   _FUNC1Z.RB RUhTA$)@yqhDAβPP*cPyP*cx lllQ([F>QR RQuOll`p2c냀Àc#M飭Hm@KÔ냀UK[$$)8 #1PPPP) CXĜ$@@@@ 1t `d}`8[$,6PRR RQuOc냀lc@KÔ냀KDؒ$ F 0 ` (tu" fD$'=r`fiSS |`[$gX 9}| 9z1 P G$8*. P 0PPPV y G$2T8 8 8ߛ0X 8XD$$yFPGEf A 0lGĒx#T`8  P  D88b( K 8X0 1}t D$b'Cp 1}t1t 16 80bG'=f~P0E GX D$$(@!h x7 .xlT;D$$ZQ {&YZZ>5;7%D$$@@!h |8J;6%D$$JNiba<<>\}<]}@?|D$$Ik N&@ s? D$$Y5 ›"*TOC\>T;D$$'u A<~D\ &D$;OČٱp' P&1}t0 @pX;$P9| 0 1}t 1}t=D$'b 1t 1    GĒ$( A!DT- @D$$o&dUA'BF͋-EC$CD$$E4fwC1q*KCݐ AD$$.GB'BMvI{C%qvqC_D$$ՑPC $C-4s`KC _FUNC3Z.RB xUhA$I@,TPPtPPf PKPlllO7xc냒Q(c8Cc RXRlllY RQoTCFmÀBc飭|S(bi냃'mZKXl'$0"*=  0"*5 @b[$/H80"*- $ @H8%1G8b;x|  H @ (Xl;9*0  ( 0  ( X8b' 8 |`1   X "lGbl;F* @H0 衆PP (Pl[YT ( 8 (   DĜRvb0"* @  GĜ$p1 =0"* P  Dbl'F~ 0 @HP P (PXl`;H݌ J0(  P   _LIST1.RB6RSݕTD`FBlll%R RQ(Q(Q(c8lll,QQ.SQ 郒xN=~Q R_y5R RxlllUXyTZS{ámc냀.S_hzNÔ냀KG$0 @P @ ) '08b"@P['t*H PP*(X)()H(XbےĻ^, NE 0  P=)%  Xl'*%@%U @0  0,) D8$Ð8 5o)  ( H.i) *( D$%Fc1 $`9 % 0) )D$'T9r) p) @UbE8$'?+bJ9 < 9$,[')p+l * 8.3!  *X'$~ H))D ! m!lX'$z( (9( 99+lGL2 P (8  0ķ 9$7DġX7Z;  P   Gbbl P1 (6 #1 [I(y0 #'LQ`."D$$<<>>>==b<=<;,([,@)]D'N-+/*^T *(H,K l[$VK0 0 &5  ( PGl@T1 0 1" @ 0(bG;Ĭ   0 s P[$ۿ P0 0  #( Dl$3i&9 P0 08   PG;'h4 /X.  P' P@PXXb' B   0 ) -) X'88P-)9-! - ! )Dے$/^-0 -!_~VbGb'8Dl  8  1 *8P*H+ Ez(x _STAR1.RB:=TIO7\twnDlllۙg<ٓ# c냒c냀Ôc#wll+cQYR RRQQQQc냀K[T 8X @H0A PP P(2Dl;K8 02K(1 0 (X;J:H@ @H4 %, 8# Xl;$* 8K+, 8K+,b[$!8 8K+, 8KC 0PDl;IF (     8D$$*TF=#+ #+ #J0lG8bfb ( 0 H (0 8 0 XbtpX  P P@H$KGb@~  ($K  0 P(l[b'$  P 0' %08"+ "+D$; "+ "+  0"))D$6Ш     0 sD$$߶Q0" " " D;qi*   0 8b[$$xs @0"PB"@B"@B"@G$$cB0"@B"@B"@B"@BX$$8+ "+ "+D$(`  "+ G@ (GĒ$9' N (M 0"@B"@B"@BD;$*"@B 80#* #*D$$'M& #* # *GĒL4pX   0D88B4 0"K ( 0DllEJP 0 ( = 8HrX lG8l;ԏ^ @ H0  PP PPPPX$b'l 8#+ #+  @ @ bG8ķbzO1 $K ( P (/ ?1 bGe/ 0,    0 D8' /1  00 0 0  0"*D$Q "* jJ1 0 (!Dlb'Q  8 ( (X$(1  +-.E>Z$IH[Dl[tAC\! Z! ZiUYo _TIMER1.RB)T$I$I$IcdbZ@NZLZ [Z:ZOesZs@Z`sZ U JQP$I IXƆ@[`P[@P[ [- ZcTITCJNll`ÔCs#vǣLǣCTZRݺD4ݺÞwZD$$JGCQCYJ 8 ;3 #X8(  08! * 3! Gǒ8 &*Z! **! J%!YG8$p*% *KY! D'$89 9 #P19@ID$$H"I ))D`%W X)0 @eDeI%AOE5UK|vO'Ac _ BSG.SV x@  ,-01 CCbb YESNOSLOWOL R ^  > < ; I B5Az^#^wa% J " bP b!Y8 ;0xPx0uPu0vPv0wPw !M  q!L8 ; !L  qb u   q  q!?K!> ]03 q ]!8 ]b!8 3  q s  q!1)s m  qnz|481776FCOM.CM$TTI$TTIX1 $TTO($TTO15FBASIC.TM  SG! ^&1 p jjj ECLIPSEORIGINALNOVA3NOVAbڰ!5 ^5 p   #$!L \"c!R!Z!kl \b!]j q q q!gj q q qc!ikkRTOSRDOSDRDOSDMRDOSDRTOSDBRDOSDARDOSDOSDDOSRLDR/A/P/E/N/D/S RLDR/A/P/E/N/D/S RLDR/A/P/E/C/N/D/S RLDR/A9/P/E/N &RLDR/A/P/E/C/N 8RLDR/A/P/E/N/D/S LRLDR/A/P/E/N/D/S EIMQVZ_dg! ^0s n1 p !P s  q! !  qMT0CT0! ^0s n1s p ->!_P s  q !!Ѭ  qbyA`!J ^285IZ0s n0sQO1RQN1L o1b 1H9] QF nBBC!B@t1>  n!;  14Ht!F n!1 \!# \m t \! \ t \!5 \U) (0 1 q%+BASIC/S .MP/L  `, :$! ^0s n1 p     %P s \! \ml ! ^ 0R pE !g ^.0R p* sAf!^A^P@f!\ ^ [IXPs1W9S  AT!T 6fQ!P)N!FAF 07)E 1CQ?AC $fK):06 !:@s01 τ,>4=  2TD?g-*E'E' f@H5(5Y0=)0>9+"B! @sM ;@ @ g-!* ^*0s o(7  o(9  o(1  [E0=(5)ҍ0>9Ξ+" fHX E! ^ 0R pE ! ]g@?!m ^ 1 p__1_" \-410040604026ALM r xQTYM MP100 MXIO MX.LB IMUX MP26 _g5!k! ^-16k p % p  H1 _" \!% \ QTYM QTYR RD100 RD26 1" \gl ` ؂O $ALMRM ! ^0R pH`j! ^0R p!j! \! ! MDSW MDEC MDHW MDNO !' ^C15 p>aGaj!!A"! A!! a!A93 '"(;)ByY]adVWYZOSI)NGDOUBkljc ! ^0R pc! ]! ^ 0R p il!E!E 3! ^0V pd l ! ^0V pe deJ!5 ]l!2!1 ]0@l0AQB" +(1 3()P99#@B#A3" ]%.1"  !#B%'+- 1) E&N,P4R<UTD : < >  !#B%'+- 1 ) E&N,P4R<TDMATARXMATIOXMATINXPRUXBYECALLMSCRLIST1DIR1OPEROPER1INIT2INIT1MISC1DIR2CHARSTAR1ST.AR ERRORERRIOFUNC2XFUNC1XFUNC3XEXECDDDF E@F C@D$D ! \$DD \$D ! \! \ |[] , $F F \! \j!! \i! \! \%SBRTB BASICA.LB BASICB.LB BASICC.LB BASICD.LB BASICX.LB 1Wl!cj %g:J`75g:`75j g(`%#g.`+)jgg  g ` g `" \! \ DINIT Z 0@b$4DfTIMER1 SYS.LB TIMER2 SYS.LB TIMER3 SYS.LB TIMER1 SYS.L4B TIMER2 SYS.LB TIMER3 SYS.LB TIMER1 RTOS NRTOS1.LB NRTOS2.LB TIMER2 RTOS NRTOS1.LB NRTOS2.LB TIMER1 SYS.LB TIMER2 SYS.LB TIMER3 SYS.LB TIMER1 SYS.LB TIMER2 SYS.LB TIMER3 SYS.LB TIMER1 SYS.LB TIMER2 SYS.LB TIMER3 SYS.LB TIMER1 SYS.LB TIMER2 SYS.LB TIMER3 SYS.LB TIMER1 RTOS BRTOS1.LB BRTOS2.LB TIMER2 RTOS BRTOS1.LB BRTOS2.LB lZ fP(/AJ0)`g=KKAF(/0f ZIA17!@Q&>&>&D&D&h&~&&&&'0'X'r'r'r System Generation Valid answers are in parentheses. Default values are always given first and may be selected by a null response (carriage return). Defaults are followed by a list of alternatives, any one of which may be selected by typing a matching response. Object computer type (NOVA,ECLIPSE,NOVA3,ORIGINAL) ? Relocata?ble binary file ($TTP,$TTP1,$PTP,$PTP1,MT0:0,CT0:0) ? Object operating system (RDOS,RTOS,DOS) ? Command file ($TTO,$TTO1,$PTP,$PTP1,$LPT,$LPT1,MT0:0,CT0:0) ? System save file (BASIC, any disk file name) ? System save file ($TTP,$TTP1,$PTP,$PTP1,MT0:0,CT0:0) ? Multi-user system (NO,YES) ? Central processor option support: Multi-line controller (4060,4100,4026) ? Dial-up lines (NO,ALM,4060) ? Dial-up lines (NO,ALM) ? Is master console a CRT (YES,NO) ? Swapping (YES,NO) ? ' Hardware multiply/divide (NO,YES) ? Hardware floating point (NO,SING,DOUB) ? Memory management/protection (NO,YES) ? Default features acceptable (YES,NO) ? Default overlays acceptable (YES,NO) ? Valid answers to the following are: 8L O=Include feature as an overlay M=Include feature in main storage NO=Do not include feature NEW PRINT USING Accounting (YES,NO) ? BYE CALL Mark sense card reader Error message text LIST,PUNCH H File commands Operator commands User initialization String arithmetic DELETE,RENAME,PAGE,RENUMBER,SIZE,INIT,RELEASE Console characteristics User written subroutines (NO,YES) ? Illegal SAVE file Disk and directory  commands Maximum files to be open at one time () ? Matrix arithmetic Matrix input and output Matrix inverse FOR-NEXT nesting limit (8,4-20) ? GOSUB nesting limit (8,4-20) ? USERS command User function nesting limit (6,0-10)/ ? I/O error message text ) ? Time of day with prompt (NO,YES) ? Line configuration: SIN,COS,TAN,ATN LOG,EXP,^,SQR,RND RUN filename,CHAIN,SAVE,LOAD,logon LEN,POS,STR$,VAL,ORD,CHR$ Prompt string (*-space-null, any 10 chuaracter string) ? Master console line number (-1,0-31) ? File sharing (YES,NO) ? Maximum user core size (in bytes) ? COPYRIGHT (C) DGC 1977,1978ALL RIGHTS RESERVEDLICENSED MATERIAL-PROPERTY OF DATA GENERAL CORPORATION(Extended BASIC Revision 05.10 03/01/78 (0 BASIC 05.10 Ready @5*Z"*:X8:2! H`:Y:2` Y8 ` =CKS8Z9(J+J@Z*J8H`'ABS.HF 4g5 ABS(EXP) TO RETURN THE ABSOLUTE (POSITIVE) VALUE OF EXP, WHERE EXP IS ANY VALID NUMERIC EXPRESSION. 'ATN.HF :q ATN(EXP) TO CALCULATE THE ANGLE (IN RADIANS) WHOSE TANGENT IS EXP, WHERE EXP IS ANY VALID NUMERIC EXPRESSION. 'BYE.HF | BYE TO EXIT FROM BASIC AND RETURN ONE LEVEL. DEPENDING ON HOW THE SYSTEM IS CONFIGURED, BYE WILL EITHER LOG THE USER OFF, OR RETURN HIM TO THE CLI. SYNTAX: BYE 'CALL.HF %/f CALL TO CALL A SUBROUTINE WRITTEN IN ASSEMBLY LANGUAGE FROM A BASIC PROGRAM. SYNTAX: CALL SUBROUTINE_NUMBER [ , EXPRESSION ] ... 'CARDS.HF5 3?CARDS TO TRANSFER AND MERGE BASIC STATEMENT LINES IN DGC MARK SENSE CARD FORMAT FROM THE CARD READER OR OTHER DEVICE OR A DISK FILE INTO YOUR CURRENT PROGRAM STORAGE AREA. SYNTAX: CARDS "FILENAME" OR CARDS "DEVICE_NAME" 'CHAIN.HFg ;o CHAIN TO RUN A NEW PROGRAM INSTEAD OF THE CURRENT PROGRAM. WHEN A CHAIN STATEMENT IS ENCOUNTERED, YOUR CURRENT PROGRAM AND ALL OF IT'S VARIABLES ARE CLEARED FROM MEMORY AND THE PROGRAM SPECIFIED BY "FILENAME" IS LOADED AND RUN. IF THE THEN GOTO LINE_NUMBER CLAUSE IS USED EXECUTION BEGINS FROM LINE_NUMBER, OTHERWISE EXECUTION BEGINS FROM THE FIRST STATEMENT. ANY OPEN FILES REMAIN OPEN. SYNTAX: CHAIN "FILENAME" [ THEN GOTO LINE_NUMBER ] 'CHAR.HF5 mXCHAR TO CHANGE THE CURRENT DEVICE CHARACTERISTICS, OR DISPLAY THE CURRENT DEVICE CHARACTERISICS. THE CHARACTERISTICS WHICH CAN BE TURNED ON AND OFF ARE: NCR - NO CARRIAGE RETURN ECHO DSP - DISABLE SPOOLING DLC - DISABLE LINE FEED AFTER CARRIAGE RETURN XON - XON/XOF PROTOCOL FOR $TTR DNF - DISABLE 20 NULLS AFTER FORM FEED NOE - NO ECHO OF INPUT BSP - BACKSPACE FOR RUBOUT MOD - MODEM LINE DTS - DISABLE TAB SIMULATION ESC - ESCAPE CHARACTER PRODUCES INTERRUPT NRM - NON RECEIVE MODE %[ "ON" ] [ , "ON" ] SYNTAX: CHAR [ "OFF" ] [ , "OFF" ] ... [ "CHARACTERISTICS" ] [ , "CHARACTERISTICS" ] 'CHATR.HF5 !%CHATR TO CHANGE, ADD OR REMOVE THE RESOLUTION FILE ATTRIBUTES ASSIGNED TO A FILE WHICH ALREADY EXISTS IN YOUR DIRECTORY. THE ATTRIBUTES WHICH MAY BE ADDED OR REMOVED ARE: P - PERMANENT FILE R - READ-PROTECTED W - WRITE-PROTECTED H - SHARABLE, YPERMANENT AND WRITE-PROTECTED FILE O - SHARABLE E - EXECUTE ONLY 0 - REMOVES CURRENT FILE ATTRIBUTES * - PRESERVE CURRENT FILE ATTRIBUTES - - REMOVE THE FOLLOWING ATTRIBUTES + - ADD THE FOLLOWING ATTRIBUTES SYNTAX: CHATR "FILENAME" , "ATTRIBUlTES" 'CHR$.HF<'ţCHR$(NUMERIC_EXPRESSION) TO RETURN THE CHARACTER REPRESENTED BY THE NUMERIC_EXPRESSION (MOD 128) IN THE ASCII COLLATING SEQUENCE. 'CLOSE.HFf 5 CLOSE TO DISASSOCIATE A FILENAME AND A FILE NUMBER SO THAT THE FILE CAN NO LONGER BE REFERENCED. IF THE FILE(FILE_NO) ARGUMENT IS NOT USED, ALL FILES ARE CLOSED. SYNTAX: CLOSE [ FILE(FILE_NO) ] 'CON.HFf 7vZ CON TO CONTINUE THE EXECUTION OF A BASIC PROGRAM AFTER A STOP STATEMENT HAS BEEN EXECUTED, THE ESCAPE KEY HAS BEEN PRESSED, OR AN ERROR HAS OCCURRED. SYNTAX: CON 'COS.HF t COS(EXP) TO CALCULATE THE COSINE OF AN ANGLE WHICH IS EXPRESSED IN RADIANS. EXP IS ANY VALID NUMERIC EXPRESSION. 'CPU.HF4TCPU(EXP) TO RETURN A VALUE EQUAL TO THE STATUS OF A CPU DATA SWITCH (EXP = 0 THROUGH 15) OR THE NUMERIC VALUE OF ALL 16 DATA SWITCHES (EXP = -1). 'DATA.HF $ DATA TO PROVIDE VALUES FOR VARIABLES SPECIFIED IN A [MAT] READ STATEMENT.  SYNTAX: DATA NUMERIC_VALUE [ , NUMERIC_VALUE ] ... "STRING_LIT" [ , "STRING_LIT" ] 'DEF.HF  DEF TO PERMIT YOU TO DEFINE AS MANY AS 26 DIFFERENT FUNCTIONS WHICH CAN BE REPEATEDLY REFERENCED THROUGHOUT A PROGRAM. ONLY SINGLE LINE NUMERIC FUNCTIONS ARE PERMITTED. EACH FUNCTION RETURNS A NUMERIC VALUE. SYNTAX: DEF FN#(SIMPLE_NUMERIC_VARIABLE) = 8SNUMERIC_EXPRESSION WHERE: # IS A SINGLE LETTER (A-Z). 'DELAY.HF ,I DELAY TO DELAY IN SECONDS THE EXECUTION OF THE BASIC PROGRAM FOR A SPECIFIED AMOUNT OF TIME. SYNTAX: DELAY = NUMERIC_EXPRESSION 'DELETE.HF /I DELETE TO REMOVE A FILE FROM YOUR DIRECTORY. SYNTAX: DELETE "FILENAME" 'DET.HFf :B DET(X) TO OBTAIN THE DETERMINANT OF THE LAST MATRIX INVERTED BY A MAT INV STATEMENT. SYNTAX: NUMERIC_VARIABLE = DET(X) WHERE X IS A DUMMY EXPRESSION (REQUIRED BUT NOT USED). 'DIM.HF DIM TO DEFINE THE SIZE OF ONE OR MORE NUMERIC VARIABLE ARRAYS OR THE MAXIMUM LENGTH OF ONE OR MORE STRING VARIABLES. STRING_VAR(NUM_EXP) [ , STRING_VAR(NUM_EXP) ] SYNTAX: DIM NUMERIC_VAR(NUM_EXP,NUM_EXP) [ , NUMERIC_VAR(NUM_EXP,NUM_EXP) ] A... NUMERIC_VAR(NUM_EXP) [ , NUMERIC_VAR(NUM_EXP) ] 'DIRCMNDS.HF4DIRECTORY COMMANDS TO PRINT THE NAME OF YOUR DIRECTORY USE GDIR. SYNTAX: GDIR TO CHANGE THE CURRENT DIRECTORY ON THE CURRENT PRIMARY DEVICE TO ANOTHER DIRECTORY ON THE SAME OR DIFFERENT PRIMARY DEVICE USE DIR. THE DIR COMMAND IS A PRIVELEGED k~ACTION. SYNTAX: DIR PRIMARY_PART [ :SECONDARY_PART ] [ :SUBDIRECTORY ] SECONDARY_PART [ :SUBDIRECTORY ] 'DISABLE.HF42DISABLE TO PREVENT THE INADVERTENT USE OF CTRL-A, CTRL-C AND CTRL-F (BACKGROUND) RDOS SYSTEM CONSOLE BREAKS. DISABLE IS A PRIVELEGED COMMAND. SYNTAX: DISABLE 'DISK.HF c\/ DISK TO DETERMINE THE NUMBER OF 256-WORD BLOCKS STILL AVAILABLE IN YOUR DIRECTORY. SYNTAX: DISK 'ENABLE.HF42ENABLE TO RESTORE RECOGNITION OF OF THE CTRL-A, CTRL-C AND CTRL-F (BACKGROUND) RDOS SYSTEM CONSOLE BREAKS. ENABLE IS A PRIVELEGED COMMAND. SYNTAX: ENABLE 'END.HF 9_ END TO TERMINATE EXECUTION OF THE BASIC PROGRAM AND RETURN TO INTERACTIVE MODE. SYNTAX: END 'ENTER.HFft ENTER TO TRANSFER AND MERGE THE BASIC STATEMENT LINES FROM THE DEVICE OR DISK FILE NAMED BY "FILENAME" INTO YOUR CURRENT PROGRAM STORAGE AREA. SYNTAX: ENTER "FILENAME" 'EOF.HFf8m EOF(FILE_NO) TO DETECT THE END OF DATA WHEN TRANSFERRING DATA FROM A FILE. FILE_NO IS A NUMERIC EXPRESSION WHICH EVALUATES TO A FILE OPENED FOR READING BY AN OPEN STATEMENT. THE EOF FUNCTION RETURNS A VALUE OF 1 IF THE END OF FILE INDICATOR IS ON AWND A 0 IF IT IS NOT. 'ERASE.HF2 ERASE TO REMOVE, INCLUSIVELY, THE STATEMENTS LINE_NUMBER1 THROUGH LINE_NUMBER2 FROM YOUR BASIC PROGRAM. SYNTAX: ERASE LINE_NUMBER_1 , LINE_NUMBER_2 'EXP.HF 4 EXP(EXPR) TO CALCULATE THE VALUE OF E (2.71828) TO THE POWER OF EXPR, WHERE EXPR IS ANY VALID NUMERIC EXPRESSION WHICH EVALUATES TO A VALUE IN THE RANGE -178 THROUGH 175. 'FILE.HF45BFILE TO PRINT ALL THE FILE NAMES IN YOUR DIRECTORY. SYNTAX: FILE 'FNX.HF  FNX(EXP) TO EVALUATE THE USER-DEFINED FUNCTION FN'X' WITH ARGUMENT EXP, WHERE EXP IS ANY VALID NUMERIC EXPRESSION. THE VALUE RETURNED BY THE FUNCTION IS SPECIFIED IN THE DEF STATEMENT FOR EACH FUNCTION. ALL FUNCTIONS MUST HAVE AN ARGUMENT WHEN THYEY ARE REFERENCED, EVEN IF THE ARGUMENT IS NOT USED IN THE EVALUATION OF THE FUNCTION. 'FORNEXT.HF4 FOR NEXT TO EXECUTE A BLOCK OF STATEMENTS A SPECIFIED NUMBER OF TIMES. SYNTAX: FOR SIMPLE_NUM_VAR = NUM_EXP TO NUM_EXP [ STEP NUM_EXP ] . . BLOCK OF STATEMENTS . . NEXT SIMPLE_NUM_VAR 'FREE.HF4 FREE TO INTERRUPT EXECUTION OF THE PROGRAM WHICH IS BEING PROCESSED FOR A USER. FREE IS A PRIVELEGED COMMAND. SYNTAX: FREE USER_ID 'GOSUBRETRN.HF{ GOSUB_RETURN GOSUB DIRECTS PROGRAM CONTROL TO THE FIRST STATEMENT OF A SUBROUTINE. THE FIRST STATEMENT OF THE SUBROUTINE IS SPECIFIED BY THE LINE_NUMBER ARGUMENT IN THE GOSUB STATEMENT. RETURN EXITS THE SUBROUTINE AND RETURNS PROGRAM CONTROL TO LsTHE STATEMENT FOLLOWING THE GOSUB STATEMENT. SYNTAX: GOSUB LINE_NUMBER . . PROGRAM STATEMENTS LINE_NUMBER . . SUBROUTINE STATEMENTS RETURN 'GOTO.HFfu GOTO UNCONDITIONALLY TRANSFERS CONTROL TO THE STATEMENT NUMBER SPECIFIED BY LINE_NUMBER. SYNTAX: GOTO LINE_NUMBER 'GPOS.HF4 GPOS TO DETERMINE THE CURRENT FILE POINTER POSITION IN AN OPEN FILE. THE RESULTANT VALUE IS ASSIGNED TO THE SPECIFIED VARIABLE. SYNTAX: GPOS FILE(FILE_NO) , NUMERIC_VARIABLE 'HELP.HF{ 'x=BASIC STATEMENTS AND COMMANDS ARE: BYE CALL CARDS CHAIN CHAR CHATR CLOSE CON DATA DEF DELAY DELETE DIM DIRCMNDS DISABLE DISK ENABLE END ENTER 4 ERASE FILE FORNEXT FREE GOSUBRETRN GOTO GPOS IFTHEN INPUT KILL LET LEVEL LIBRARY LIST LOAD LREAD LWRITE MAT MAX MSG NE7W ON ONERR ONESC OPEN OPERCMNDS OPERMSGS PAGE PRINT PRINTUSING PUNCH RANDOMIZE READ REM RENAME RENUMBER RESET RESTORE RETRY RUN SAVE SHARECMNDS$ SIZE SPOS STOP TABSET TIME TINPUT USERS WHATS WRITE BASIC FUNCTIONS ARE: ABS ATN CHR$ COS CPU DET FNX EOF EXP INT LEN LOG ORD POS RND SGN SIN SQR STR SYS TAB TAN VAL FOR MORE HELP ON ANY OF THE ABOVE ITEMS TYPE 'HELP "ITEM"'. 'IFTHEN.HF{  IF THEN TO CONDITIONALLY EXECUTE A STATEMENT BASED ON THE LOGICAL VALUE OF A NUMERIC OR RELATIONAL EXPRESSION. SYNTAX: IF [ RELATIONAL_EXPRESSION ] [ [ THEN ] IF_STATEMENT ] [ NUMERIC_EXPRESSION ] [ THEN LINE_NUMBER ] WHERE: IF_STATEMENT IS AC NY BASIC STATEMENT EXCEPT FOR, NEXT DEF, END, DATA OR REM. 'INPUT.HFfo INPUT TO REQUEST DATA FROM YOUR TERMINAL OR A FILE AND ASSIGN THE VALUES TO A LIST OF VARIABLES. SYNTAX: INPUT [ PROMPT, ] VARIABLE [[ ,VARIABLE ]...] [ ; ] OR INPUT FILE(FILE_NO [ ,RECORD_NO ]), VARIABLE [[ ,VARIABLE ]...] 'INT.HF 8xP& INT(EXP) TO RETURN THE VALUE OF THE NEAREST INTEGER NOT GREATER THAN EXP, WHERE EXP IS ANY VALID NUMERIC EXPRESSION. 'KILL.HF5 cKILL TO FORCE A SPECIFIC USER OFF THE SYSTEM. KILL IS A PRIVELEGED COMMAND. SYNTAX: KILL USER_ID 'LEN.HF :w LEN(STR_VAR) TO RETURN THE VALUE EQUAL TO THE NUMBER OF CHARACTERS CURRENTLY ASSIGNED TO STRING VARIABLE 'STR_VAR'. 'LET.HF g/ LET TO EVALUATE AN EXPRESSION AND ASSIGN THE RESULT TO A VARIABLE. SYNTAX: LET VARIABLE = EXPRESSION 'LEVEL.HF5 LEVEL TO DISPLAY OR SET THE PRIORITY CONSTANT FOR ANY USER. SYNTAX: LEVEL [ USER_ID ] [ N ] WHERE N IS IN THE RANGE 1 THROUGH 49. ANY USER MAY ISSUE THE LEVEL COMMAND WITHOUT ARGUMENTS TO DETERMINE HIS/HER OWN VALUE OF N. ONLY THE SYSTEM OPERATO+R MAY SET N OR DISPLAY N FOR ANOTHER USER. 'LIBRARY.HF5 &ILIBRARY TO DISPLAY THE FILENAMES IN DIRECTORY BASIC.DR SYNTAX: LIBRARY 'LIST.HFf&- LIST TO OUTPUT PART OR ALL OF YOUR CURRENT PROGRAM IN ASCII FORMAT TO THE DISK FILE OR DEVICE SPECIFIED BY "FILENAME", OR TO YOUR TERMINAL IF "FILENAME" IS NOT SPECIFIED. [ LINE_NUMBER_1 ] [ TO LINE_NUMBER_2 ] SYNTAX: LIST |^[ LINE_NUMBER_1 TO LINE_NUMBER_2 ] [ "FILENAME" ] [ , LINE_NUMBER_2 ] [ LINE_NUMBER_1 , LINE_NUMBER_2 ] 'LOAD.HFg  LOAD TO MOVE A PROGRAM THAT WAS PREVIOUSLY CREATED BY A SAVE COMMAND INTO YOUR WORKING STORAGE AREA FROM THE DISK FILE OR DEVICE SPECIFIED BY "FILENAME". SYNTAX: LOAD "FILENAME" 'LOG.HF 1l! LOG(EXP) TO CALCULATE THE NATURAL LOGARITHM OF EXP, WHERE EXP IS ANY VALID POSITIVE NUMERIC EXPRESSION. 'LREAD.HF ? LREAD TO READ A STRING FROM THE TERMINAL, OR TO READ A STRING IN BINARY FORMAT FROM A SEQUENTIAL OR RANDOM FILE, TERMINATED BY EITHER A NULL, FORM-FEED, OR NEW-LINE. SYNTAX: LREAD [ PROMP_STRING , ] STRING_VAR [ , STRING_VAR ] OR LREAD FILE(FILE_NO .\[ ,RECORD_NO ] ), STRING_VAR [ , STRING_VAR ] 'LWRITE.HF  LWRITE TO WRITE A STRING TO YOUR TERMINAL, OR TO WRITE A STRING IN BINARY FORMAT TO A SEQUENTIAL OR RANDOM FILE, TERMINATED BY EITHER A NULL, FORM-FEED, OR NEW-LINE. SYNTAX: LWRITE STRING_EXP [ , STRING_EXP ] OR LWRITE FILE(FILE_NO [ ,RECORD_NO ] ), STRING_EXP [ , STRING_EXP ] 'MAT.HFf4_ MAT BASIC ALLOWS THE FOLLOWING TYPES OF OPERATIONS ON MATRICES: 1. ARITHMETIC OPERATIONS OF ADDITION, SUBTRACTION, ASSIGNMENT AND MULTIPLICATION. + SYNTAX: MAT MATRIX_VAR_1 = MATRIX_VAR_2 [[ - ] MATRIX_VAR_3 ] ( NUMERIC_EXP ) * >&MATRIX_VAR_2 2. MATRIX FUNCTIONS FOR TRANSPOSITION, INVERSION AND INITIALIZATION. FOR INFORMATION ABOUT THESE FUNCTIONS, TYPE 'HELP "MAT_FUNCTIONS"'. 3. ALL I/O OPERATIONS (INPUT, PRINT, READ, TINPUT AND WRITE) MAY ALSO BE APPLIED TO MATRIC?ES BY INSERTING THE KEYWORD 'MAT' INTO THE I/O STATEMENT. INPUT AND OUTPUT OF ENTIRE MATRICES IS DONE ROW BY ROW. MATRICES CAN BE DIMENSIONED DURING AN INPUT OPERATION BY SPECIFYING A ROW AND (OPTIONALLY) A COLUMN ALONG WITH THE MATRIX VARIA/ BLE. READ [ FILE (FILE_NO [ ,RECORD ]) , ] INPUT [ FILE (FILE_NO [ ,RECORD ]) , ] [[ MVAR [(ROW,COL)] ,...] SYNTAX: MAT TINPUT [ (LINE_NO [ ,TIME ]), [ PROMPT, ] PRINT [ FILE (FILE_NO [ ,RECORD ]), ] [ MVAR [[, OR ;] MVAR ]...] A WRITE FILE (FILE_NO [ ,RECORD ]), [ MVAR [ , MVAR ]...] 'MATFUNCS.HF5 MATRIX THE FOLLOWING FUNCTIONS ARE USED TO PERFORM MATRIX FUNCTIONS INVERSION AND TRANSPOSITION: MAT MATRIX_VAR_1 = INV( MATRIX_VAR_2 ) MAT MATRIX_VAR_1 = TRN( MATRIX_VAR_2 ) THE FOLLOWING FUNCTIONS ARE USED TO INITIALIZE A MATRIX TO ALL ZEROES,P ALL ONES OR THE IDENTITY MATRIX AND (OPTIONALLLY) TO PROVIDE ITS DIMENSIONS: MAT MATRIX_VAR_1 = ZER [ (ROW,COLUMN) ] MAT MATRIX_VAR_1 = CON [ (ROW,COLUMN) ] MAT MATRIX_VAR_1 = IDN [ (ROW,COLUMN) ] 'MAX.HF4rMAX TO ESTABLISH A LIMIT FOR THE NUMBER OF ACTIVE USERS. SYNTAX: MAX [ = VALUE ] WHERE VALUE IS AN INTEGER IN THE RANGE 0 THROUGH 33. IF NO ARGUMENT IS SPECIFIED THEN THE CURRENT VALUE OF MAX WILL BE DISPLAYED. MAX IS A PRIVELEGED COMMAND. 'MSG.HF5 dA MSG TO TRANSMIT A MESSAGE FROM YOUR TERMINAL TO ANOTHER PROGRAMMER OR TO THE SYSTEM OPERATOR. SYNTAX: MSG [ USER_ID MESSAGE ] THE MSG COMMAND (WITH NO ARGUMENTS) MAY ALSO BE USED TO ALLOW OTHER USERS TO SEND MESSAGES TO YOU. TO PREVENT OTHER USERS FOROM SENDING YOU MESSAGES, USE THE CHAR COMMAND WITH THE 'NRM' CHARACTERISTIC. 'NEW.HFf1 NEW TO CLEAR THE PROGRAM AND DATA STORAGE AREAS, CLOSE ANY OPEN FILES, AND OPTIONALLY 'ENTER' A NEW PROGRAM FROM THE FILE OR DEVICE SPECIFIED BY "FILENAME". SYNTAX: NEW [ "FILENAME" ] 'ON.HF  ON TO TRANSFER CONTROL TO ONE OF SEVERAL STATEMENTS IN A PROGRAM DEPENDING ON THE COMPUTED VALUE OF AN EXPRESSION. [ GOTO ] SYNTAX: ON NUMERIC_EXPRESSION [ GOSUB ] LINE_NUMBER [[ ,LINE_NUMBER ]...] #ONERR.HF{ ,ON ERR TO DIRECT YOUR PROGRAM TO AN ERROR HANDLING ROUTINE BEGINNING AT LINE_NUMBER INSTEAD OF THE BASIC SYSTEM ERROR HANDLER WHENEVER AN ERROR IS ENCOUNTERED OR TO EXECUTE A BASIC STATEMENT. [THEN] STATEMENT SYNTAX: ON ERR THEN LINE_NUMBER SyWHERE: STATEMENT IS ANY BASIC STATEMENT EXCEPT FOR, NEXT DEF, END, DATA OR REM. 'ONESC.HF{ 'NON ESC TO DIRECT YOUR PROGRAM TO AN ESCAPE HANDLING ROUTINE WHENEVER THE TERMINAL ESCAPE SEQUENCE IS DETECTED, INSTEAD OF THE BASIC SYSTEM ESCAPE HANDLER OR TO EXECUTE A BASIC STATEMENT. [THEN] STATEMENT SYNTAX: ON ESC THEN LINE_NUMBER WHERE: L6STATEMENT IS ANY BASIC STATEMENT EXCEPT FOR, NEXT, DEF, END, DATA OR REM. 'OPEN.HF{ -$ OPEN TO ASSIGN A FILE NUMBER AND ACCESS MODE TO 'FILENAME' FOR FUTURE REFERENCING IN FILE I/O STATEMENTS IN YOUR PROGRAM. SYNTAX: OPEN FILE (FILE_NO,MODE), "FILENAME" [ ,LOGICAL_RECORD_LENGTH ] WHERE FILE_NO IS A NUMERIC EXPRESSION IN THE RANGE 0 TO 72L, AND MODE IS A NUMERIC EXPRESSION IN THE RANGE 0 TO 3. THE MODES ARE: 0: OPENS AN EXISTING FILE (CREATES A NEW FILE IF NON-EXISTANT) FOR INPUT AND/OR OUTPUT WITH A DEFAULT LOGICAL RECORD LENGTH OF 128 BYTES. 1: EXCLUSIVELY OPENS A NEW FILǮE (DELETES OLD FILE IF EXISTANT). 2: EXCLUSIVELY OPENS AN EXISTING FILE (CREATES A NEW FILE IF NON-EXISTANT) FOR APPENDING. 3: OPENS AN EXISTING FILE (ERROR IF NON-EXISTANT) FOR INPUT ONLY. 'OPERCMNDS.HF4n OPERATOR SYSTEM COMMANDS THE FOLLOWING RDOS SYSTEM COMMANDS ARE AVAILABLE FROM THE SYSTEM CONSOLE: INIT - TO INITIALIZE A DIRECTORY OR DEVICE RELEASE - TO RELEASE A DIRECTORY OR DEVICE CPART - TO CREATE A SECONDARY PARTITION CDIR - TO CREAڈTE A SECONDARY DIRECTORY INIT NAME RELEASE NAME SYNTAX: CPART NAME , SIZE CDIR NAME WHERE NAME IS A STRING_VARIABLE OR STRING_LITERAL CONTAINING THE DIRECTORY OR DEVICE NAME, AND SIZE IS AN INTEGER VALUE. 'OPERMSGS.HF5 4o OPERATOR MESSAGE COMMANDS THE FOLLOWING COMMANDS FOR SENDING MESSAGES ARE AVAILABLE FROM THE SYSTEM CONSOLE: ALL - TO TRANSMIT A MESSAGE TO ALL ACTIVE USERS WHO HAVE NOT SET THE 'NRM' CHARACTERISTIC. FALL - FORCES THE TRANSMISSION OF A MESSAGEi TO ALL ACTIVE USERS WHETHER OR NOT 'NRM' IS SET. FMSG - FORCES THE TRANSMISSION OF A MESSAGE TO A SPECIFIC USER. ALL MESSAGE SYNTAX: FALL MESSAGE FMSG USER_ID MESSAGE 'ORD.HF<%|0ORD(STRING_EXP) TO RETURN THE ORDINAL POSITION IN THE ASCII COLLATING SEQUENCE OF THE SINGLE-CHARACTER STRING_EXPRESSION. 'PAGE.HFg )S PAGE TO SET THE RIGHT MARGIN OF YOUR TERMINAL. (THE DEFAULT PAGE WIDTH IS 80.) SYNTAX: PAGE = NUMERIC_EXPRESSION WHERE NUMERIC_EXPRESSION MUST BE A VALUE BETWEEN 8 AND 255, AND GREATER THAN OR EQUAL TO THE CURRENT TAB SETTING. 'POS.HFU POS([ STR_VAR_1 ] , [ STR_VAR_2 ] , NUMERIC_EXPRESSION) [ STR_LIT_1 ] [ STR_LIT_2 ] TO DETERMINE THE POSITION OF A SUBSTRING (STR_VAR_2 OR STR_LIT_2) IN A STRING (STR_VAR_1 OR STR_LIT_1) BEGINNING AT THE POSITION GIVEN BY NUMERIC_EXPRESION. =THE VALUE OF NUMERIC EXPRESSION MUST BE GREATER THAN ZERO. 'PRINT.HF 2" PRINT TO PERFORM ONE OF THE FOLLOWING PRINT OPERATIONS AT YOUR TERMINAL OR TO A FILE: 1. PRINT THE RESULT OF A COMPUTATION. 2. PRINT THE CHARACTERS IN A STRING VARIABLE OR STRING LITERAL. 3. PRINT A COMBINATION OF OPERATIONS 1 AND 2. 4. PRINT A BLANK LINE (SKIP A LINE). SYNTAX: PRINT [ PRINT_EXP_LIST ] OR PRINT FILE(FILE_NO[ ,RECORD_NO ]), [ PRINT_EXP_LIST ] WHERE PRINT_EXP_LIST IS: [ EXPRESSION ] EXPRESSION [ STRING_VAR ] [[ SEPARATOR STRING_VAR ]...] [ SEPARATOR ] [ STRINGJȱ_LIT ] STRING_LIT AND SEPARATOR IS A COMMA OR SEMI-COLON. 'PRINTUSING.HF4 4;PRINT_USING TO OUTPUT THE VALUES OF THE EXPRESSIONS IN THE STATEMENT TO EITHER THE TERMINAL OR A FILE USING THE SPECIFIED FORMAT. SYNTAX: PRINT USING FORMAT, PRINT_EXPRESSION_LIST OR PRINT FILE (FILE_NO [,RECORD_NO]), USING FORMAT, PRINT_EXPRESSION_LIST WHERE: FORMAT IS A STRING_VARIABLE OR STRING_LITERAL CONTAINING THE DESIRED FORMAT MASK AND PRINT_EXPRESSION_LIST IS THE SAME AS FOR THE PRINT STATEMENT. 'PUNCH.HF4fPUNCH TO OUTPUT ALL OR PART OF THE CURRENT PROGRAM IN ASCII TO THE TERMINAL PUNCH. [ LINE_NUMBER_1 ] [ TO LINE_NUMBER_2 ] SYNTAX: PUNCH [ , LINE_NUMBER_2 ] [ LINE_NUMBER_1 TO LINE_NUMBER_2 ] [ LINE_NUMBER_1 , LINE_NUMBER_2 ] 'RANDOMIZE.HFq RANDOMIZE TO CAUSE THE RANDOM NUMBER GENERATOR TO START AT A DIFFERENT POINT IN THE SEQUENCE OF RANDOM NUMBERS GENERATED BY THE RND FUNCTION. SYNTAX: RANDOMIZE 'READ.HFg -G READ TO READ VALUES FROM THE DATA LIST (DATA STATEMENTS) AND ASSIGN THEM TO THE VARIABLE(S) IN THE READ STATEMENT; OR TO READ DATA IN BINARY FORMAT FROM A DISK FILE OR A DEVICE. SYNTAX: READ VARIABLE [[ , VARIABLE ]...] OR READ FILE (FILE_NO [ ,RECOR&D_NO ]), VARIABLE [[ , VARIABLE ]...] 'REM.HF H REM TO INSERT COMMENTS WITHIN A PROGRAM. SYNTAX: REM [ MESSAGE TEXT ] 'RENAME.HFZ RENAME TO RENAME A FILE IN YOUR DIRECTORY. SYNTAX: RENAME "OLDFILENAME" , "NEWFILENAME" 'RENUMBER.HF{ 5 RENUMBER TO RENUMBER THE STATEMENTS IN THE CURRENT PROGRAM. THE FIRST LINE OF THE PROGRAM IN NUMBERED INITIAL_LINE_NUMBER AND EACH STATEMENT AFTER IT IS INCREMENTED BY INCREMENT_VALUE. THE DEFAULT VALUE FOR INITIAL_LINE_NUMBER IS 10. IF NO VALyUE FOR INCREMENT_VALUE IS GIVEN, THEN THEN THE VALUE OF INTIAL_LINE_NUMBER IS USED FOR INCREMENT_VALUE. [ INITIAL_LINE_NUMBER ] [ STEP INCREMENT_VALUE ] SYNTAX: RENUMBER [ , INCREMENT_VALUE ] [ INITIAL_LINE_NUMBER STEP INCREMENT_VALUE 3G] [ INITIAL_LINE_NUMBER , INCREMENT_VALUE ] 'RESET.HF9aO RESET TO POSITION THE FILE POINTER TO THE BEGINNING OF A FILE. SYNTAX: RESET [ FILE(FILE_NO) ] 'RESTORE.HFg P RESTORE TO RESET THE POSITION OF THE DATA ELEMENT POINTER IN THE DATA_LIST (THE COLLECTION OF ALL DATA VALUES IN THE PROGRAM DATA STATEMENTS). IF THE OPTIONAL LINE_NUMBER ARGUMENT IS USED, THEN THE POINTER IS POSITIONED TO THE FIRST DATA VALUE OF THAT STATEMENT. IF LINE_NUMBER IS NOT USED, THE POINTER IS POSITIONED TO THE FIRST DATA VALUE OF THE FIRST DATA STATEMENT IN THE PROGRAM. SYNTAX: RESTORE [ LINE_NUMBER ] 'RETRY.HF,T  RETRY TO REPEAT THE EXECUTION OF A STATEMENT WHICH CAUSED AN ERROR. SYNTAX: RETRY 'RND.HFo RND(EXP) TO PRODUCE A PSUEDO-RANDOM NUMBER THAT IS GREATER THAN OR EQUAL TO ZERO AND LESS THAN ONE. A NUMERIC EXPRESSION IS REQUIRED AS AN ARGUMENT, BUT IT IS NOT USED. THE PSEUDO- RANDOM NUMBERS ARE GENERATED IN A FIXED SEQUENCE UNTIL A RANDOMIZE+3 STATEMENT IS EXECUTED. 'RUN.HFg  RUN TO EXECUTE THE CURRENT PROGRAM EITHER FROM THE FIRST LINE OR FROM A SPECIFIED LINE NUMBER; OR TO EXECUTE A SAVED PROGRAM, SPECIFIED BY "FILENAME", FROM THE FIRST LINE. SYNTAX: RUN ([ LINE_NUMBER ] ) [ "FILENAME" ] 'SAVE.HFg \z SAVE TO WRITE THE CURRENT PROGRAM TO A DISK FILE OR TO A DEVICE SPECIFIED BY "FILENAME" IN BINARY FORMAT. SYNTAX: SAVE "FILENAME" 'SGN.HFg #ٯ> SGN(EXP) TO RETURN A VALUE WHICH REPRESENTS THE ALGEBRAIC SIGN OF EXP, WHERE EXP IS ANY VALID NUMERIC EXPRESSION. THE VALUE RETURNED IS: 1 IF EXP IS POSITIVE 0 IF EXP IS ZERO -1 IF EXP IS NEGATIVE 'SHARECMNDS.HF5  SHARE COMMANDS THE FOLLOWING COMMANDS MAY BE USED INSTEAD OF THE CHATR COMMAND TO ADD/REMOVE THE SHARE ATTRIBUTE TO/FROM A FILE. SYNTAX: SHARE "FILENAME" AND UNSHARE "FILENAME" 'SIN.HFr SIN(EXP) TO CALCULATE THE SINE OF AN ANGLE WHICH IS EXPRESSED IN RADIANS. EXP IS ANY VALID NUMERIC EXPRESSION. 'SIZE.HFKSL SIZE TO DISPLAY THE CURRENT PROGRAM AND DATA STORAGE USAGE. SYNTAX: SIZE 'SPOS.HF88 SPOS TO MOVE THE FILE POINTER TO THE BYTE POSITION SPECIFIED BY THE NUMERIC EXPRESSION. SYNTAX: SPOS FILE(FILE_NO) , NUMERIC_EXPRESSION 'SQR.HF cU SQR(EXP) TO COMPUTE THE SQUARE ROOT OF EXP, WHERE EXP IS ANY VALID POSITIVE NUMERIC EXPRESSION. 'STOP.HFk=Q STOP TO TERMINATE EXECUTION OF THE CURRENT PROGRAM AND RETURN CONTROL TO INTERACTIVE MODE. SYNTAX: STOP 'STR.HF < STR$(EXP) TO CONVERT THE NUMERIC VALUE OF EXP TO A STRING. 'SYS.HF5 :l SYS(EXP) TO RETURN SYSTEM INFORMATION BASED ON THE VALUE OF EXP. EXP IS ANY VALID NUMERIC EXPRESSION WHICH EVALUATES TO AN INTEGER BETWEEN 0 AND 19. THE SYSTEM FUNCTIONS ARE DEFINED AS FOLLOWS: 0 - SECONDS PAST MIDNIGHT 10 - TAB SIZE 1 - DAY O7F THE MONTH 11 - HOURS (CURRENT TIME) 2 - MONTH OF THE YEAR 12 - MINUTES (CURRENT TIME) 3 - THE CURRENT YEAR 13 - SECONDS (CURRENT TIME) 4 - TERMINAL PORT NUMBER 14 - SECONDS OF TIMED INPUT 5 - CPU TIME (IN SECONDS) 15 - PI (3.14159) 6n - FILE I/O USAGE COUNT 16 - E (2.71828) 7 - LAST ERROR CODE 17 - 1/10 SECOND CLOCK 8 - LAST FILE NUMBER USED 18 - TOTAL BASIC I/O CALLS 9 - PAGE SIZE 19 - LAST ERROR LINE NUMBER 'TAB.HF G TAB(EXP) TO MOVE THE PRINT POSITION TO THE COLUMN NUMBER GIVEN BY EXP. EXP IS ANY VALID NUMERIC EXPRESSION WHICH WHEN EVALUATED IS TRUNCATED TO GIVE AN INTEGER RESULT. 'TABSET.HF4 .TAB_SET TO SET THE ZONE SPACING BETWEEN THE DATA OUTPUT BY A PRINT STATEMENT. ( THE DEFAULT VALUE IS 14. ) SYNTAX: TAB = NUMERIC_EXPRESSION WHERE: THE VALUE OF THE NUMERIC EXPRESSION MUST BE IN THE RANGE 1 <= NUMERIC_EXPRESSION <= PAGE WIDTH.. 'TAN.HF 'uE TAN(EXP) TO CALCULATE THE TANGENT OF AN ANGLE WHICH IS EXPRESSED IN RADIANS. EXP IS ANY VALID NUMERIC EXPRESSION. 'TIME.HF TIME TO ESTABLISH THE TIME LIMIT FOR TIMED INPUT (TINPUT) OPERATION. SYNTAX: TIME = NUMERIC_EXPRESSION WHERE: NUMERIC_EXPRESSION REPRESENTS TIME IN SECONDS. 'TINPUT.HFg ,e TINPUT TO ASSIGN, WITHIN A PRESCRIBED PERIOD OF TIME, THE VALUES SUPPLIED BY INPUT FROM THE TERMINAL TO A LIST OF VARIABLES. IF LINE_NUMBER IS USED, THE PROGRAM WILL BRANCH TO THE LINE SPECIFIED WHEN TIME HAS ELAPSED. IF LINE_NUMBER IS NOT SPECIFIED, AN ERROR RESULTS WHEN TIME HAS ELAPSED. THE VALUE OF SYS(14) IS USED IF TIME IS NOT SPECIFIED. SYNTAX: TINPUT [ (LINE_NUMBER [ ,TIME ]), ] [ PROMPT, ] VARIABLE_LIST 'USERS.HF4#fUSERS TO PRINT A STATUS REPORT, ON THE SYSTEM CONSOLE, OF ALL ACTIVE USERS OR IF AN ARGUMENT IS SPECIFIED, ONLY A SINGLE USER. USERS IS A PRIVELEGED COMMAND. SYNTAX: USERS [ USER_ID ] 'VAL.HFg 4n  VAL([STR_VAR]) TO CONVERT THE STRING VALUE (STR_VAR OR STR_LIT) TO ITS NUMERIC [STR_LIT] REPRESENTATION. 'WHATS.HF44M6WHATS TO DETERMINE THE STATUS OF A SPECIFIED FILE. SYNTAX: WHATS "FILENAME" 'WRITE.HF:Ke WRITE TO WRITE A RECORD OF DATA IN BINARY FORMAT INTO A SEQUENTIAL OR RANDOM FILE. SYNTAX: WRITE FILE(FILE_NO [ ,RECORD_NO]), EXPRESSION [[ , EXPRESSION ]...] BASICA.LB1H  at$I$IDIGY:N:MZ:LSIU@`@CH@CG5UZNnKS࡝\LAaNP.ƞa這lllۘ]ɳRRYR R郒×7qSyWElllκxcÓ5NosF#zhQ(c냒Q(sÃQ(lllmcCNac8ՒCABxFnC}yccc룔UxlllZsC`=c[cc#wDRǣ=c}lll?ǣ?d_ ;qc= ״ACK~V<KC?cQlllA엳_KQ^\nXR\n9 R#QQQQxRlllۅFQEbcDcDcLCCSxTZݺt`nպ##bmAlllܔcU<cBC?#:+%=D$$8K'?# ? :C0p"JD'l;^F+PKQ( g t3tKO ( D[T!J J 8ssar@-}@l[l';cb4@I S8T C2@D@rDPZDr `h@bGb'l;hpI!+@D D@0A \HP+$c(D$b'E~ C&  /H+8D$#+).,.@ 9bGĜظŚ+8[(. 9+X/S8D$ò1u ++(K2(K2H+@Ed$K?)bG6$I$,Ig!hqex9$I,Y$I9<dI$I$ɫ&9),37>D9'GMR,K3n$\99rT[04Pr<X% Xb8M cX V(h84  GllǸ  4HSPhXh1X3P0n 3011XXbWM3P1h 3018J0m1X\(w8R3[$bw}&3PZ0:P $V83w8R#2)D4Q0 V o "w8RR0V 6 [l'$BPP+7 0\(JB}[8'bPw8R33 K !( 1 1 G8^3P! 30 11X, \0ZTGb'lN( 11X h @ 11X X;=z0 H 6 18c  X( D$'Nʈ  r$C0 ['bc)m2=2 Y271X h03Pb[l ɤ Ph4   3( 018\0D88QѲ"2 > !9 29 G$'Y 2X   2 6 D$$k1 ([]1\1PX'$3S8##+@#2@D+8 ! d1DX1X8X$8t#J0 !"<@K11 K$ےPu|"=xol() XbͫY(HʀH1X (# d[''" (181111X3P1" 30 Jr$ 6)HlGb7Lh @ @ h( 6 ( 6 lEsZ1X3P0 30 144 (GDl}8h1 m6J %LJ X n Db;b;v$!J "9 2H/@  C 2( b[l۪ C /( ^ !P n  XW0 0DllAʥ+@C + C {dJ  b[2:$OJ F, ! PNUOLKCDEB YD$$HPORETARO ! )!0!v Xb'` 0$"$Jp* 1u '<Ei@2lIĒqE QIA1B*! D$%1  9 9 H 1@X$l/N0!9 J u !A D$T)"K,) %Jk8S3S 1G;$:f0"!!k0ZiZ*!0D$$uJ *!Jk8#PBy1X$;#]1] 1HY9z3B+ ?l[$b'&19 W0 0 I!95+z3 G$88q??9 TQ:YXXT  ( bG~MԆX 85+ 5KB# D$$[ g OCYPIRHG TC( )ADATG D$$EiNERELAC ROOPARITNO1 79,39147D$$F~w1,79591671,79,79187 LA LIRD$$ÅHGSTR SEREjEVDILECSNDEM TARED$$崓AI-LRPPOREYTO FADATG NERELAD$ݡC ROOPARITNO gK _TZH鄌`gKlll$Q(Q(cBxyRǣ=c}"lllF3ǣ?ǣc^_yXRZ cDcDc`cBcC#zlcCNCCccH#7q냀KD$PPPg18#c) `18 Dd;3u`1U!( S  %8#@ =$Xb'O;#*L1" H H  (8P ; D@* ? $ $ )    &   [ؚv8 (1! P@$   lG;;T=F8 C# + 8 3 KGl +T1( !   Q0&X%  P X$$bb1YS.SRD    6_1`nIXH+bj_K4`nlllBFfQ(yc룔cxCxsClllۮc[CEgZc#wR[AYAYAq_y0RxQ \lllۢy郙cDFcTZmncB_p (0 ? ' _,ՒAHRHJ(Iڑi9@? @? N=K@? CoxgZ8b h8baRD@` b`( G( 0 NXM &8XQ[l'lǔY(0 RƔ H (!  L['FoNXK  P 4!  + D* J "( J'( lG$$1; @ ` P [ (l[b'$9q,0 H0 @1! 0D83<>NXK  !`C H (D;ɷ JNXK  o@ @8 X$$N  +    PP[bc( 8 J 0 0"@A(90PbGǍ*&@0J@029(PAH#0PPX8l+jU46P)(9jNXM @b[8BBH 82X (    0 l['b'ƽP (   0J5% 0PG$l'ܪ^8J:JB2 L3@2Hl[llUl!02(2 3L 01P03P!01(1[f{z 3 _SxHTS{SxlllۇQ(c냒sÃsCQGRClllox Q RQQQcxPTZ``S = y  9+D$8  KP+ J3( l[ۜ$F( f0 0  ?)3`PPD$x* 9)  0G'H-8 9(3  ,u!(D($FZ "()D$%hjT*+&,-."/D($gb;<%=%>%[]^E$$yjp #,MD8qz~P @  (G88wH ( 0 ( (bG$س0  P(  P!X؜8@P)H@-  D'   ,TG$  @(Q P 9A"I$$TJ93DĽ9; P@(3 ' (3D8DCRIyELNzurRTND$${NIV|EZR~DIN}OCN2SED$$CSECRER=ATBATBD$$TSPEHTNEURNILTS!ISEZD$$ IDKSAENWBYBECASEVOLD$$^DA"DGRIFPONE,IFEL<APEG9D$$ITEM4CEOH-EHPL5NITI#ACDRD$$`q"S*HSRAEONSMGSURESD$$})0NEBAELELEVL:EDALYKOGUSD$$]>BRERUTNR;@ITPNTU[@NIUPT\@D$$LRPNIT%@RLAED&@WLIRETDNEETD$$LZREHCIANGLCSOE^@RWTIE@D$$xhEDELET?ERANEMSUNIGUPCN9D$$DvHHWTAS8HCTAR7RESAE3D$$ONCEOH1ONSEC0PCRAT'@ERESD$$}RT/ERRTY+NUHSRAEIDASLBD$$EZERTSROEERUNBMREILRBD$$RAY6ERELSAEI@ARDNMOZIE _$I$I$It@C)I<Usg"* "*D'0  IoSwn@AR _\HR@7u`si뀃mZ뀀\lll Qlx\CǣK$u7hmXǬ8PX38S 8`10 D#8G8.Z8Z8Z8Z 8 Z 8 Z8 Z 8G8ǁ Z8 Z8Z8Z8Z8Z8Z 8G$l^*Z8Z:SX8X0Pl[Ǣ8c8X8X<X3 8`10E:X8,FX:X:X:X : X : X :X :X8T X :X:X:X:X:X:X:6Xllb X:X08X8\X<Xb[Jp802P _تкTH'к@lcx RD$$t!)!) ! )PD$$!)_x XG>9   !(AD$$*} ^D$$8 PCQSD$%h8FHTNUNV#/D%$T0 #D$$nb a$D$%p# H$Dt~#"DD$ӌD$$N H$Dh666E$(#6E6D(% |H%$~EE6B,6D$(vJ D($$~73MD%DWE$(E W3233D$%==x?J?K%D%$@&?BBBAWBD$$n4 D($RB H%$&PE$$,^ QQD(%"lNBTH%$wz*WBV!D$$(f@\D$$ΖB_!`B_B_H$$(!{azc!D$$|f}f~D$$i[o;Bt]mCwD%Dd\Bw^E!lED(7$EBnErD($^FrrD%$cp pEE$(4!Bz!xD$% ~ ~ \~D$$G"{E@E$(0*ED(%R>*@*D%$LEWWED( ZEED(%gh@ B$EH$DZ_v@*“E@E$$W–EWD$%2˒=(D%$LWD$$.b1¢ѢD$$<@NnpmD%$֓x2w2 @D$(Ѣy2WD$$6¢R@@H%$x_WWD$$BD$%-  D%$.  J ED$B,**10D$$:xw2,H$D\-H-D$$(V10D$$0dwBx2?!4?D$$r@"AB#BC"D"D$$b̀E-FB&G*#"8D$$\ێ!$B,*"+"D$$PkD$$>kD$$ IJP KP D$ʒ$L1M9N@ORD$$~,WRXWY{Z[D$$\^]D$$H;%„&'+(D$$y)."/0$>D$$ "<=9:D$$w 76"5"34D$$(12-B#,D$}6"!R _ BASICB.LB, K(JITth;`Kjy@U/5lllJFPIKѣ8b Q C}[UÏMxlll%#buǣ??YAyаHT|JŃ]Yc@yc8Zilll^WՒCA\KBxFn}cxCxc룔uNSinZ:ctlll۵VT[CEQ[FCzzD{CCccNcR[AlllSBIc}Zǣ=ZCCYA?cFTCd_ǣpqlllۢTbKZCKǣ8TcQ_K9En R Rlll^c룙\n_yXR0RRQxxQc#QQlllۘQZ y+b郙cDcaN_paNcDTZSpzlllWnzcgKĎb__CŃN̳xcnCnccBL_ÎlllkSQ3)P h8[l;8^3# ? g o p ) P)@X؃l'P8) QC3[ K '0_(  D-$0z JH.FB:SACIEHPL:!Xlla(T OAT O(T O T X8l;IĖ ; 18>8!T yT l[llێPVT +T T  T Ol[lLT OT k T wsT L83D8b;e" 83"  T 1Dl'l۴U1 T T 4T kl[l&3.T T 8P T l[ąkMT k-@\ ; 'P8ޟ3 Gl;V _0V )HXX ; @Hl Xb'0  ;   X > b[;b2H800  ;  3 0 H1X$"ID" -H)0 1VWY[\gGbے208 U8X-8b Y 011b[l;Mw> (X8 ! 8S0SS'' L 1 1 @Qa h Dlǜ8gCZ QQa U0( P-8Y0 e0h D$4h J#8ޟ3  P'X[lYv)@3 [ '8KK2KXl'-3KK''8) e 8j0 Z0X՘  _pZx$(ID}c bL@CF VFWƠJI "L )# N~递y`c  O'DQHRHQR<;cLLLc@N@Njcc뀀cc렏cuctBgc wc뀒DHHRc8cCcD cD gc` c c렙 c=c?cc cBc@hxlll}#\n#7qx#bmǣLglllBNm#MFfucQ(PO-hclllGERǣ=C}ǣ?ܩs?q״ACKǣQ_KXRRlll۝h\n0R9_y^ RQxxQCvc(xlllP(HFTZnzzCzn_z#nn$#zlllA_nCCc#MzVcaâD!b`b#li냃mZÔ냀K$$I$IANRp Z$$I$I3@*3G}1jL'($1G8ˣ`*LJ``*J`D'' 0#)*J)B0)"S)ZbG8;X3 0 ;8P_X^ H8 Xb86*M3 ? *8 ]( 2 1N 4 lG';78 ]3 0 ]7P_X\ 8##X$|IF!C [T3 ?[_X\ 8;P0Xb؟T";0[S_X\ 0- * [%D̐Vb  [$! <1  8&3J'X$'3~T3## ?1.1/  D$آ,*A0 P!S%3W#DĒЇ%S0! 9 [ ! 1Db' 0 $ 9  'UbH@KDl:$! ,8  (+! ! DL3'0B! 9  , >P!0lS$b 9 >0 XFJ 8T3## ?LGlǒ$Z!K DE8##/(T3 ? 9D$*J*J DC0!*!Db;b80#*!J=_X\ 8%C4  b[;,[_X\ 8#3!S_X\ 8#3!;DC 1 8!3UP!SU0 [[[؜8Cm$P(P3 (2( (['$32  ǐ*B "BD$$?d@"BJ ;XD$$pN#D$b;\B;#B;_X^ bGLbq/j@HP( P(  [l[ex]] _X^ @HPL[b8R( (P (J]0X'g 0]J ;XSDb'5;Z@XHYPX#J@0R"DĜ;?JK RJ 8# J0RBDa 8Z X(Y01N l[81:SZ@XHYPX0R"JK RZ lGbے87 Z X(Y0_X\ D 8I3 :1lGl'80PP(G0P3PF"GPPD'WPP1@$!L@J3 #G$8OP!)9 @@) @D8lǡe)5@.*@6@* @[?l['h* 8BQ ? D8$.? K 8T3  ?TC bG$b/< - 8!  DV !@Kb[bl_K'_X^ @0J*hI27 J*JJ*HG8sYJP) A H # (lGh.[g! ]_X^ @0I*J2 @7 b[؜Ku I*HIJ" H"(  D${` $I@g!ANL!!Jb& _cFH#ݰz c`Glllۃ Qc냒Q(ݺDǣc[Rǣ=ǣ??WǣQ RllxgQQQQQ_ɳc룏#b[Z60 * :  J~! | *:D88o Bv!(Y ( q8X$b''+i1 j1 3( + 3D؜8cW* 3 So W!8wQ +b['L8  0r9 "( X:n1 D'$FXFTP@!h1 0 L [!0D'$T E83u)8 E = b 9XbdFb M! ` "  "  P:0D;۫@p  " *  8*7! D8LC~;!/) q :D8'p? "P B!: 7! BX8$ۚ0! !  ,/*Y D#@QX,d  \h_l p \ vD$b;4 !P:!( : ZXJ Z@1D _:JgN(I$I Iz-R@ Dm^bF[.L4cFgĎb8gKgNlll۪TcCQ U][PaQ(c냒bc8ycclllBUxctQÔzCz`=c[RQ lllۡMǣ=cǣ??YAWYAc= KC?c?r*h<XR5Rlllc룙0R_y Rc#QQQQycD(TZ#blll%o\CxÎ_c#b#zhURCO_nCCcllY#MzDaգ#7qi냃mZÔ냀Kvs[b WXV M @L0$""08L0&*$" G'$A04"(31 L0&*G'i&JA0";(L0&"P$BXl*A(PMHO  0 MM0A8DlbI`8PL8#$S 0MPU@ H8 ( Gb82 F1K UF X P  0 08DتT  X @P   8 50K $YDظbD  @@F > XĒĹp0 G 0 (P Gے~ PP+(0 0G8 b[;ؿ=P0C B ?Z R 0P>8J#PJCX$؏M   +( @ G$@ @PX@ 8"#@[؜UM%(G0P0B ?- H  D8%.  H>8J3PҐJS[;K0G82 P0   PX;KA PR ,8 < D;8I >8J#RJCt !(lGb'8r < #7( #(( < -1K [b; WXT O S=!X(@7H8>XJ3  l[8ۧPP@3GP!8 S  I H(( bGl;b;L&(P0 ?'< S40< 1K 10K G$ɹ4  @O  0ّ ^ M+(D\>BPX0G8ݿ PP0C B ? [$lPR 8 !PR < WXT 8 [l$y^M- S=9 :XM382 8S:8l[$hlS>0( B7 BWXT ! C 9D8,'z#PCR  ?< SD$$ZDuTP T T""T##L$Do}$@eb[bō60K 8P0N# >0@* 0b[8$ :H%0"3BbG;؂8"#P0 ?< :8 :X%([lb'B>8@+ 8 :HP0 ?(< :8Dlb'3 ?'< WXT :PP0 ?(< :8D;;;A ?'< SP@8"#@\ \b[$Ĩ P0B ?E H>8J#PJCF lGb8A @PX8 P F  @XlLj XL8 P%0( 0 ( lG;۪PL%8(G [   P  [b'b;u& 0 8#C#O) + b['b'0Uo4* 2 E9 ,8 < <HG%bDzB ? 7 8 M!5(8 Gۜ8jPO  M@H8#3Q# b[blǦ^9  (8#3#S. ' 8>X>N3Gؔl 8"#+HG@)  Ibǯz?E $ O  G8lG s$HP0C B ?# R 8  O XĜl  (G8 PP0C  ? R X;Ф GP0N"P@* 8"#R bY v< H0*; P/0 __x$I J=LILHGYIbIU]@CBxhlll;⽣97qQ(c냒ǃ~c8yccctlllۑcǣ=Cǣ?cÓc=QQc룙R^lll` R7RXRRYR0R RQQ꺖QQCvQ.Pll`F״#b,RcC#zBcDi냃mZÔ냀Kx[l;;;X: c @ HP H H @X "8bGe3   ( % _ N (X;$8W [U@ 8#(3D''8*3;P1 >9D$,83 :P  (  ZKl[Ĝ$#F X  +0'( " 1 V1W!U)  DĜ8rT *" 8#) ? I8 (lGl${b89 ( Q#0 . 99 1 $Gے$op D!, P c_!_) DĜ8~] ( H W! V  SPGl8.  (P)04 0P " lG;B (   . @X[Ĝ8X8Z31 1!)   *". Xb'$ĵ P")0 #8 #r1 % 0D$8) ?.  =? (/0  0D;%E ?. )0. !MCT8 0b[$8/? (9 0 ? &0  0 ?) G$b'/ 0 ? 9 ݶ89  8 Xb8'>8+H( "8 ( 8X$ #  {!4  *". ) ?Xl;8# ?.  (D"0 )8  1X$$%. 9  1. +)fD$$3TAETPMITGNT OIFDNF ER EID RlG$A/;X8  7;X: M @G$'nO! 9!)  *".  ? P D'm] *".  ?P9!P0 ? Db;k-!( . 0 Ď?. 0 ?XĒy. ! . ! .  6[Ē8`9'& 8  0 ?. F$B$D$;u{SACIS.D63*15 bG'b'NQ!( 0  @ !   (PlGǒı . (  10  v) 8Xl'Eo2#r) 6j!P( ( % 8b[8$#08 &8 `Z9  D8$Y3X G 0Z8   Gؒ)q % 1. -( ! TQ:YD;x85!P+8 "  0) [':. ((182##+0PXb;b ;!  8+ (( 83 PG8l'Bv! 8#(Z. )( . 6D$ؑb/  9  ( . !Dl؅= $( "  (  Ld$KABISCYTEPC  ROTD LETE EDYLO:D  _W$$$xRccc~cS?$# 'Ǡ~&ǀ%](@C<ǠǠ3$$$Z @v2@s5 v4qDǠ??\Ǡ=@-ࡌ@C;zT@zL$$$vǠL`,n!`+`x:@x9ǠD0`}24@}1ǀ~ea7$$$`?]Ǡ*ǀ8q6HǠ)n" .@/`n@nǠp`[$xǓD@A hxVAC _3\NUI4Bx xUL$$ kxEetdndeB SACIR Dvesioi nD$501. 00 /3107/8$ E$$i 0B SACI0 .501R aeyd  _RVTC@jV@C@Ϳ2 _ BASICX.LB?< 9oTrH2;:7qZ zY`=hbIhb -h`9R0x/P.(-\@,ݺRݺJK+$H2.[ .Ff FaBOFgFgF*h<*h@KXWWTZVQ(UHHQTQ 'ASQ Q(QQQ(QRYR7R5R R R R$$H&QQQQQQRXR0RRQQPxOPN$$d^xMLFK\n\nh\nYAYAY[F[I[A[@En_yIHHH|_H_nQ MJm MG#*")!("b="b <HHH"b;*b:)b9(b8'b7&b6%b5$b4#b3"b2!b1HHO@  bq#z냀$$$  "$$Q,$[R.0:@S`+XMS@D`zA _u3ITHDHJ  C e[[J` ^ _頭@~3I@lllo/#Q(chQR RQhQQlllVmx(P\C"!i냃mZÔ냀K$$II/9 !pbG$>X Z @0 8 8DĒG 8JPP08P@@G' i@ Xb'$mZ*X  JbGǜţ8HX 1PPK@Xؒ$cFH)  XP 8#+1JQD$^TZ9Z6 5 BJ 1XJQD$b;ۦbZ 9Z' & BJ G$$%p1X"*9  Dǒ$~BJ* CBBBBX$l'm P@P@P@P@0(Pl[lbۈњH0(PH 0( HP0(HPb[$$qX (M L  1 X$00Ҁ @@X[l&b;z (  @ ( (' Xb!A@H08(  (D$lۖw!  0P0P@HDĒ$ 9Db;lX ( 0( ( Xbb;b @0( ( 0@HX (@ (p@X( [;L& ( 8X0P@08 DlǾ4 08@@PXPXD B  __^ UԏDIQ8.S.S.ST@F.S|SV< Ulll۵%Cx~hlllpQYR0RRXR7R5R RQQhQ[JH[lll۩TZc em`cC#cHÔ냀K[vbGll/.X- P@@@@@@@D883 ( (   X8']S ( !( X$8 (8  0@[$: H* X X HZ18 @D8-`@!M9 ( P@@D* @ H080K 0G8laA049 0}@ H @ @,Xb'8&0'9 08 1P@D8o`44!@ H99D$wB - 0 ,D؜$7P08(JJJPD8lDz^ 1 1(KH1 (0[b;l'l+ 0@ 0 ΁+EX8XbGb;b'HzX PJ 0 0 P0bG$8҈ (9P@@@ H8Xbl;F X8 PP0 bGţ$0 $P _bTDRDQGsODlo頫bz͸@Oblllۂ3Q R*hcL"bQ(Q(P*cC|lll4"bQQ"bQ "bcO7FPZ"bCQclll?NQXR R\n90RRQQxyuFTZlllGZP$PhA_À"b c#Mz飭VcPllll%b#b'b"b&bOF(b)b!b$b*bi냃mZÔ냀K$@o-Dl;QEXAH8:#@D@3@#8>XD'Z(1=X (H>>0FPj!@41g X$I,IE)  e:7>) $E$II* eZJ!Dl+'48  H 7?P)  4 ?0> [$ZWF7A(C  0?0 DĒĢTJ &A ?( GP+ X$ĸbD@:P A0 ?0' D'83p PGP2PDX "GDĤ~*GP9#GP*H*PI"I;$RY L?PC4A H  oFX;?0 @?P( ) -(?PC4. l[$[C F(t1K- JD'8; Ґ" ?0J ?0b JGǒ$tO- ?P C49   D8$)K J.!()GD@) 2 b 7((P7H.D8'u"*) 7 7PDP[ ?P_ bE$j60!  8B(XG;* #7@ (0Z C48X$GG?C8#+ Z_@X b[$l'&> @8F(J) 1>T> C@bG$f4F@%(>@% F0BBBB@)X$'lB- 1F0BJ%(FPX$įP3F0BJJJC4E! [8$^=0>(15  6!;S$$}l- P !!  D'%z    !D$8 !!  ) G$   yC8X'D0 E#+30 A0 G0?8GĒ$R(77#+A0 G80. ,#+b[b;! &FXC0%8BJF8C >@Xb;$rF@CPFXC0%8BJJJX'[jF8FXC0%8BJJJF8+XGlĨWv9X9+8E3XC49 3 $I$IKeHVgm !)D8f D@C8#+ 3 3LXXb;$}K  Js0C$,0"J$Gb'ؔ="#1(&(`B(0H7(J7@C8D$$j0#+BJCKFX G[8%*>(8S!05 15 !C8F0Db;OILI #+8 E @HC8 0F0#+X$1Z; : ?XA8K C8309 @0?8Dؒ5h?H@ C8CKC4 $J [88jvC0' * '0C4r C8#+ G$$=?8  3K 3. Db'F1n5 DX A89C4' D$$P C4 РGPC8#+PJD88¾ G8+A0 + G0: D$$̼XA8 : PC8%0Db CKC8>XFP$ CX3HD$'3 @X P@8"lG$;*GPC8%0C`KDXLXK  D$Z @ HP4 Z H0P$b; " 8"  (JG$gBJ15  &8  (lG$8:& 0 J ( & 8ZD۹,15  LXK  @ HP 60[b$3:"" ("B 0r 60""\C0 D8l'4H+PK8 @ ( 0J*[ǒ$zVC8>XFP$(CX"C"C"CDǒ$Ƙd"C3C8$0CXJ!9;l[$8l@r@X%(C0>8#+@  3 9 D ;% C(>0  315 ,ElG/.</c=0X$8T=PJ^=(=H*) lGl'$sLXI ) &!HLXI ) ) )D88,P ʓ(1P(P(0D'["2 H8&8KH]D, _!5'hb I@DhAhhlll6cQ(`=W~Q*h<mݺÓHhAilll^_PIP*cPPPǣyPR*cxlllۈPC}cc}TCqqPCscR RQQQlllQPYe#b PD ÀPhCAADGJ'MUe\dKllG :%DE2BXA 9CK J Gl;l;0*9#+@ BXA  *@l[llȯ8 *= *( *  * ,l[lےئF0 ,3 , , 68@pՐDl'* * "  " D8$  " *P$1"*6Db'8i%19#+*"8DĒ$]&#80 PP@ ΒPDDDP4P92AC0Z>+A~(ҮH8$yGBC@; K 5"G$$P8   5"@Du\^@p _ $I$I$IAJkrxz{ 裂Y`;URUx@ymzDhаH$I$I I*@ZgwY]̳xOFn@} Fn} EniHin2uNuWKlllaXR7RRcQQQc#YAWYAx??ǣ?lllic룔o#b}m\CǣLQ cCR*hlllۂ~@KgɳQ(c냒Q(ccHc8ycxlllۏCx[CEQǣQÔ[FD`=lllgCzzc[cc#wRQ [Aǣ=N=qc=>״Alll ~V<KC?c?cCsC?C? R5Rc룙_y0R RlllۓNxQQ#vQycDcDFcTCFTZnálllxÎ`_c#bÀCOCCc4 bFc룏V#Mz飭lllqD(b飫HgFgF#cHÔ냀i냃mZKX$8}F0")v8D+Jw8#, Dlǁ4  l v8DS* 1r Y0r hXll'bS` -P| B x * -0 c* -H` [8;*-(w Pw@) w(_ ' Db'8) ` ` l(Pw 8)Dؒ%F +C* 1C* OJF8# D$UT+v0DJ* 1r ! ` d(bG;bv85+J*  {4 ` C8 [$kp* u1r w 4@o -P | [b؈~B -0BJ* .@2P/X w| B 9 [H` C *2 *X w 4([$w@ "v0:B* ` m w[8D'$滨# + (  D8'A [8#(CR)[0: DlBs-Xv0D*K` F w-To B 3Pb[l;$9| B 30BJ| B [0-@"- -PDl'BJ$0 0"*| B -0X8BJ38#+8J -803D$'J @JK-0*v8b[F DK[$([D* X ! ` XbۜĨw!v0D"l0X8 *g8D;8ؓ&v8DC`wP` ) ` -8+D84 * 1r 1r 1r 1r ;DĜ$BU` [8+ K-XD8'"BP+ "(i K:P3P"*[b;U[^-08~ -0838CKv85#DCK$$l| .1BJ1-P 1-X[؁$Oz| B 1J -0 9  * X$$J39 J X;ۯ* 9 * 3@.H` -P| B [>w2@/H.3(3' 0P/ l[$8,2(2' 0( P/D8 "B /1 r  0^J(! b Dlے!8 e * Z0r K 0Pl[8*RJ* X w| B 1BJ\(n 1X$"'[ 1~ y J  3@D؜ؕ 4#| b[Ĝ$?0B wx 30KJ8X8 >#S2HC] I }0 2(JGX8L1r -rC 7 6 O D@Z! B wG f  (PXbl'h0X X 83382@/H] [vI }0G 8C4 2 /(30[bۜa83S@ 8+873 0D8lۏP  30H 2H/HG 0XU0M X8n2 /(4Xww` C( Gۜ$Ʀ8C] I }0   \ ?HIּrX -X8#E+3Hz#D;x < 8tj# #a( bG;=#L(  /X ` /Pk 0PbGbCX .@2Pk Z( 0PbG;9 2 00 i  d D9 8=K>KP3Pq3 ]0 X;q3 PҐqSm ?' --83R* [;'( 3@8-X=K>K? B : Dl;M68q3 -Po B 3P-0m ?( n X8l;ĶD30BJ* ) B $ 8-X| B y D;R J -8` 6 w8#, Gblۉ` l v8 S S* v8 C C* Y0l[nr Z0r sX -XL@aH8[gv|Xq3  }Pj3 83X-8 p b[b'l;HL( (}0 ?' ]0 $I@I(  )!  Gb۔$R* $9 P(  +! F"Kl;lג8IL %: !# %8l[lۤ$sF %6 % %z loH8Trބ;CXB @ P  0W PJ D$lt&b 0 ("*   % l[blې"p%2 %1CXB 0> P @ (HlGbl~ H A @ ( @ACXB 8Xb;l 0CKCXB  .ACXl[;$bwB (  > A>  P  lGl].ACXB 0 .A Ab[$3CXB 0 C"*@ H A1; ) l['< "= ( 9 P   Dl۱  (   $0; ,(<0lGbHP) * (<0P&  0@8?" lGbl&3 "@04 ?/ -8 @C  "b[l$'"* H-85#1; - _ BASICY.LB'D= otrH2!7qV zU`=hbEhb -h`>b9N,x+P*()\@(ݺR ݺFK'$H2.[ .Ff FaBOFgFgF*h<*h@KTWSTZRQ(QHHQPQ 'AOQ Q(QQQ(QRYR7R5R R R R$$H&QQQQQQRXR0RRQQLxKPJ$$^xIHFG\n\nh\nYAYAY[F[[A[@En_yEHHH?_D_nM MFm MC&%j$i#"! m}zHHHͺxA@?>="b<"b;"b:"b9"b 8"b7*b6)b5(b4HHH;0'b3&b2,%b1$b0#b/"b.!b- H P bq#z냀$$$  "$$,$[R.0:@O`+\MO@D`zA _u3IT 頭3I@lQ(i\Ci냃mZK v'1X$$X9|raDؔ:@JzH %` 0."P`Hb'8Fv X&   G$اƨP& 9=z9}| P (X$$s 0J (J @)D$8b9|rr}| ̩9D$"'|9zaJ @D$$ƫAP D;8cPP0X/ P ' %)Hl[l'EXXX%XXXXX8i!0D0E 1%  i!8J0 DȒ$p @!@.N-` 0  P0գ 8Xbl;vL  X8 P P0 bGؒ$Z$0 $Ph '9D$$khObv/3&GQeNs3Jb_&AD$$v #NoN[[h)CD$$SvO?(?\(@AD$$(AdB>CD$$l%'DEjE$FD$$R_G^;Hʚ%I@@D$$JvHJK*ZLD$ {C@z#$8MhL#No _btDRDQ5GsODlo頫b@OblllaFQ RO7*hcL"bQ(Q(Plll*cC|"bwQQ"bQ "bcFPZ"bCclll'QQXR R\n90RRQQxyuTZlllG$PZPhA_À"b c#Mz飭V@cPllll%b#b'b"b&bOF(b)b!b$b*bi냃mZÔ냀K$@-Dl;QEXAH8:#@D@3@$8>XD'Z(1=X (H>>0FPh!@41e X$I,IX*  `:7>* $E$II* `ZH!Dl+'48  F 7{?P*  ?0< [$ZWF7A(A   ?0 DĜ|TJ %A ?( GP|`* D@D$b'{b:P A0 ?0( D8ċp &\PGP2 PDX tGP"G8$%~9GP* H*PEMTH$ƌ L?PC4A H  F?0 bG;͆@?P ( * -(?PC4. C F(r1K- J DĜ$&" ?0J ?0` J- DĒ$,d?Pu C49    D$I#J-! ()D@Dǻ* 2 ` 7((P7HtXج$* 7 7PDPY ?P] 0Dl'8!  8B(X#7@G$'J  )0Z C4 8C8|D(b; Z_h;@X > @8F(D$bǠ&J) 1>T> C@F@&(X$8ޭ4>@$ F0BBBB@)- D'ǓB1F0}t&(FP3F0BJDĒާPJJC4E! =0>(1X$]^5  6!;- P D$'l!!   GĒ$Wz  ! !!D88׈  )   D$5 yC8D0 E|Xb'ij30 A0 G0?867#+A0 bG$G8 0- +#+ %FXC0X8g&8}tF8C >@F@<CPFXC0X$ۨy&8BJJJF8FXC0&8BDd;/JJJF8,X9X9,8Eb[8$IZ3XC49 3 `<FW]$I;N !) D@C8|Dl& 3 3LXK  Js0C$0D&b"J 1('( `B(0bGؒ$,"H7(J7@C8|}t|`}|[l%80FX )8S"05 15 !C8Xlǒ8>F0G |8 D @HC8!0F0|X$ 2L< : ?XA8K C8309 @0?8Dؒ5Z?H@ C8CKC4 $J [88xhC0( * (0C4p C8#+> G$$Kv?8  3K 3. Db'F15 DX A89C4( D$$N C4 РGPC8#+PJD88о G8+A0 + G0: D$$̮ XA8 : PC8&0DbɼCKC8>XFP% CX3 H 3D$'b3 @X P@8tb['{GPC8&0}|DXLXK  lG'B;K@HP4 Z H0 X8q{" 8" (JBJG8' 15  '8  (' ['80 J ( ' 8Z1XYBll5  LXK @HP 60#"(bGؒ8<,#B0q 60#"C0 +D;l۞:PK8@( 0J+C8>XbGĒ$HFP%(CX"C"C"C"Cb[$hV3C8%0CXJ 9;@X&([8$XdC0>8|@  3 9 ;& [d'8 YgrC(>0  315 l[b$./;.=0=PJDX$TY=(=H*) LXI Xؒ* &!HLXI ) * )P D$Ā/ (1P (P)0"2bGĀ$ H8'8KH] _X!5'hb I@JhHhhlllC-WQ(`=ji~Q*h<mݺÓHhAlllDZPIP*cPPPǣyPR*cxPC}cc}lll{0TCqqPCscRc RQQQQPY#blllr PÀPhCAhcA_ǃPPaCEUPCCcll #M飭,TPβP#@KÔ냀K$t}#$E$I$I Ou7:=@CFILU_[dKllK 0 D$ 28X7  9}| b 8+# Z|`-P l[$hp-0, 0 hаH$I$I Ia@ZgwY]̳xOFn@} Fn} Eni>in)uNuMKlllۿXR7RRccDTCFQQQc#c룔#b}lll!lm\CǣLoQ cCR*h@KgɳYAWlll7BYAxH??ǣ?Q(c냒Q(ccHc8ylll!kcxCxQ[CEǣQÔlllY_[FCzD`=zc[cc#wRQ [AZǣ=N=qc=lllX>״A ~V<KC?cCsC?C?c? R5Rc룙_ylll 0R RxQQ#vQyFccDTZnálllxÎ`_c#bÀCOCCcc룏V#MbFz飭lllqD(b飫HgFgF#cHÔ냀i냃mZKX$8#0")u8G+Jw8#/ Dlz4  l u8GS- 1r c[0r hXll'LSb 0P| E x - 00 - 0Hb [8;*0(w Pw@) w(a * Db' 8) b b l(Pw 8)Dؒ6* 3P2 5(5* 3( D$8P2 "E .1 r Dl;F 0`J'! f !8 e - \0r [l'b&M 0PSJ- X w| E 1G8$z_}t^(n 1 1~ y J D$) 6@@X Q !b [;8 w [wb F VI | E b[l;==w687X6H5@2@3H| 1XR )YlpR }#836Pz3}P X 3X7@| DbےĒO"> 4#| E wx 60KD8-W0J 8"#S5H"C_ ['Xi>K }0 5(J1r -hF 7 G$șvL8 O ! E wI b[8byZ  (P3X X 8"368Dےh5@2Hb_ K }0G 8"C7 b[;b;v5 2(60 8"3"SC  8"+8[Ĝ8J:3 3  60H 5Hl[82HI 3XW0O 5 2(7XwwX'2b F(  8"C_ K }0  DP \ ?hX 0X8[Ĝc#$#H+6Hz#  @  8j# @HbGĨ{8$#m ? 080X6( Hl''cC "E 1 r b ;8 w8#Gl]0+BPwX0Xb 9 ;00(& 08wXX#w 0`JS*PSJ10(& wX;Ǖw8S+PSK`K$!0 }@@XDؒ%c 8$#}0m ?c  8@ j3 [@@q3PҐqS0$** Q *L'o,_ b w!(8 | E b[bS:w@ H8!3#   (8X8lH!3!SY K 8 X z3) ( Q T XǒFVo %5P2XP #X8  8  bGad3P50= 302 8( F(R &30X8Dd'bKtr }0 Ӝ0r ?} G8;N U #!(}0 8!CB#;) lG;A7HH+* V 0!s +B 3 Xb'dX( }0  - ,^X Db;;J0B"9 0Ha s J"JX$l'?͸B*900    D8n8  8q#RqC - 0(lGb';V=  A#c( >#N(  2X b [bZ 2Pk 3PX 1@5Pk Xb';B\( 3P< 5 30 X$Ĺh  c 8>KAKP6PX;7 q3 _0 q3 PҐqSm ?' b[;0086-  6@80X>KAKD$l;`(> E 9 8q3 0Po E 6P[ؒc600m ?( n 60}t- ) E $ 8l[$[D0X| E y  J 08b 8 w8D8;8R#/  l u8SS- u8l[ll `CC- [0r \0r vX 0X5[؜؛nN@cH8 Xq3  }Pj386XX;/|08 p HN( (}0 ?'l[ S _0 $I@l(  )!  Gb۔$M* $9 P(  +! F"Kl;lՒ8IL %: !# %8l[lۤ$sF %6 % %z knH8Tqބ;CXB > N  0U PH D$wlAb 0(t   % %l[bup2 %1CXB 0= P @ (Hl[l"~H A @ (@ACXB 80Dlr}|CXB .ACXB ( [Ĝ$b0 > A>  P  .l[l'llACXB 0 .A ACXB Xb;l{[0 C"* @ HA1; )  "l[ĒļY= ( 9 P   lGl'> (   &0; , (<0 Pl[b;* ) (<0 P$  0@8?" 3 b[l"@04 ?/ -8 @C  "'"Xۀ8* H-85#1; - _ BASICZ.LB/D< orH2!7qV zU`=hbEhb -h`>b9N,x+P*()\@(ݺR ݺFK'$H2˂.[ .Ff FaBOFgFgF*h<*h@KTWSTZRQ(QHHQPQ 'AOQ Q(QQQ(QRYR7R5R R R R$$H&QQQQQQRXR0RRQQLxKPJ$$t^xIHFG\n\nh\nYAYAY[F[[A[@En_yEHHH?_D_nM MFm MC&%j$i#"! m}zHHHͺxA@?>="b<"b;"b:"b9"b 8"b7*b6)b5(b4HHH;0'b3&b2,%b1$b0#b/"b.!b- H P bq#z냀$$$  "$$,$[R.0:@O`+\MO@D`zA _u3IT 頭3I@lQ(i\Ci냃mZK v'1X$$X9|raDؔZ@JzH &` 0/#P=Hb'8hvm X'   G$إƨ P& 9=z9}| P )X$$s 0J (J @)D$8b9|rr}| 9D$"'|9zaJ @D$$ƫAP D;8`PP1X0 P ( %)Hl[l'EXXX&XXXXX8i!0D/E 1&  i!8J0 DȒ$p!@"@/N-` !PPPP G$ K"I 0 /bG'71X. 9( JaP @@@H[؜ĖL (@@@H-(&9&)0D$' JJJP 1 1(Dl;KH1 (0, 0 @ [$Nj 0 +-E X9( 9Xl'$X X PJ 0 0  P0P:D;6]"ժ 8  X8 Xb40 P P0 %0 %PD$$>h '9Obv/3&GQD$$;LeNs3Jb_&A#NoN[D$$BZ[h)CvO?(?\D$$uh(@AAdBD$$dv>C'DEjD$$;E$F_G^;HD$$`ʚ%I@@JvHJD$$K*ZL@z8MhL#ND®o _bDRDQ5GsODlo1頫b@OblllaFQ RO7*hcL"bQ(Q(Plll*cC|"bQQ"bQ "bcFPZ"bCclll'QQ8XR R\n90RRQQxyuTZlllG$PZPhA_À"b c#Mz飭VcPllll%b#b'b"b&bOF(b)b!b$b*bXi냃mZÔ냀K$@-Dl;QEXAH8:#@D@3@$8>XD'Z(1=X (H>>0FPh!@41e X$I,IX*  `:7>* $E$II* `ZH!Dl+'48  F 7{?P*  ?0< [$ZWF7A(A   ?0 DĜ|TJ %A ?( GP|`* D@D$b'{b:P A0 ?0( D8Čp PGP2 PDX tGP"G8$%~9GP* H*PEMTH$ƌ L?PC4ɮA H  F?0 bG;͆@?P ( * -(?PC4. C F(r1K- J DĜ$&" ?0J ?0` J- DĒ$,d?P C49    D$I#J-! ()D@DǼ* 2 ` q7((P7HtXج$* 7 7PDPY ?P] 0Dl'8!  8B(X#7@G$'J  )0Z C4 8C8|D(b; Z_@X > @8F(D$bǠ&J) 1>T> C@F@&(X$8ޭ4>@$ F0BBBB@)- D'ǓB1F0}t&(FP3F0BJDĒާPJJC4E! =0>(1X$]^5  6!;- P D$'l!!   GĒ$Wz  ! !!D88׈  )  x  D$5 yC8D0 E|Xb'ij30 A0 G0?867#+A0 bG$G8 0- +#+ %FXC0X8g&8}tF8C >@F@CPFXC0X$ۨy&8BJJJF8FXC0&8BDd;/JJJF8,X9X9,8E b[8$IZ3XC49 3 `<FW]$I;N !) D@C8|Dl& 3 3LXK  Js0C$0D&b"J 1('(`B(0bGؒ$,"H7(J7@C8|}t|`}|[l%80FX )8S"05 15 !C8Xlǒ8>F0G |8 D @HC8!0F0|X$ 2L< : ?XA8K C8309 @0?8Dؒ5Z?H@ C8CKC4 $J [88xhC0( * (0C4p C8#+ G$$Kv?8  3K 3. Db'F15 DX A89C4( D ;$$N C4 РGPC8#+PJD88о G8+A0 + G0: D$$̮ XA8 : PC8&0DbɼCKC8>XFP% CX3 HD$'f3 @X P@8tb['{GPC8&0}|DXLXK  lG'B;YfK@HP4 Z H0 X8q{" 8" (JBJG8' 15  '8  (' ['80 J ( ' 8Z1Xll5  LXK @HP 60#"(bGؒ8<,#B0q 60#"C0 +D;l۞:PK8@( 0J+C8>XbGĒ$HFP%(CX"C"C"C"Cb[$hV3C8%0CXJ 9;@X&([8$XdC0>8|@  3 9 ;& [d'8YgrC(>0  315 l[b$./;.=0=PJDX$TUY=(=H*) LXI Xؒ* &!HLXI ) * )P D$Ā/ (1P (P)0"2bGĀ$ H8'8KH] _!5'hb I@JhHhhlllC-WQ(`=5-ji~Q*h<mݺÓHhAlllDZPIP*cPPPǣyPR*cxPC}cc}lll{0TCqqPCscR RQQQQPY#blllr PÀPhCAhcA_ǃPPaCEUPCCcll #M飭,TPβP#@KÔ냀K$t}$E$I$I Ou7:=@CFILU_[dKllK 0 D$^ 28X7  9|| b 8+# Z|`-P l[$hp-0, 0 hаH$I$I Ia@ZgwY]̳xOFn@} Fn} Eni>in)uNuMKlllۿXR7RRccDTCFQQQkc#c룔#b}lll!lm\CǣLoQ cCR*h@KgɳYAWlll7BYAx??ǣ?Q(c냒Q(ccHc8ylll!kcxCxQ[CEǣQÔlllY_[FCzD`=zc[cc#wRQ [Aǣ=N=qc=lllX>״A ~V<KC?cCsC?UC?c? R5Rc룙_ylll 0R RxQQ#vQyFccDTZnálllxÎ`_c#bÀCOCCcc룏V#MbFz飭lllqD(b飫HgFgF#cHÔ냀i냃mZKX$8#0")u8G+Jw8#/ Dlz4  l u8GS- 1r [0r hXll'LSb 0P| E x - 00 - 0Hb [8;*0(w Pw@) w(a * 0Db' 8) b b l(Pw 8)Dؒ6* 3P2 5(5* 3( D$8P2 "E .1 r Dl;F 0`J'! f !8 e - \0r [l'b&M 0PSJ- X w| E 1G8$z_}t^(n V 1 1~ y J D$) 6@@X Q !b [;8 w [wb F VI | E b[l;==w687X6H5@2@3H| 1XR )YlpR 836Pz3}P X 3X7@| DbےĒO"> 4#| E wx 60KD8-W0J 8"#@S5H"C_ ['Xi>K }0 5(J1r -hF 7 G$șvL8 O ! E wI b[8byZ  (P3X X 8"368Dےh5@2H_ K }0G 8"C7 b[;b;v5 2(60 8"3"SC  8"+8[Ĝ8J:3 3 nd 60H 5Hl[82HI 3XW0O 5 2(7XwwX'2b F(  8"C_ K }0  DP \ ?hX 0X8[Ĝc#$#H+6Hz# @ 8j# @HbGĨ{8$#m ? 080X6( Hl''cC "E 1 r b ;8   w8#Gl]0+BPwX0Xb 9 ;00(& 08wXX#w 0`JS*PSJ10(& wX;Ǖw8S+PSK`K$!0 }@@XDؒ%c 8$#}0m ?c 8@ j3 [@@q3PҐqS0$** Q *L'o,_ b w!(8 | lE b[bS:w@ H8!3#   (8X8lH!3!SY K 8 X z3) ( Q T XǒFVo %5P2XP #X8  8  bGad3P50= 302 8( F( &30X8Dd'bKtr }0 Ӝ0r ?} G8;N U #!(}0 8!CB#;) lG;A7HH+* V 0!s +B 3 Xb'dX( }0  - ,^X Db;;J0B"9 0Ha s J"JX$l'?͸B*900    D8n8  8q#RqC - 0(lGb';V=  A#c( >#N(  2X b ) [bZ 2Pk 3PX 1@5Pk Xb';B\( 3P< 5 30 X$Ĺh  c 8>KAKP6PX;7 q3 _0 q3 PҐqSm ?' b[;0086-  6@80X>KAKD$l;`(> E 9 8q3 0Po E 6P[Sd600m ?( n 60|t- ) E $ 8l[$[D0X| E y  J 08b 8 w8D8;8R#/  l u8SS- u8l[ll `CC- [0r \0r vX 0X[؜؛nN@cH8 Xq3  }Pj386XX;/|08 p HN( (}0 ?'l[ S _0 $I@l(  )!  Gb۔$Mg* $9 P(  +! F"Kl;lՒ8IL %: !# %8l[lۤ$sF %6 % %z knH8Tqބ;CXB > N  0U PH D$lBb 0(t   % %l[bup2 %1CXB 0= P @ (Hl[l"~H A @ (@ACXB 80Dls||CXB .ACXB ( [Ĝ$b0 > A>  P  .l[l'llACXB 0 .A ACXB Xb;l{0 C"* @ HA1; )  "l[ĒļY= ( 9 P   lGl'> (   &0; , (<0 Pl[b;* ) (<0 P$  0@8?" 3 b[l"@04 ?/ -8 @C  "'"Xۀ8* H-85#1; - _ ALMRM.RB (GH@clllQ(Qc[RqǣQQYRRQQ_ǣLNnlSݺ\ݺÞDX8   (\Ig)  8D$' ; RRB<SC FY[$$A!+ 0 L9P@ @!G$8Ԏ* 011:I=)/! 8 8DĒ$5W8 6) : J *" %! ?DNF 1B!  #PX'$(TC  +  )! @c,[̒$ic bTQ:YXX?Q _BYE.RB0A:aPI5N_KCKlllێgx CAQ(c냒c8c룔ݺDCzGzF#zlll۔cRǣC}c}ǣ?cÓ?N=YIqc=\lllQQc룙RYRR^5R RQQQ#TCFݺtlll$}mc냀.SWƣÎÀ#zBF#Cc#CClllۥCCLHc#zDDcH7qJcJÔ냀i냃mZKG'8XS! R! 0L!* t% 0P ? bG;$f0  > P!)( ; , 8 Q!9) 8b[lے8\D#:+4 X1  , . /( '  & DlےW*F!') 87#+4  , . /(l[ǜ$8 &  '  8+?  C !JLXXl'KFK 8# J@- L$$p@TL GOEG DFO FYBO EPAROT RL$$bS GI NFO,FC UPU ES,D L$$3pI O/U ES,D x@2lI88~B (>8=3 % =K![ <@<3 RX% 8( P ! $  8H!bG$8PP"(  .$$$P"(  8#@DcB^ ( $8 ( 8+Xb;$6l0ϑ1P5 83 1P D$8mSz8# F 8C!)CCX$ǂK9J P AX;81*0  lGlےĴC28+GLXI 0#!Pl[l'b'¤"(! '   " @ P ! ( bGb';u! (1 '   " H b[b$  ( HC/D1X)0E #0Glے8C @  LXK 0*K D;l'M- 1P*('  0* LX0jAK  bG` . /(  J@ _CALL.RB0>Sn(YSp_plllyQQ Rǣ?RQyc냀l*hhCOc飭飫<l[$$l X 1 "   Dĸ&1 %"@"@J "Xb'@8 #@ (@8 ( Gb'*  S%R@ X 0 [;;vk88 X@ X8T(XF8 !D8 38 R [;T@  0BJ@  D$lLjb P820BJZ8Z 8XT[Fp P _CHAR.RB0TD Z:Tlll۱Ô냀KTZQQQQ Rc[lll0Ҧǣ?ǣ=qy飫zy#bcRɳc룏c룔#c냀l} +Bctc=cc룙[;8U?  XO!(# K!! 0* L!(bG8a8;0 " : A!(# ;!! 0*Dbx ;!(8;0 " ) 8X X$$Z* H R HD$$N8r1* )*  "83Xؖ8iFw 8S ! (1  EdTRNM @  I1D$'Jb. (a) 83 Db'$[pX) ;V) + 0JK X'~ 8# +  B1DؒąK 0 HX  @ H P25  b[8l (Nj 09 P2  (  0"Gؒ>P* 1 # " (J "X88ж ! " 1  0 (9dG$DR}"SNOFOFLe,   Ld$3 CNRSDPLDCOXD$$NNDFON MESBPOMDTDSSEC _DIR2.RB1TZ$I AOSl[UZZiZlll#Q(c8BxyctcRǣ=lllءc}ǣ?ڑiN=c=^c룙7R_yRXR0R!QQlllbcDTCF#b}mc냀À#zcCNCCc#zl飫7qi냃mZKGlǒlD!( rC!(@1 )S#('  "i [lI/ 0HH HH H +)@(X868)3'  ? '/ 8 #D8'*_! @0"Y)0 8 Dl'$,8P X L;$ؾFAM.PRD/ ( )  SUDE:Pl[lے8ƫT( ( &  ! # $( N  ELDlbTF:P( ( &  ! # $( Xb;bۈp "8%1* / P 0" 2X1 8[Ē؅,~)3 )C!(  01Dll'V"  @,.  - *   "" 8%Dbٰ   "" X.     [;"0+ H    *[l蹶 H.   ( H'  D8)g1)   &1   # @Gbۜ8@P( ( (D8[@!1 8K / / " Db'b-+  %0* D/L!P _EXEC.RB3[cA$IIu;y@NsFMTbzScAlllHcL.Sc#N}mQ(c8Bxyh;cxlllۑCxQcRc}ǣ?cÓN=Bq CK_Kclllۚ^RXR9 RQQQxQQyTZnllleL#bc냀nnA#z*hg8bCAcCNll`ۭ&CC 7 B-6D  @b[8~H+  A83;P (X8m;P1 =S 'J.9;@ bG8b'w?1 =S 8#P=3 ? + Gl;$)8 u8#((=3 ? 3D$$F"-,8 Z 5 9@*@D$$p* S !)@F@* L  *(D$$ I "***** ?D8Lr8C CC2#<  81#  bG8b'490G 88#P3*P=34  D$Ă? @ 3*PP=3 ? G G;b;F  ;( 8=3 =K903801[l;bZ7/ *HFH 1> $0/ 0/  E$$P&:P UCRRNE TABIS CYSTSME D$,C4 C RO EMI=GA EIFEL ~RPCESID$$BOINISGNELODBUELSUD$$TPRED FEF NCN L/OGUS B/NLL$$4^OF-RENTXN L/ D$8x6l ! !) D;esz!) (, !!!( !$(b[$[ *(, !g!!( ] !$( Db;Ŗ!) ( H )! *( DlǒĨ7@ J !) !$( (, 3 D$QB)! F(, ) 3 !(( lG>!)( ( 0, P% Xb;b'8E  )! F( *0, Gl'l P% E   80JX2I   (lGH  H? _ERRIO.RB2;rlceD$$UzlI.pntuN1 oormof rod riceD$$otyrU3es ron tcaitevU4esD$$&Ζ rniN MOGSs atetS6atdetemtnD$$}l netghE7exuceto-lnyR8naegD$$3I:cnmoapitlb eoceri amegD$$9Z;re otspeTAT RvolfD$ S@syet mcaitev _INIT.RB5`UzDϣݺDݺݺ\ɳzlll~cCSRxǣ?ǣnbx lllgCAFf.ucQ(c냒cǃ~c8 lll,-hcǣÍݺDzCzc[F#z.[Clllfǣ=\qccG QǣXR0RCC-#YRlll/7RRQQQQQQQВb#JNcLCClll#'CTZnݺtzccP#OCP`cÎݺÓlllhݺRhUp#LICCCC5#iLH#zll5CiVcDDOFcH##ZÞbu`0D$B&cxP "`! 83 LD8$đr! D w!>( ?  < ')KD$$&T! "Pi)N! D! , D$$*G! F"P\)A! :!  >!D$bۡ8Ph :!f N!d gP@0q <0D$,F I!  TQ:YXXD$$ T !  !  2E$,ɫbCFMOC.MMTPYSOSTUE-p@uY$%u^ T$ITT$OTFF@vLc@sL$$'ACTUOI:NP TAHCSEH VA EON TD$LEBNEA PPILDE !'JO.L}!D$$ - " " " "hG$$H> #~ !   9 2E$bk ABISC%gcD0?(17b 78O!DĒĔt K!Pi@| }1{ /(N0E! X$$]i@! %  D$ؗR  8; > @)!H D;8 =8 !!(!(GH) l[$$a !(! !  %P D$mY) UN( h <a0X{&_@׾(lG$$(K+s!J ,)-   D8&A6   @  8!)D$[ DJ)1A$NfjlGdKlg R][/tZ\FA!XSH b['}`G( S( G( %5 !X$8n ]!%PEK 0) P ! D$$|SB!AD$$8 3J AAbE$/ 8 )J!)P4@)K4)Gb&sK4 8 #(4(J E8"X)D,'X@3K3P P:L9l[Ȓ$OcRk!)9 ))Db;),@)p0b , ,@ 8/X)Xb'$M/ c )M@ H1K 1q [Ē$Ht  6"VA VEQ)UMX8 K @ENI/(E $HF!PDID$$E%J AE>AE;!6 4 8-D$$0 k#. /1 7"( *!-E-ED$$$()+E!,() P%Dbǜij82KP$ $H$ @P $ Dd @  aH@Ml[b;UaMhVT-WS]-$0b H)G'$RO[ S@*) "(%12 S (D$&Vi " <"   X1!D$L1XwJU! ) " OABIS.CDmDI@Yb[$عMLs"4  !B" ;X$8nPPORE PD8$!9KmB!)'!  EbGlBB!XB!K (s (JJXڛA H!tB!%B!PB.B 8 Db;-7mJ!)nBJ2ZB eKdKb[l'8YK)K(K 6B$( HS)"4 PX8B2:U! N@ T P ""4Kҹ!D$$; JP)I E  "A E)K PD$$$  d* 3 #/3) "DĒ$2- 1)JD *)* & ,)J (! D$$@"8 $)  ? )  )KD8 kN- 3 MPKJ58)dElKH5\hPIsu&Pa [$8j> #8^)!K*CW1PGPO)SH l[lǫ"x@ G( GSS( QeFD$$KQ# " "!-! Dl;]S ' P:%!C$!C2*@0q <0D8$8#KK *"  D';?D @%A8 0UoJL9l'酾~TQ:Y46ABISC1'D$$ !  Y @%'L%dO! !$!F!l!Ed,*l!!!!D$$Z4! REOR R10- R ae liTemC D$$colkc REOR R20- O evlryaF liD$$' eREOR R30- I snfuificne tD$$<hCnaensl REOR R40- I snfu:ifD$$,icne trFeeS otareg REOR R50D$$L{:- S awppni giFel REOR R60- D$$UHI snfuificne tCT'B SREOR RD$$V70- M Luitlpxero REOR R80- D$$dM saet riDertcro yREOR R90D$$Jr- I DiFel REOR R01- A ccuoD$$5tnni giFel REOR R21- E txneD$$Sed deMomyr ACTUOI:NH RAWDRAD$$Գ EUMTLPIYLD/VIDI EXEEPTCDEB D$$WTUD EO SON TXESI!T ACTUOI:ND$$ܸH RAWDRA ELFAOITGNP IOTNU IND$$ TXEEPTCDEB TUD EO SON TXESIDl;$ !T rH @"@ @ @w! !Xb;$@  g!S@W S( "  JG8دP`! 8!X+@0b 0!8KE$lP XN! !E0   ?(D$Py ,C  r - 0JD$\5)3)"(  "l[Ē8)v( @"@ @ @r@0! !@  G$86!S@r(,! 2! r( b[$$"D"0 (  " H/:D2Y$%yR"7 ADET( /M/D)Y? gITEMD%$I`( :H:M)S?  LIELAG LADET L$n LIELAG LITEM @FHt@INIT2.RB6Wzt"I9syyВbВ@_zdlllquFf.c냒cc8c룔cxyCxlll۽ctCzzF#zcbǣR.[ǣ??qc=ǣЌCslll_cQYRc룙R^h\n\n\n R9RQQQlllxuFݺt:c냀nWƣnnÎAcCɳlllcLm#Mcc2CN_nCCCCc룏##MazVllMDcA飫OFcHFa:Ô냀KbGĒ0  6: j 0 5!,( - -!JG'8# \ <y8#") t(D$l; -( mP 0B(H @l['8=-*( -  ( ZE}l[dl'8502zS GI NNO ,UXXl;l'FT 0#!P*(" (   " @ PDb'b'nT ! ( ! (1 (   bGb;yb" H #  ( SLD/Gl[lW4p@X,0P !0 @  UXT[X$$~T 0*J  1-P+( GۜIJn S@ @J N _0d!F G8;c! b 0f!7*B  8 6+= Xb4 8;#7+ S SSM C0L!BX8?04B8>#6+B H0D!'B&B>)l[8$O0A H0%J / 8)59 1 8E3 G;~$ EK/!@D3 X$ 8DKb['Ҭ8KKKK (9 l[l8983 ( M H)0P P @Dl؞!HR.QK1I _MSCR.RB8ZUD1uaDDlll8Q(c8ct`=Wǣ?N=lllswCK~KC?c_KXR R RRQLCCTZS{#b}l`3}mc냀`CCcUC['{1  @ @ @D  21D8' T 11R 01P 8 0r x! @1 8Du   Xe ! !)D;$?* #8#"3c= P ?  D$D=8    &-R%  8lGb4F   X! 8 08  (D$'dT83 <= 8#  29 [$$ebX P #  8# (D;'p 0P0 0 PHP @Xl;~  (    (Gl'$ 1# 6$&W-J0K1R2SD$$+<p@3T4L5M6O7P8Y9X&\-[0]1U2F3GD$$4^5E6N7Z8I9V&-,0Q1D234CD$M56A789 _PRUX.RB H:aHllll|7RmQ(c8Qlllo.S ~ RXRYRÔ0R RQQ[ylllێx[TZ }c냀念ccHÔ냀KDl'K $" "@#H@ @@ X8$@@@(@ ( ! @b['l' @ Z1* # 9' (DbH2*.).X-  0ZP l[l$8, 0PH 08 XP b[8lF& @ Q( K (@@" #(D8σT +08 !8(88G'Jb 0 !X$p$0  !0 !0(8lGؒ8B~!PӪ"@#H( !(( @J'. bK8W& ( 0[ P0( 9[Kך'#( "("   #DbǜE0  P1 D8A*%.X- # @ j!@@ [;Ǭ @( 0*8 D$Ā JUdS2P 0D$I$I` $I$I$Ik"!+-*HFJM$I,I8tWO[n@ (@Gb' @ q,, [b;Wp@,@ !@ @ ( !@X8$&0o-n    JX:Q4 0ab $0" #( "@#H8G؜8aB8Q @P (K H0D8j P  J0E  @0<) [;^0( 1(J2 P1 0 HX$itl 0)!(!K!"@0+ 0G'lǕ{z#@1+E(J 0 ,G8; "0 "@#0$(#H(Xl'E| 0 H!+-E((Y$#.+-$#H(D=.$#.+ - $EE%n#,.^+-#,.H$EQ^+ - #,.\^+ DED8- #, .^#+ - #E$^^+ -  _PRUY.RB H:aHllll|7RmQ(c8Qlllۙe.S i~XR RYRÔ0R RQQQ[lll۽pyTZ }c냀#R念ccHBÔ냀KDl'K $" #@$H@ @@ X8$@@@*@ ( ! @b['l' @ Z1, # 9( (#Db12*+0X/  0ZP l[l$8. 0PH 08 XP b[8b6F' @ \* K *@@ bG8$JT908 "8*8g!h9D'$?Yb((PP(D$'Fp3SK18Db'9~I "0%8P0 "0*8b[l%w"P* "(( @J'2 ' (Db;b' 0[ P0( 9($( lG't.#(#   $0[ǜ8ƶ  P1 *&Dh )0X/ # @ j!@@b[b')M @( 0*8D$8} JS2PX$I$IS 0$I$I$I ""% 10:<9PNR$I$I$ U_Wcv@ Xb;7*@@ j.. bGl;|&b@.@ !@ @ !( ![Gݺ4@0h-g    JG'ĿB 0Z[ Հ 88Q @DĜ8TPP (K H0  J0lG$ݻ^E  @0<) 0!( 1(JbGؒ8pl2 P1 0 H 0)"(!KDؒz!"Z#@0- 0$@1+EXb;ĸ(J 0 . #0 #@bGؒ8$0%($H( 0 d[(EZ3H!+-$#.DE(7+-$#.$E$Db#.+ - $#,.^H((@x+- @#,.^+ - D($#,.^+ - #, .^H$D#+ - #^^+ - D _PRUZ.RB  H:aHllll|7RmQ(c8Qlllۙe.S i~XR RYRÔ0R RQQQ[lll۽pyTZ }c냀#R念ccHBÔ냀KDl'K $" #@$H@ @@ X8$@@@*@ ( ! @b['l' @ Z1, # 9( (#Db12*+0X/  0ZP l[l$8. 0PH 08 XP b[8b6F' @ \* K *@@ bG8$JT908 "8*8g!h9D'$?Yb((PP(D$'Fp3SK18Db'9~I "0%8P0 "0*8b[l%w"P* "(( @J'2 ' (Db;b' 0[ P0( 9($( lG't.#(#   $0[ǜ8ƶ  P1 *&Dh )0X/ # @ j!@@b[b')M @( 0*8D$8} JS2PX$I$IS 0$I$I$I ""% 10:<9PNR$I$I$ U_Wcv@ Xb;7*@@ j.. bGl;|&b@.@ !@ @ !( ![Gݺ4@0h-g    JG'ĿB 0Z[ Հ 88Q @DĜ8TPP (K H0  J0lG$ݻ^E  @0<) 0!( 1(JbGؒ8pl2 P1 0 H 0)"(!KDؒz!"Z#@0- 0$@1+EXb;ĸ(J 0 . #0 #@bGؒ8ޕ$0%($H( 0 d[(EZ3H!+-$#.DE(7+-$#.$E$Db#.+ - $#,.^H((@x+- @#,.^+ - D($#,.^+ - #, .^H$D#+ - #^^+ - D _QTYM.RB $Uߓs@clllHQ(Qc[RqǣYRQQ_ǣLɳݺ\ݺÞDXq   (IIK)  8Db'$; S7;Y+0 89P@D$$T @!00V1I%1G'*)) ))"! 8 8 ) )JD$8 J8 *" ! ? 1B !G'F  #PC @PX%'*P ?QTQ:YXX  _QTYR.RB,UƓHftlll=æ״AQQQQNn=SF#5#iݺÞX$$w(eMe!e h!ky1xIqD$$-t1nAR%PED$$%gY 0R\A\Q2WQ/ "X$$ *( R1<)%lllۘ*hy Rc>lllۋ yYc냀xcFФOcz飫H@Kl[Ē$  P8 p Pl bGؒ8jo/  ((00 P0"*Db;ZI 81  ' 1BJb[ĒZ*  J PI  0("*1XĊ!8  08 B'0"DĒ$F* 0"*  Gb&T  @0 P   P83D$8[b;   0(8#+X8bۦ2p 1 (   ( D~  @HP0 P 0 (HDۜĀD <P @ @0BJ@[l$" (P08 (P (Dl'3P@#+ 0 0BJ[lb'Q; (@@ (P@[;81 + _MATARY.RBu3:$IIw@nq Ng@lllۋ yYc냀xcFOcz飫H@Kl[Ē$  P8 h Pd bGؒ8k5,  ((00 P0t bG*81  ' 1}t Xb''* D PC  0(t1 bG؜$+8|` 08 0t  0D$b;Ft |`   @0 b[ؒ$ TP   P83;   [''zb0(8| 1 (l[b&$p   (  @HP0 [b۝~P 0 (H 8P @ @|`Xb;ʌ0}t@ (P08 (nD$bαP (P@| 0 0}tX;{ (@@ (P@X8ڶ81 + _MATARZ.RB u3:$IIw@nq Ng@lllۋ yYc냀xcFOcz飫H@Kl[Ē$  P8 h Pd bGؒ8l9,  ((00 P0t bG+81  ' 1|t Xb''* D PC  0(t1 bG؜$+8|` 08 0t  0D$b;Ft |`   @0 b[ؒ$ TP   P83;   [''zb0(8| 1 (l[b&$p   (  @HP0 [b۝~P 0 (H 8P @ @|`Xb;Ό0|t@ (P08 (nD$bйP (P@| 0 0|tX;{ (@@ (P@X8ڶ81 + _MATINX.RBXPR bDWВؒlllۏyDlc#wRclllm?UFP *h<QyoYlll_c냀*hcFcLOc#MzH@KÔ냀i냃mZKl[$;/) % P/ &P, ,P P[8bN0 +0"*1(8BJ( H(H [b;ة #  8"3P0 P PG$|*1' ~ 1' +!bG'8H 0J@XؒأF 0BJ(H0P& $H 0"PX'$4T$0 "*PE 0L   0Dl']b"*< 0BJ @ ( Xb';p 0"*, ( 0Db;l'6D~#*BK( 0"+  (D$$ u (0)"*8TBDۜ$VJ 8  (0)BJ0l[lb;Ш' 0X/  #  0 .0X- X;$K@PH0P 0P"*}1(8X':8 y1(8BJ0"*+0 0BJX 0wBJ@@(P0&  H(X8 3 P(0P"* 0 D8vT0BJ0BJ @ P0G$#(( <P("*0l[l'l'i  0* 0BJ  (  (D8}E P H0(& P0PlG'&@ ( 0"* 0 0BJ[bpo4 (@ ( ,0X- lG$'B@0(" f@0"Dl$cP ]$@@@0\ "* 0BlGb'8^J0P 2 P$ 8 J X$٠lP"*0E BJ 0P 2 PX'8" z 0"*0BWJ P(@!0 DĜ8ʌ2P* P"*8CK 0"*0D8BJ#+ 0BJ(  (lGl'H ( $ $ (DbY" ,0X- @HP$ 8Xbۭl0(  0 (, ([bqH(H(H4$ (H([ 9H(H _MATINY.RBXPR bDWВؒlll/yDlc#wlllRc?UFP *h<QyoYllleYc냀*hcFcLOc#MzH@KÔ냀i냃mZKl[$;.) % P- $P* *P P[ػh +0t1(8}t( H(H # D؜8  83P0 P! P1' Dl'ɖ*u 1' +"HX$&8 0J@|` 0}t([8 FH0P& $H 0"P$0 G$'jTt P@ 0F   0t8 0}t l[$$6b @ (  0t @0 (" Z@G$b;40" Q$@@@ 0P G0Bt 0}t 0P 2 P$  8 DP@ Pt0< }t 0P 2 PX;T^ 0t 0}t P(@0 2X$zlP$ Pt8}| 0t 0}t| 0}t[؜ؘz( ! Z(H ( $ X)$  ( ,0X- @ HGb$P$ 80(  0l[bW (, (H(H(H[bij (H(H(H _MATINZ.RB XPR bDWВؒlll/yDlc#wlllRc?UFP *h<QyoYllleYc냀*hcFcLOc#MzH@KÔ냀i냃mZKl[$;.) % P- $P* *P P[ؽh +0t1(8|t( H(H # D؜8  83P0 P! P1' Dl'ɖ*u 1' +"HX$'8 0J@|` 0|t([8FH0P& $H 0"P$0 G$'mTt P@ 0F   0t8 0|t l[$$7b @ (  0t @0 (" Z@G$b;40" Q$@@@ 0P G2Bt 0|t 0P 2 P$  8 DP@ Pt0< |t 0P 2 PX;V^ 0t 0|t P(@0 2X$zlP$ Pt8|| 0t 0|t| 0|t[؜ؘz( ! Z(H ( $ X)$  ( ,0X- @ HGb(P$ 80(  0l[bW (, (H(H(H[bij (H(H(H _MATIOX.RB>2 4b$II9fb/8z{ В97 bђlllcCcF#zR}mQ URc냒cHyc8lllc룔UxQǣؼQCz`=zDlllہ c[cR郒Q ǣ=ǣ??x?N=c= lll2V<KC?Csc?C?7Rc룙vXR5R R#vQlllۍc#Qry铃cDxPTCF#bcc냀xlll۾CCxxÎc#bOCC#Mcc룏zD飫l`0cH#7qi냃mZÔ냀KDb;8 "! '1 V @ 8 &X8#0Xl BPXXX@ 9 0( 8XXXD'ǧ 0;J0*P0J1( XlG;u*65:*X80+P0K;K7!0XĒC8 \@X1 J2 @ R P  Db';tF \0 8&#P ?! J8 O3Db' GT @T#PTC/ @(" 8 ;X;8gb/ v!>(v (U0Pm9IFtXb;lp78 G J8T#RTC^ 8I( b[;b#~G #?( #-( G | @ XN![b8 >(#8 Z ! XH PH(U0bGĜ$P. ]<8  c 88Dl'! Q] @  \ X@  Ds 8'C#) $$+ 1 Xlǜā= @ 0!W B(" 8 2}9\0bG2; 8IFH? cXb @X4H8'3]# B  (8'3[b;r/'S4 , 8JXJY3 a\\8 D,;b!nP 30V ] KN6[l'l9 @ 8JXJ]3PY3\PJ8)#l[$@@ R P@ P 80#++ E [ & (% 0 8(3[ D74 0:8XDH9 [b'l'JB, D# " %(   cX` [; @ 0!W B ' 9 2|9]0bG2; 8JG#I? cXb @XB4H8 3^# C  (8 3[b;̈/ S5 - 8KXKZ3 a\]8 D,;b!P 40V ]LO7[l'l9 !@ 8KXK^3PZ3]PK8 #l[l'|@A S PA P 80|, F  XĒ}&(% 0 8(3\ D'l'5W4 0:8XEH: - X;l;$BE# " *(  cX` 0XģP8 E@DH E D(00l[lbǞ^P% _cX` 9J_BN 0 lG$b'l  A  1V -9J< GzAY!@2 A  . A S P2 DǞˆ1 0, PT PP!0R  [؜!P P]0 Q ?  K8U#PUCbGۜ8 88 H K8HU#RUC 9JXl8*(}M#6;9J & YlGb'ǣ!@A  A S PT PPX;N!0R š !P P]0 Q ?  `G H  _MATIOZ.RB 2 4b$II @ 0!W B ' 9 2|9]0bG2; 8JG#I? cXb @XB4H8 3^# C  (8 3[b;̈/ S5 - 8KXKZ3 a\]8 D,;b!P 40V ]LO7[l'l9 !@ 8KXK^3PZ3]PK8 #l[l'}@A S PA P 80|, F  XĒ}&(% 0 8(3\ D'l'5W4 0:8XEH: - X;l;$BE# " *(  cX` 0XģP8 E@DH E D(00l[lbǞ^P% _cX` 9J_BN 0 lG$b'l  A  1V -9J< GzAY!@2 A  . A S P2 DǞƈ1 0, PT PP!0R  [؜!P P]0 Q ?  K8U#PUCbGۜ8 88 H K8HU#RUC 9JXl8*(}M#6;9J & YlGb'ǣ!@A  A S PT PPX;N!0R š !P P]0 Q ?  `G H  _DIR1.RB1TZ $I yŀ]rsT!`ѠcZ lllQmQ(c8Bxyclll۲|.S郒Rcc}ǣ?xN=c=R^YR15R_ylll%RXR7R RQQQTZL#b}c냀ÀcCll#CACO_nc#zD飫cHÔ냀K[ے<~08P @0(9X*W! D'8g7&*P" R 8-#) G8,u"4+ ".+  x  @X$9\*78*P9X8  @ @lG$b'uC88-##8( )  8XPXl'gFP!@  X % [b;bǧT@!  "  7! 7:GؒqAb$$/  @ H41 H#0( "`X;p 00""(#0 ( , 00 P!@X$$ Z~08#1 K(1#*  [b;{y @P"  0"  Gl;b'eC'J 2080 08$0D$$ r@ACDLTD$$YIpRWP#H OD$1s@E SN#0( #( ( [5b (1 #0( "( 08#)D?/ +=1$8108 # +  ) Xl'o(#0"P "  00 "lG8ws "  00 "&(m   00 "(bGb f "  a! 00 "^ p! "  08+X";g8V c 8*5  I1 b[lےh& P35  @ H @ ( @) GĒ$N4'( %( (9+ ) D'jB# 0 8 @ ?( ( 8D؜yP  ?(  ' 8*P @[b'l;f^ 0  H 0 0 18#0XDml*(*Q @5  1 ['z!z P" P H0)9X8 6)HDĒ85)11D$$;-)) DēPH* @(Db' ! ( ! ( 7PGDn<bGl' 5/9X8 #06 0@   X7 _INIT1.RB5>:zTI\zz:`bzDlll۳c룔ВC_c냒Q(c8-hclllHcǣ=Cǣ?cÓc=c?cQ7Rc룙RBlllt 0RRQQQc#QbLCCHzcc냀WƣcllqP#zBɳCAc#ݺÞD#7qD$ĥ;!J% ! 38+% -D8f{k! ! $9+",(68Dd$_%ABCT HBAMIXUM MSURE STD$$*CAOCNU TANEM :fAPSSOWDR :G;b88#@@* H* H+8Dl;tjFR! HH(  E!G8$NTB9(ͯ 1K;8&SUDE:.ELTF:Ld%S6YBETS >LBCOSKFP(,)LD( )L$$R /D8'z$0+ P H@ @X P" Db;NA68T @ 068X'b!L'( -: C+08 PB((8XD$$SՐҀҀҀҐD$#1L :XbG'$P:HBH`P H @ :KD$l;{ 6(+J780 3)0= XX25 *P @ 068'( +0 X$'Pu& P`?X- #) - ( ?9D$Į4)  -  P5 l[;$$B?? ??- JMZ&9 XfP- "9 - 8 A  1 bGb;֧^#0 ?A  1 + X;l  83;X A bGl'z $ " \   83G;?- A  H$ " (8#,0X$l;ږ @ D.RP< [ (  % Dlǽ   ( (8#)1G8/PP& "1 H( &8D;8Y,   (0 ( 8[$bǠ !C   83*!90X" _OPER.RB9ZM_D^aN_lllm[I[IK\LcCǃ~yc룔clllcRڑixǣ?N=q V<ǣQ R RQlll> yTCFݺt#b}c냀ÀcNnCAcc룏l#z飭ݺÞDDD$$IYx9t4NAR8"I'@)) Hz P P! n 0[$ء! (*:! P -  ( 9&Xb'*J)0 - 0 D$;{8& + T Mi 8&N 18XR X$8|F") F [ A  P= 18X$b;TXA " )  PK X ! lGlJb/# X / P! ( H! b[b;$p P! ( H18 (3 e 3"D؜$~  (+" 11,8X;w&34** P0 X83 DĜ  (*"  X  XD88413+J++J/)J 0 *JXؒ$(.  823'! ? ! ? X$# ? /  ? ! ? 0, [l'J *J(   022:D;b;RFMO    "$ 8& D8$F "$    / !   b[ǜ$/ @ / 0 - *M-!dEĒ8" =f^  P b[V/ @  0 !0(J.1T GD'/&20(* 00,8&X' l[`4 " % (  _OPER1.RB9I_TH!F_ŀNA_Dlllۻo}mQ(ǣ~yclll bڑicÓN=qc= QYRRXRc룙RLlll(0R RQQQQ#JyC#TCFc냀cnlll#nÀCAC#CCc#zݺÞcΓDXbۂ%X( :P' (H' P' (lG$ĶH;8(3  =" [$lG=^(4" %188+38+X[<ے$* ' :=7!/Y$l'J8t t ! ;8X[b'$F4 JP X P P [ی`TP0!P( !( 8X0e2"0Xǒٷb PPB  @!#(09lG8b'-p !( 0!P*8X;0+~#0 H 0#(ͮ 0*JDb'% 02"( " $( 0(* [$Yݚ ( >!JC02* *7%D;,)yJ  (+ 98,3lGbb;)!( 0-"v  ( 02* G$b'.!." "%Jj  (Df[  !( 0/"X %5)&D~. ..01"-M  ( 0-"bG;;CC  ( 03"-=  ( [;&0/"3  ( 0,*3  ( ![b'8 0<*J*  ( 079"(X'c0H#K  ( 0b[۽&>"5*0 1  F C8+ X Xl;ہm4 X  X0  *  (Hb[DؽQB  XG@67ANEMS D$$hmPATUT SIDERTCRO YILENS PW SD DN$$\^TA A P OR G P IR VOYLF LID+lSE PC UF9 _PATCH.RB@ 8RVTC@jV@C@Ϳ2 _MDSW.RB7) @֐`HF``gxP($v G$ǥt0X9X D$8S 9P@ @! _MDEC.RB7zh,AHReg`N`HF`$vD$0 _MDHW.RB7te@֐`HF`$vD$A0vAv _MDNO.RB7}@֐`HF`$v D$$N-blv`akblAvD`ak _FUNC1X.RBUhTA$)@qhDAβPPs*cPyP*cxlll[FFP>QRlllۦ RQ uOc ec냀tYÀllɴcC##MH@KÔ냀K[$$)#8 #1PPPP) CXl >@@ @ @  "86X; P^ @HP0"* 0 GllǿO* &$LN @HP ($ HK1 @ [;b' x808% 0X%&$@X;۶BFHP (31 @H0 [;T ($1 @H0&0 Gb;=kb P@ P@ ( G$$Fp1 @"8 b[bۜ$~0  "8)X( K%  Xb'$ƌ(HPP(0JP@lGĒu@HP g b @H(JXb;b [  1% ' "8)X( Db;8? &0"*'@Hk % CGۜ؀('f  ( B  (c  G'${P/ PD {  HKK?Dl'@@8XH (X;l' 08X@H [ے$ ''+L AWyD$$> B\!v BdǞAE=/D$$p {> $??"=@z@zr@D$$*T& @ B BI @r AD$y$$]4G ^?!U^B3^C?ަD$$WB AB(/zBD6/LbGl'P)X( @H"*P1 4Dbl^ 1   0    '"Dۜ$l*15J 6 3) Dl'z[@H @H Rl[84Yz@ @H"1 1%  (@Hl[8;͖  @H1  (! [Ty (@ "8? _FUNC2X.RBUhtA$)@{hdAUPPxIPEUPAPPDlllۃ?UFPZ>R RQlllv6uO ec냀c@KÔ냀KD= F 0 X @H"*P1lG$9 4 +1   0   bG$o "*1X PlGl8G*1@H 0 X P 1@H[lۜ$8 0 1 3 P 0 PD8$,F 0PPPXJ G ! 8Gl;'e?T 8ߛ0X 8XPD$8-bGE7 = 0ҰlGĒAp8  P D88ׇ~  8X0 ' [č@80P0E  D$$~@ ]@?N@J %D$$\ƨ_>H/@ ]>]>>+?D$8L*/?)@OX@ P1BJ[;^/0 @pP9#+ 0 G87O    ?X5D$$@x"2@UP@ AD! _FUNC3X.RBxUhA$I@ ,TPPvPPh PMPlllc냒Q(c8O7xCc RXRlllY RQoTCFmÀBc飭|S(bi냃bmZKXl'$0"*?  0"*7 @b[$/H80"*/ % @H8'1D'l--#+  H @ (Gb;l'y*0  ( 0 ( [8881   XXl֖F "* @H_0 PP l[bb' T(P ( 8 ( X'ob0"* @ G;$ p 1 =0"* P GlۜĒ~  0 @HP P b['Vi(P J0(  PXN _FUNC1Y.RBRUhTA$)@yqhDAβPP*cPyP*cx lllQ([F>QR RQuOll`p2c냀Àc#M飭Hm@KÔ냀UK[$$)8 #1PPPP) CXĜ$@@@@ 1t `d}`8[$,6PRR RQuOc냀lc@KÔ냀KDؒ$ F 0 ` (tu" fD$'=r`fiSS |`[$gX 9}| 9z1 P G$8*. P 0PPPV y G$2T8 8 8ߛ0X 8XD$$yFPGEf A 0lGĒx#T`8  P  D88b( K 8X0 1}t D$b'Cp 1}t1t 16 80bG'=f~P0E GX D$$(@!h x7 .xlT;D$$ZQ {&YZZ>5;7%D$$@@!h |8J;6%D$$JNiba<<>\}<]}@?|D$$Ik N&@ s? D$$Y5 ›"*TOC\>T;D$$'u A<~D\ &D$;OČٱp' P&1}t0 @pX;$P9| 0 1}t 1}t=D$'b 1t 1    GĒ$( A!DT- @D$$o&dUA'BF͋-EC$CD$$E4fwC1q*KCݐ AD$$.GB'BMvI{C%qvqC_D$$ՑPC $C-4s`KCݐ _FUNC3Y.RBxUhA$I@,TPPtPPf PKPlllO7xc냒Q(c8Cc RXRlllY RQoTCFmÀBc飭|S(bi냃'mZKXl'$0"*=  0"*5 @b[$/H80"*- $ @H8%1G8b;x|  H @ (Xl;9*0  ( 0  ( X8b' 8 |`1   X "lGbl;F* @H0 衆PP (Pl[YT ( 8 (   DĜRvb0"* @  GĜ$p1 =0"* P  Dbl'F~ 0 @HP P (PXl`;H݌ J0(  P   _FUNC1Z.RB RUhTA$)@yqhDAβPP*cPyP*cx lllQ([F>QR RQuOll`p2c냀Àc#M飭Hm@KÔ냀UK[$$)8 #1PPPP) CXĜ$@@@@ 1t `d}`8[$,6PRR RQuOc냀lc@KÔKDؒ$ F 0 ` (tu" fD$'=r`fiSS |`[$gX 9}| 9z1 P G$8*. P 0PPPV y G$2T8 8 8ߛ0X 8XD$$yFPGEf A 0lGĒx#T`8  P  D88b( K 8X0 1}t D$b'Cp 1}t1t 16 80bG'=f~P0E GX D$$(@!h x7 .xlT;D$$ZQ {&YZZ>5;7%D$$@@!h |8J;6%D$$JNiba<<>\}<]}@?|D$$Ik N&@ s? D$$Y5 ›"*TOC\>T;D$$'u A<~D\ &D$;OČٱp' P&1}t0 @pX;$P9| 0 1}t 1}t=D$'b 1t 1    GĒ$( A!DT- @D$$o&dUA'BF͋-EC$CD$$E4fwC1q*KCݐ AD$$.GB'BMvI{C%qvqC_D$$ՑPC $C-4s`KCݐ _FUNC3Z.RB xUhA$I@,TPPtPPf PKPlllO7xc냒Q(c8Cc RXRlllY RQoTCFmÀBc飭|S(bi냃'mZKXl'$0"*=  0"*5 @b[$/H80"*- $ @H8%1G8b;x|  H @ (Xl;9*0  ( 0  ( X8b' 8 |`1   X "lGbl;F* @H0 衆PP (Pl[YT ( 8 (   DĜRvb0"* @  GĜ$p1 =0"* P  Dbl'F~ 0 @HP P (PXl`;H݌ J0(  P   _LIST1.RB6RSݕTD`FBlll%R RQ(Q(Q(c8lll,QQ.SQ 郒xN=~Q R_y5R RxlllUXyTZS{ámc냀.S_hzNÔ냀KG$0 @P @ ) '08b"@P['t*H PP*(X)()H(XbےĻ^, NE 0  P=)%  Xl'*%@%U @0  0,) D8$Ð8 5o)  ( H.i) *( D$%Fc1 $`9 % 0) )D$'T9r) p) @UbE8$'?+bJ9 < 9$,[')p+l * 8.3!  *X'$~ H))D ! m!lX'$z( (9( 99+lGL2 P (8  0ķ 9$7DġX7Z;  P   Gbbl P1 (6 #1 [I(y0 #'LQ`."D$$<<>>>==b<=<;,([,@)]D'N-+/*^T *(H,K l[$VK0 0 &5  ( PGl@T1 0 1" @ 0(bG;Ĭ   0 s P[$ۿ P0 0  #( Dl$3i&9 P0 08   PG;'h4 /X.  P' P@PXXb' B   0 ) -) X'88P-)9-! - ! )Dے$/^-0 -!_~VbGb'8Dl  8  1 *8P*H+ Ez(x _STAR1.RB:=TIO7\twnDlllۙg<ٓ# c냒c냀Ôc#wll+cQYR RRQQQQc냀K[T 8X @H0A PP P(2Dl;K8 02K(1 0 (X;J:H@ @H4 %, 8# Xl;$* 8K+, 8K+,b[$!8 8K+, 8KC 0PDl;IF (     8D$$*TF=#+ #+ #J0lG8bfb ( 0 H (0 8 0 XbtpX  P P@H$KGb@~  ($K  0 P(l[b'$  P 0' %08"+ "+D$; "+ "+  0"))D$6Ш     0 sD$$߶Q0" " " D;qi*   0 8b[$$xs @0"PB"@B"@B"@G$$cB0"@B"@B"@B"@BX$$8+ "+ "+D$(`  "+ G@ (GĒ$9' N (M 0"@B"@B"@BD;$*"@B 80#* #*D$$'M& #* # *GĒL4pX   0D88B4 0"K ( 0DllEJP 0 ( = 8HrX lG8l;ԏ^ @ H0  PP PPPPX$b'l 8#+ #+  @ @ bG8ķbzO1 $K ( P (/ ?1 bGe/ 0,    0 D8' /1  00 0 0  0"*D$Q "* jJ1 0 (!Dlb'Q  8 ( (X$(1  +-.E>Z$IH[Dl[tAC\! Z! ZiUYo _TIMER1.RB)T$I$I$IcdbZ@NZLZ [Z:ZOesZs@Z`sZ U JQP$I IXƆ@[`P[@P[ [- ZcTITCJNll`ÔCs#vǣLǣCTZRݺD4ݺÞwZD$$JGCQCYJ 8 ;3 #X8(  08! * 3! Gǒ8 &*Z! **! J%!YG8$p*% *KY! D'$89 9 #P19@ID$$H"I ))D`%W X)0 @eDeI%AOE5UK|vO'Ac _TIMER2.RB<t$I$I$Hcxbn@NnLn on:nOysns@n`sn i Jed$I$I@r@o`Po@Po o- n =b=cTYTCZNlllAÔCs#vǣLǣCTZRݺDݺÞÍcnXRwnD$$gZWSQSYJ 8 ;3 #X8.w(  83J/D$~ @! * ;! *ZXv.* *2! J-!%Y- *K/G$$c8Y!! 99 X$';F#)/! P1D*T9@YD$qY b@dD$'Gd)) XDfr)0 @yDy> 2I ]%AOU5U[|v_'Achba _TIMER3.RBٴ$I$I$4Cc|b@NL} n:Oss@`s i Jed$I$II.3@`P@P Z- hb@ =b=cTYTCZNlll3i냃mZKÔCs#voǣCTZݺDݺÞlllDRǣLCnǣpCǣ]#c~cccíǣ~ǃlllínnQQRc룔c룏U<cÍcnXR*\wD$$gZWSQSYJ 8 ;3 #X8 w (  , 83J/D$~ @! * ;! *ZXg.* *2! J-!%Y-  *KG$$`8Y!! 99 X$';F#)/!  P1D*T9@YD$qY +b@dD$8r[d))X D'Ar )0 @}b[ۆ}X @ (*J% '  lG$;1 X    eZ,X  [b[>-X N 0 *& J X C bGbО0 *& *"J   *#JDǒ$   ;#SD$$_ S;S# P D$$Gz! ) D DpD)}@DĢ$>j1 "" *= vA f Db;=s  2$ ( ]%[--8BJD'$tJ!P  1 J :Xl'8 %( !" :+#"HI#"D"%$`$ 5! "C  1 5ie!D$'M2 # 9) 3J 83 bG$b'"@ *& ! P  *& X$$ < ; I B5Az^#^wa% J " bP b!Y8 ;0xPx0uPu0vPv0wPw !M  q!L8 ; !L  qb u   q  q!?K!> ]03 q ]!8 ]b!8 3  q s  q!1)s m  qnz|481776FCOM.CM$TTI$TTIX1 $TTO($TTO15FBASIC.TM  SG! ^&1 p jjj ECLIPSEORIGINALNOVA3NOVAbڰ!5 ^5 p   #$!L \"c!R!Z!kl \b!]j q q q!gj q q qc!ikkRTOSRDOSDRDOSDMRDOSDRTOSDBRDOSDARDOSDOSDDOSRLDR/A/P/E/N/D/S RLDR/A/P/E/N/D/S RLDR/A/P/E/C/N/D/S RLDR/A9/P/E/N &RLDR/A/P/E/C/N 8RLDR/A/P/E/N/D/S LRLDR/A/P/E/N/D/S EIMQVZ_dg! ^0s n1 p !P s  q! !  qMT0CT0! ^0s n1s p ->!_P s  q !!Ѭ  qbyA`!J ^285IZ0s n0sQO1RQN1L o1b 1H9] QF nBBC!B@t1>  n!;  14Ht!F n!1 \!# \m t \! \ t \!5 \U) (0 1 q%+BASIC/S .MP/L  `, :$! ^0s n1 p     %P s \! \ml ! ^ 0R pE !g ^.0R p* sAf!^A^P@f!\ ^ [IXPs1W9S  AT!T 6fQ!P)N!FAF 07)E 1CQ?AC $fK):06 !:@s01 τ,>4=  2TD?g-*E'E' f@H5(5Y0=)0>9+"B! @sM ;@ @ g-!* ^*0s o(7  o(9  o(1  [E0=(5)ҍ0>9Ξ+" fHX E! ^ 0R pE ! ]g@?!m ^ 1 p__1_" \-410040604026ALM r xQTYM MP100 MXIO MX.LB IMUX MP26 _g5!k! ^-16k p % p  H1 _" \!% \ QTYM QTYR RD100 RD26 1" \gl ` ؂O $ALMRM ! ^0R pH`j! ^0R p!j! \! ! MDSW MDEC MDHW MDNO !' ^C15 p>aGaj!!A"! A!! a!A93 '"(;)ByY]adVWYZOSI)NGDOUBkljc ! ^0R pc! ]! ^ 0R p il!E!E 3! ^0V pd l ! ^0V pe deJ!5 ]l!2!1 ]0@l0AQB" +(1 3()P99#@B#A3" ]%.1"  !#B%'+- 1) E&N,P4R<UTD : < >  !#B%'+- 1 ) E&N,P4R<TDMATARXMATIOXMATINXPRUXBYECALLMSCRLIST1DIR1OPEROPER1INIT2INIT1MISC1DIR2CHARSTAR1ST.AR ERRORERRIOFUNC2XFUNC1XFUNC3XEXECDDDF E@F C@D$D ! \$DD \$D ! \! \ |[] , $F F \! \j!! \i! \! \%SBRTB BASICA.LB BASICB.LB BASICC.LB BASICD.LB BASICX.LB 1Wl!cj %g:J`75g:`75j g(`%#g.`+)jgg  g ` g `" \! \ DINIT Z 0@b$4DfTIMER1 SYS.LB TIMER2 SYS.LB TIMER3 SYS.LB TIMER1 SYS.L4B TIMER2 SYS.LB TIMER3 SYS.LB TIMER1 RTOS NRTOS1.LB NRTOS2.LB TIMER2 RTOS NRTOS1.LB NRTOS2.LB TIMER1 SYS.LB TIMER2 SYS.LB TIMER3 SYS.LB TIMER1 SYS.LB TIMER2 SYS.LB TIMER3 SYS.LB TIMER1 SYS.LB TIMER2 SYS.LB TIMER3 SYS.LB TIMER1 SYS.LB TIMER2 SYS.LB TIMER3 SYS.LB TIMER1 RTOS BRTOS1.LB BRTOS2.LB TIMER2 RTOS BRTOS1.LB BRTOS2.LB lZ fP(/AJ0)`g=KKAF(/0f ZIA17!@Q&>&>&D&D&h&~&&&&'0'X'r'r'r System Generation Valid answers are in parentheses. Default values are always given first and may be selected by a null response (carriage return). Defaults are followed by a list of alternatives, any one of which may be selected by typing a matching response. Object computer type (NOVA,ECLIPSE,NOVA3,ORIGINAL) ? Relocata?ble binary file ($TTP,$TTP1,$PTP,$PTP1,MT0:0,CT0:0) ? Object operating system (RDOS,RTOS,DOS) ? Command file ($TTO,$TTO1,$PTP,$PTP1,$LPT,$LPT1,MT0:0,CT0:0) ? System save file (BASIC, any disk file name) ? System save file ($TTP,$TTP1,$PTP,$PTP1,MT0:0,CT0:0) ? Multi-user system (NO,YES) ? Central processor option support: Multi-line controller (4060,4100,4026) ? Dial-up lines (NO,ALM,4060) ? Dial-up lines (NO,ALM) ? Is master console a CRT (YES,NO) ? Swapping (YES,NO) ? ' Hardware multiply/divide (NO,YES) ? Hardware floating point (NO,SING,DOUB) ? Memory management/protection (NO,YES) ? Default features acceptable (YES,NO) ? Default overlays acceptable (YES,NO) ? Valid answers to the following are: 8L O=Include feature as an overlay M=Include feature in main storage NO=Do not include feature NEW PRINT USING Accounting (YES,NO) ? BYE CALL Mark sense card reader Error message text LIST,PUNCH H File commands Operator commands  User initialization String arithmetic DELETE,RENAME,PAGE,RENUMBER,SIZE,INIT,RELEASE Console characteristics User written subroutines (NO,YES) ? Illegal SAVE file Disk and directory  commands Maximum files to be open at one time () ? Matrix arithmetic Matrix input and output Matrix inverse FOR-NEXT nesting limit (8,4-20) ? GOSUB nesting limit (8,4-20) ? USERS command User function nesting limit (6,0-10)/ ? I/O error message text ) ? Time of day with prompt (NO,YES) ? Line configuration: SIN,COS,TAN,ATN LOG,EXP,^,SQR,RND RUN filename,CHAIN,SAVE,LOAD,logon LEN,POS,STR$,VAL,ORD,CHR$ Prompt string (*-space-null, any 10 chuaracter string) ? Master console line number (-1,0-31) ? File sharing (YES,NO) ? Maximum user core size (in bytes) ? COPYRIGHT (C) DGC 1977,1978ALL RIGHTS RESERVEDLICENSED MATERIAL-PROPERTY OF DATA GENERAL CORPORATION(Extended BASIC Revision 05.10 03/01/78 (0 BASIC 05.10 Ready @5*Z"*:X8:2! H`:Y:2` Y8 ` =CKS8Z9(J+J@Z*J8H`'ABS.HF 4g5 ABS(EXP) TO RETURN THE ABSOLUTE (POSITIVE) VALUE OF EXP, WHERE EXP IS ANY VALID NUMERIC EXPRESSION. 'ATN.HF :q ATN(EXP) TO CALCULATE THE ANGLE (IN RADIANS) WHOSE TANGENT IS EXP, WHERE EXP IS ANY VALID NUMERIC EXPRESSION. 'BYE.HF | BYE TO EXIT FROM BASIC AND RETURN ONE LEVEL. DEPENDING ON HOW THE SYSTEM IS CONFIGURED, BYE WILL EITHER LOG THE USER OFF, OR RETURN HIM TO THE CLI. SYNTAX: BYE 'CALL.HF %/f CALL TO CALL A SUBROUTINE WRITTEN IN ASSEMBLY LANGUAGE FROM A BASIC PROGRAM. SYNTAX: CALL SUBROUTINE_NUMBER [ , EXPRESSION ] ... 'CARDS.HF5 3?CARDS TO TRANSFER AND MERGE BASIC STATEMENT LINES IN DGC MARK SENSE CARD FORMAT FROM THE CARD READER OR OTHER DEVICE OR A DISK FILE INTO YOUR CURRENT PROGRAM STORAGE AREA. SYNTAX: CARDS "FILENAME" OR CARDS "DEVICE_NAME" 'CHAIN.HFg ;o CHAIN TO RUN A NEW PROGRAM INSTEAD OF THE CURRENT PROGRAM. WHEN A CHAIN STATEMENT IS ENCOUNTERED, YOUR CURRENT PROGRAM AND ALL OF IT'S VARIABLES ARE CLEARED FROM MEMORY AND THE PROGRAM SPECIFIED BY "FILENAME" IS LOADED AND RUN. IF THE THEN GOTO LINE_NUMBER CLAUSE IS USED EXECUTION BEGINS FROM LINE_NUMBER, OTHERWISE EXECUTION BEGINS FROM THE FIRST STATEMENT. ANY OPEN FILES REMAIN OPEN. SYNTAX: CHAIN "FILENAME" [ THEN GOTO LINE_NUMBER ] 'CHAR.HF5 mXCHAR TO CHANGE THE CURRENT DEVICE CHARACTERISTICS, OR DISPLAY THE CURRENT DEVICE CHARACTERISICS. THE CHARACTERISTICS WHICH CAN BE TURNED ON AND OFF ARE: NCR - NO CARRIAGE RETURN ECHO DSP - DISABLE SPOOLING DLC - DISABLE LINE FEED AFTER CARRIAGE RETURN XON - XON/XOF PROTOCOL FOR $TTR DNF - DISABLE 20 NULLS AFTER FORM FEED NOE - NO ECHO OF INPUT BSP - BACKSPACE FOR RUBOUT MOD - MODEM LINE DTS - DISABLE TAB SIMULATION ESC - ESCAPE CHARACTER PRODUCES INTERRUPT NRM - NON RECEIVE MODE %[ "ON" ] [ , "ON" ] SYNTAX: CHAR [ "OFF" ] [ , "OFF" ] ... [ "CHARACTERISTICS" ] [ , "CHARACTERISTICS" ] 'CHATR.HF5 !%CHATR TO CHANGE, ADD OR REMOVE THE RESOLUTION FILE ATTRIBUTES ASSIGNED TO A FILE WHICH ALREADY EXISTS IN YOUR DIRECTORY. THE ATTRIBUTES WHICH MAY BE ADDED OR REMOVED ARE: P - PERMANENT FILE R - READ-PROTECTED W - WRITE-PROTECTED H - SHARABLE, YPERMANENT AND WRITE-PROTECTED FILE O - SHARABLE E - EXECUTE ONLY 0 - REMOVES CURRENT FILE ATTRIBUTES * - PRESERVE CURRENT FILE ATTRIBUTES - - REMOVE THE FOLLOWING ATTRIBUTES + - ADD THE FOLLOWING ATTRIBUTES SYNTAX: CHATR "FILENAME" , "ATTRIBUlTES" 'CHR$.HF<'ţCHR$(NUMERIC_EXPRESSION) TO RETURN THE CHARACTER REPRESENTED BY THE NUMERIC_EXPRESSION (MOD 128) IN THE ASCII COLLATING SEQUENCE. 'CLOSE.HFf 5 CLOSE TO DISASSOCIATE A FILENAME AND A FILE NUMBER SO THAT THE FILE CAN NO LONGER BE REFERENCED. IF THE FILE(FILE_NO) ARGUMENT IS NOT USED, ALL FILES ARE CLOSED. SYNTAX: CLOSE [ FILE(FILE_NO) ] 'CON.HFf 7vZ CON TO CONTINUE THE EXECUTION OF A BASIC PROGRAM AFTER A STOP STATEMENT HAS BEEN EXECUTED, THE ESCAPE KEY HAS BEEN PRESSED, OR AN ERROR HAS OCCURRED. SYNTAX: CON 'COS.HF t COS(EXP) TO CALCULATE THE COSINE OF AN ANGLE WHICH IS EXPRESSED IN RADIANS. EXP IS ANY VALID NUMERIC EXPRESSION. 'CPU.HF4TCPU(EXP) TO RETURN A VALUE EQUAL TO THE STATUS OF A CPU DATA SWITCH (EXP = 0 THROUGH 15) OR THE NUMERIC VALUE OF ALL 16 DATA SWITCHES (EXP = -1). 'DATA.HF $ DATA TO PROVIDE VALUES FOR VARIABLES SPECIFIED IN A [MAT] READ STATEMENT. SYNTAX: DATA NUMERIC_VALUE [ , NUMERIC_VALUE ] ... "STRING_LIT" [ , "STRING_LIT" ] 'DEF.HF  DEF TO PERMIT YOU TO DEFINE AS MANY AS 26 DIFFERENT FUNCTIONS WHICH CAN BE REPEATEDLY REFERENCED THROUGHOUT A PROGRAM. ONLY SINGLE LINE NUMERIC FUNCTIONS ARE PERMITTED. EACH FUNCTION RETURNS A NUMERIC VALUE. SYNTAX: DEF FN#(SIMPLE_NUMERIC_VARIABLE) = 8SNUMERIC_EXPRESSION WHERE: # IS A SINGLE LETTER (A-Z). 'DELAY.HF ,I DELAY TO DELAY IN SECONDS THE EXECUTION OF THE BASIC PROGRAM FOR A SPECIFIED AMOUNT OF TIME. SYNTAX: DELAY = NUMERIC_EXPRESSION 'DELETE.HF /I DELETE TO REMOVE A FILE FROM YOUR DIRECTORY. SYNTAX: DELETE "FILENAME" 'DET.HFf :B DET(X) TO OBTAIN THE DETERMINANT OF THE LAST MATRIX INVERTED BY A MAT INV STATEMENT. SYNTAX: NUMERIC_VARIABLE = DET(X) WHERE X IS A DUMMY EXPRESSION (REQUIRED BUT NOT USED). 'DIM.HF DIM TO DEFINE THE SIZE OF ONE OR MORE NUMERIC VARIABLE ARRAYS OR THE MAXIMUM LENGTH OF ONE OR MORE STRING VARIABLES. STRING_VAR(NUM_EXP) [ , STRING_VAR(NUM_EXP) ] SYNTAX: DIM NUMERIC_VAR(NUM_EXP,NUM_EXP) [ , NUMERIC_VAR(NUM_EXP,NUM_EXP) ] A... NUMERIC_VAR(NUM_EXP) [ , NUMERIC_VAR(NUM_EXP) ] 'DIRCMNDS.HF4DIRECTORY COMMANDS TO PRINT THE NAME OF YOUR DIRECTORY USE GDIR. SYNTAX: GDIR TO CHANGE THE CURRENT DIRECTORY ON THE CURRENT PRIMARY DEVICE TO ANOTHER DIRECTORY ON THE SAME OR DIFFERENT PRIMARY DEVICE USE DIR. THE DIR COMMAND IS A PRIVELEGED k~ACTION. SYNTAX: DIR PRIMARY_PART [ :SECONDARY_PART ] [ :SUBDIRECTORY ] SECONDARY_PART [ :SUBDIRECTORY ] 'DISABLE.HF42DISABLE TO PREVENT THE INADVERTENT USE OF CTRL-A, CTRL-C AND CTRL-F (BACKGROUND) RDOS SYSTEM CONSOLE BREAKS. DISABLE IS A PRIVELEGED COMMAND. SYNTAX: DISABLE 'DISK.HF c\/ DISK TO DETERMINE THE NUMBER OF 256-WORD BLOCKS STILL AVAILABLE IN YOUR DIRECTORY. SYNTAX: DISK 'ENABLE.HF42ENABLE TO RESTORE RECOGNITION OF OF THE CTRL-A, CTRL-C AND CTRL-F (BACKGROUND) RDOS SYSTEM CONSOLE BREAKS. ENABLE IS A PRIVELEGED COMMAND. SYNTAX: ENABLE 'END.HF 9_ END TO TERMINATE EXECUTION OF THE BASIC PROGRAM AND RETURN TO INTERACTIVE MODE. SYNTAX: END 'ENTER.HFft ENTER TO TRANSFER AND MERGE THE BASIC STATEMENT LINES FROM THE DEVICE OR DISK FILE NAMED BY "FILENAME" INTO YOUR CURRENT PROGRAM STORAGE AREA. SYNTAX: ENTER "FILENAME" 'EOF.HFf8m EOF(FILE_NO) TO DETECT THE END OF DATA WHEN TRANSFERRING DATA FROM A FILE. FILE_NO IS A NUMERIC EXPRESSION WHICH EVALUATES TO A FILE OPENED FOR READING BY AN OPEN STATEMENT. THE EOF FUNCTION RETURNS A VALUE OF 1 IF THE END OF FILE INDICATOR IS ON AWND A 0 IF IT IS NOT. 'ERASE.HF2 ERASE TO REMOVE, INCLUSIVELY, THE STATEMENTS LINE_NUMBER1 THROUGH LINE_NUMBER2 FROM YOUR BASIC PROGRAM. SYNTAX: ERASE LINE_NUMBER_1 , LINE_NUMBER_2 'EXP.HF 4 EXP(EXPR) TO CALCULATE THE VALUE OF E (2.71828) TO THE POWER OF EXPR, WHERE EXPR IS ANY VALID NUMERIC EXPRESSION WHICH EVALUATES TO A VALUE IN THE RANGE -178 THROUGH 175. 'FILE.HF45BFILE TO PRINT ALL THE FILE NAMES IN YOUR DIRECTORY. SYNTAX: FILE 'FNX.HF  FNX(EXP) TO EVALUATE THE USER-DEFINED FUNCTION FN'X' WITH ARGUMENT EXP, WHERE EXP IS ANY VALID NUMERIC EXPRESSION. THE VALUE RETURNED BY THE FUNCTION IS SPECIFIED IN THE DEF STATEMENT FOR EACH FUNCTION. ALL FUNCTIONS MUST HAVE AN ARGUMENT WHEN THYEY ARE REFERENCED, EVEN IF THE ARGUMENT IS NOT USED IN THE EVALUATION OF THE FUNCTION. 'FORNEXT.HF4 FOR NEXT TO EXECUTE A BLOCK OF STATEMENTS A SPECIFIED NUMBER OF TIMES. SYNTAX: FOR SIMPLE_NUM_VAR = NUM_EXP TO NUM_EXP [ STEP NUM_EXP ] . . BLOCK OF STATEMENTS . . NEXT SIMPLE_NUM_VAR 'FREE.HF4 FREE TO INTERRUPT EXECUTION OF THE PROGRAM WHICH IS BEING PROCESSED FOR A USER. FREE IS A PRIVELEGED COMMAND. SYNTAX: FREE USER_ID 'GOSUBRETRN.HF{ GOSUB_RETURN GOSUB DIRECTS PROGRAM CONTROL TO THE FIRST STATEMENT OF A SUBROUTINE. THE FIRST STATEMENT OF THE SUBROUTINE IS SPECIFIED BY THE LINE_NUMBER ARGUMENT IN THE GOSUB STATEMENT. RETURN EXITS THE SUBROUTINE AND RETURNS PROGRAM CONTROL TO LsTHE STATEMENT FOLLOWING THE GOSUB STATEMENT. SYNTAX: GOSUB LINE_NUMBER . . PROGRAM STATEMENTS LINE_NUMBER . . SUBROUTINE STATEMENTS RETURN 'GOTO.HFfu GOTO UNCONDITIONALLY TRANSFERS CONTROL TO THE STATEMENT NUMBER SPECIFIED BY LINE_NUMBER. SYNTAX: GOTO LINE_NUMBER 'GPOS.HF4 GPOS TO DETERMINE THE CURRENT FILE POINTER POSITION IN AN OPEN FILE. THE RESULTANT VALUE IS ASSIGNED TO THE SPECIFIED VARIABLE. SYNTAX: GPOS FILE(FILE_NO) , NUMERIC_VARIABLE 'HELP.HF{ 'x=BASIC STATEMENTS AND COMMANDS ARE: BYE CALL CARDS CHAIN CHAR CHATR CLOSE CON DATA DEF DELAY DELETE DIM DIRCMNDS DISABLE DISK ENABLE END ENTER 4 ERASE FILE FORNEXT FREE GOSUBRETRN GOTO GPOS IFTHEN INPUT KILL LET LEVEL LIBRARY LIST LOAD LREAD LWRITE MAT MAX MSG NE7W ON ONERR ONESC OPEN OPERCMNDS OPERMSGS PAGE PRINT PRINTUSING PUNCH RANDOMIZE READ REM RENAME RENUMBER RESET RESTORE RETRY RUN SAVE SHARECMNDS$ SIZE SPOS STOP TABSET TIME TINPUT USERS WHATS  WRITE BASIC FUNCTIONS ARE: ABS ATN CHR$ COS CPU DET FNX EOF EXP INT LEN LOG ORD POS RND SGN SIN SQR STR SYS TAB TAN VAL FOR MORE HELP ON ANY OF THE ABOVE ITEMS TYPE 'HELP "ITEM"'. 'IFTHEN.HF{  IF THEN TO CONDITIONALLY EXECUTE A STATEMENT BASED ON THE LOGICAL VALUE OF A NUMERIC OR RELATIONAL EXPRESSION. SYNTAX: IF [ RELATIONAL_EXPRESSION ] [ [ THEN ] IF_STATEMENT ] [ NUMERIC_EXPRESSION ] [ THEN LINE_NUMBER ] WHERE: IF_STATEMENT IS AC NY BASIC STATEMENT EXCEPT FOR, NEXT DEF, END, DATA OR REM. 'INPUT.HFfo INPUT TO REQUEST DATA FROM YOUR TERMINAL OR A FILE AND ASSIGN THE VALUES TO A LIST OF VARIABLES. SYNTAX: INPUT [ PROMPT, ] VARIABLE [[ ,VARIABLE ]...] [ ; ] OR INPUT FILE(FILE_NO [ ,RECORD_NO ]), VARIABLE [[ ,VARIABLE ]...] 'INT.HF 8xP& INT(EXP) TO RETURN THE VALUE OF THE NEAREST INTEGER NOT GREATER THAN EXP, WHERE EXP IS ANY VALID NUMERIC EXPRESSION. 'KILL.HF5 cKILL TO FORCE A SPECIFIC USER OFF THE SYSTEM. KILL IS A PRIVELEGED COMMAND. SYNTAX: KILL USER_ID 'LEN.HF :w LEN(STR_VAR) TO RETURN THE VALUE EQUAL TO THE NUMBER OF CHARACTERS CURRENTLY ASSIGNED TO STRING VARIABLE 'STR_VAR'. 'LET.HF g/ LET TO EVALUATE AN EXPRESSION AND ASSIGN THE RESULT TO A VARIABLE. SYNTAX: LET VARIABLE = EXPRESSION 'LEVEL.HF5 LEVEL TO DISPLAY OR SET THE PRIORITY CONSTANT FOR ANY USER. SYNTAX: LEVEL [ USER_ID ] [ N ] WHERE N IS IN THE RANGE 1 THROUGH 49. ANY USER MAY ISSUE THE LEVEL COMMAND WITHOUT ARGUMENTS TO DETERMINE HIS/HER OWN VALUE OF N. ONLY THE SYSTEM OPERATO+R MAY SET N OR DISPLAY N FOR ANOTHER USER. 'LIBRARY.HF5 &ILIBRARY TO DISPLAY THE FILENAMES IN DIRECTORY BASIC.DR SYNTAX: LIBRARY 'LIST.HFf&- LIST TO OUTPUT PART OR ALL OF YOUR CURRENT PROGRAM IN ASCII FORMAT TO THE DISK FILE OR DEVICE SPECIFIED BY "FILENAME", OR TO YOUR TERMINAL IF "FILENAME" IS NOT SPECIFIED. [ LINE_NUMBER_1 ] [ TO LINE_NUMBER_2 ] SYNTAX: LIST |^[ LINE_NUMBER_1 TO LINE_NUMBER_2 ] [ "FILENAME" ] [ , LINE_NUMBER_2 ] [ LINE_NUMBER_1 , LINE_NUMBER_2 ] 'LOAD.HFg  LOAD TO MOVE A PROGRAM THAT WAS PREVIOUSLY CREATED BY A SAVE COMMAND INTO YOUR WORKING STORAGE AREA FROM THE DISK FILE OR DEVICE SPECIFIED BY "FILENAME". SYNTAX: LOAD "FILENAME" 'LOG.HF 1l! LOG(EXP) TO CALCULATE THE NATURAL LOGARITHM OF EXP, WHERE EXP IS ANY VALID POSITIVE NUMERIC EXPRESSION. 'LREAD.HF ? LREAD TO READ A STRING FROM THE TERMINAL, OR TO READ A STRING IN BINARY FORMAT FROM A SEQUENTIAL OR RANDOM FILE, TERMINATED BY EITHER A NULL, FORM-FEED, OR NEW-LINE. SYNTAX: LREAD [ PROMP_STRING , ] STRING_VAR [ , STRING_VAR ] OR LREAD FILE(FILE_NO .\[ ,RECORD_NO ] ), STRING_VAR [ , STRING_VAR ] 'LWRITE.HF  LWRITE TO WRITE A STRING TO YOUR TERMINAL, OR TO WRITE A STRING IN BINARY FORMAT TO A SEQUENTIAL OR RANDOM FILE, TERMINATED BY EITHER A NULL, FORM-FEED, OR NEW-LINE. SYNTAX: LWRITE STRING_EXP [ , STRING_EXP ] OR LWRITE FILE(FILE_NO [ ,RECORD_NO ] ), STRING_EXP [ , STRING_EXP ] 'MAT.HFf4_ MAT BASIC ALLOWS THE FOLLOWING TYPES OF OPERATIONS ON MATRICES: 1. ARITHMETIC OPERATIONS OF ADDITION, SUBTRACTION, ASSIGNMENT AND MULTIPLICATION. + SYNTAX: MAT MATRIX_VAR_1 = MATRIX_VAR_2 [[ - ] MATRIX_VAR_3 ]  ( NUMERIC_EXP ) * >&MATRIX_VAR_2 2. MATRIX FUNCTIONS FOR TRANSPOSITION, INVERSION AND INITIALIZATION. FOR INFORMATION ABOUT THESE FUNCTIONS, TYPE 'HELP "MAT_FUNCTIONS"'. 3. ALL I/O OPERATIONS (INPUT, PRINT, READ, TINPUT AND WRITE) MAY ALSO BE APPLIED TO MATRIC?ES BY INSERTING THE KEYWORD 'MAT' INTO THE I/O STATEMENT. INPUT AND OUTPUT OF ENTIRE MATRICES IS DONE ROW BY ROW. MATRICES CAN BE DIMENSIONED DURING AN INPUT OPERATION BY SPECIFYING A ROW AND (OPTIONALLY) A COLUMN ALONG WITH THE MATRIX VARIA/ BLE. READ [ FILE (FILE_NO [ ,RECORD ]) , ] INPUT [ FILE (FILE_NO [ ,RECORD ]) , ] [[ MVAR [(ROW,COL)] ,...] SYNTAX: MAT TINPUT [ (LINE_NO [ ,TIME ]), [ PROMPT, ] PRINT [ FILE (FILE_NO [ ,RECORD ]), ] [ MVAR [[, OR ;] MVAR ]...] A WRITE FILE (FILE_NO [ ,RECORD ]), [ MVAR [ , MVAR ]...] 'MATFUNCS.HF5 MATRIX THE FOLLOWING FUNCTIONS ARE USED TO PERFORM MATRIX FUNCTIONS INVERSION AND TRANSPOSITION: MAT MATRIX_VAR_1 = INV( MATRIX_VAR_2 ) MAT MATRIX_VAR_1 = TRN( MATRIX_VAR_2 ) THE FOLLOWING FUNCTIONS ARE USED TO INITIALIZE A MATRIX TO ALL ZEROES,P ALL ONES OR THE IDENTITY MATRIX AND (OPTIONALLLY) TO PROVIDE ITS DIMENSIONS: MAT MATRIX_VAR_1 = ZER [ (ROW,COLUMN) ] MAT MATRIX_VAR_1 = CON [ (ROW,COLUMN) ] MAT MATRIX_VAR_1 = IDN [ (ROW,COLUMN) ] 'MAX.HF4rMAX TO ESTABLISH A LIMIT FOR THE NUMBER OF ACTIVE USERS. SYNTAX: MAX [ = VALUE ] WHERE VALUE IS AN INTEGER IN THE RANGE 0 THROUGH 33. IF NO ARGUMENT IS SPECIFIED THEN THE CURRENT VALUE OF MAX WILL BE DISPLAYED. MAX IS A PRIVELEGED COMMAND. 'MSG.HF5 dA MSG TO TRANSMIT A MESSAGE FROM YOUR TERMINAL TO ANOTHER PROGRAMMER OR TO THE SYSTEM OPERATOR. SYNTAX: MSG [ USER_ID MESSAGE ] THE MSG COMMAND (WITH NO ARGUMENTS) MAY ALSO BE USED TO ALLOW OTHER USERS TO SEND MESSAGES TO YOU. TO PREVENT OTHER USERS FOROM SENDING YOU MESSAGES, USE THE CHAR COMMAND WITH THE 'NRM' CHARACTERISTIC. 'NEW.HFf1 NEW TO CLEAR THE PROGRAM AND DATA STORAGE AREAS, CLOSE ANY OPEN FILES, AND OPTIONALLY 'ENTER' A NEW PROGRAM FROM THE FILE OR DEVICE SPECIFIED BY "FILENAME". SYNTAX: NEW [ "FILENAME" ] 'ON.HF  ON TO TRANSFER CONTROL TO ONE OF SEVERAL STATEMENTS IN A PROGRAM DEPENDING ON THE COMPUTED VALUE OF AN EXPRESSION. [ GOTO ] SYNTAX: ON NUMERIC_EXPRESSION [ GOSUB ] LINE_NUMBER [[ ,LINE_NUMBER ]...] #ONERR.HF{ ,ON ERR TO DIRECT YOUR PROGRAM TO AN ERROR HANDLING ROUTINE BEGINNING AT LINE_NUMBER INSTEAD OF THE BASIC SYSTEM ERROR HANDLER WHENEVER AN ERROR IS ENCOUNTERED OR TO EXECUTE A BASIC STATEMENT. [THEN] STATEMENT SYNTAX: ON ERR THEN LINE_NUMBER SyWHERE: STATEMENT IS ANY BASIC STATEMENT EXCEPT FOR, NEXT DEF, END, DATA OR REM. 'ONESC.HF{ 'NON ESC TO DIRECT YOUR PROGRAM TO AN ESCAPE HANDLING ROUTINE WHENEVER THE TERMINAL ESCAPE SEQUENCE IS DETECTED, INSTEAD OF THE BASIC SYSTEM ESCAPE HANDLER OR TO EXECUTE A BASIC STATEMENT. [THEN] STATEMENT SYNTAX: ON ESC THEN LINE_NUMBER WHERE: L6STATEMENT IS ANY BASIC STATEMENT EXCEPT FOR, NEXT, DEF, END, DATA OR REM. 'OPEN.HF{ -$ OPEN TO ASSIGN A FILE NUMBER AND ACCESS MODE TO 'FILENAME' FOR FUTURE REFERENCING IN FILE I/O STATEMENTS IN YOUR PROGRAM. SYNTAX: OPEN FILE (FILE_NO,MODE), "FILENAME" [ ,LOGICAL_RECORD_LENGTH ] WHERE FILE_NO IS A NUMERIC EXPRESSION IN THE RANGE 0 TO 72L, AND MODE IS A NUMERIC EXPRESSION IN THE RANGE 0 TO 3. THE MODES ARE: 0: OPENS AN EXISTING FILE (CREATES A NEW FILE IF NON-EXISTANT) FOR INPUT AND/OR OUTPUT WITH A DEFAULT LOGICAL RECORD LENGTH OF 128 BYTES. 1: EXCLUSIVELY OPENS A NEW FILǮE (DELETES OLD FILE IF EXISTANT). 2: EXCLUSIVELY OPENS AN EXISTING FILE (CREATES A NEW FILE IF NON-EXISTANT) FOR APPENDING. 3: OPENS AN EXISTING FILE (ERROR IF NON-EXISTANT) FOR INPUT ONLY. 'OPERCMNDS.HF4n OPERATOR SYSTEM COMMANDS THE FOLLOWING RDOS SYSTEM COMMANDS ARE AVAILABLE FROM THE SYSTEM CONSOLE: INIT - TO INITIALIZE A DIRECTORY OR DEVICE RELEASE - TO RELEASE A DIRECTORY OR DEVICE CPART - TO CREATE A SECONDARY PARTITION CDIR - TO CREAڈTE A SECONDARY DIRECTORY INIT NAME RELEASE NAME SYNTAX: CPART NAME , SIZE CDIR NAME WHERE NAME IS A STRING_VARIABLE OR STRING_LITERAL CONTAINING THE DIRECTORY OR DEVICE NAME, AND SIZE IS AN INTEGER VALUE. 'OPERMSGS.HF5 4o OPERATOR MESSAGE COMMANDS THE FOLLOWING COMMANDS FOR SENDING MESSAGES ARE AVAILABLE FROM THE SYSTEM CONSOLE: ALL - TO TRANSMIT A MESSAGE TO ALL ACTIVE USERS WHO HAVE NOT SET THE 'NRM' CHARACTERISTIC. FALL - FORCES THE TRANSMISSION OF A MESSAGEi TO ALL ACTIVE USERS WHETHER OR NOT 'NRM' IS SET. FMSG - FORCES THE TRANSMISSION OF A MESSAGE TO A SPECIFIC USER. ALL MESSAGE SYNTAX: FALL MESSAGE FMSG USER_ID MESSAGE 'ORD.HF<%|0ORD(STRING_EXP) TO RETURN THE ORDINAL POSITION IN THE ASCII COLLATING SEQUENCE OF THE SINGLE-CHARACTER STRING_EXPRESSION. 'PAGE.HFg )S PAGE TO SET THE RIGHT MARGIN OF YOUR TERMINAL. (THE DEFAULT PAGE WIDTH IS 80.) SYNTAX: PAGE = NUMERIC_EXPRESSION WHERE NUMERIC_EXPRESSION MUST BE A VALUE BETWEEN 8 AND 255, AND GREATER THAN OR EQUAL TO THE CURRENT TAB SETTING. 'POS.HFU POS([ STR_VAR_1 ] , [ STR_VAR_2 ] , NUMERIC_EXPRESSION) [ STR_LIT_1 ] [ STR_LIT_2 ] TO DETERMINE THE POSITION OF A SUBSTRING (STR_VAR_2 OR STR_LIT_2) IN A STRING (STR_VAR_1 OR STR_LIT_1) BEGINNING AT THE POSITION GIVEN BY NUMERIC_EXPRESION. =THE VALUE OF NUMERIC EXPRESSION MUST BE GREATER THAN ZERO. 'PRINT.HF 2" PRINT TO PERFORM ONE OF THE FOLLOWING PRINT OPERATIONS AT YOUR TERMINAL OR TO A FILE: 1. PRINT THE RESULT OF A COMPUTATION. 2. PRINT THE CHARACTERS IN A STRING VARIABLE OR STRING LITERAL. 3. PRINT A COMBINATION OF OPERATIONS 1 AND 2. 4. PRINT A BLANK LINE (SKIP A LINE). SYNTAX: PRINT [ PRINT_EXP_LIST ] OR PRINT FILE(FILE_NO[ ,RECORD_NO ]), [ PRINT_EXP_LIST ] WHERE PRINT_EXP_LIST IS: [ EXPRESSION ] EXPRESSION [ STRING_VAR ] [[ SEPARATOR STRING_VAR ]...] [ SEPARATOR ] [ STRINGJȱ_LIT ] STRING_LIT AND SEPARATOR IS A COMMA OR SEMI-COLON. 'PRINTUSING.HF4 4;PRINT_USING TO OUTPUT THE VALUES OF THE EXPRESSIONS IN THE STATEMENT TO EITHER THE TERMINAL OR A FILE USING THE SPECIFIED FORMAT. SYNTAX: PRINT USING FORMAT, PRINT_EXPRESSION_LIST OR PRINT FILE (FILE_NO [,RECORD_NO]), USING FORMAT, PRINT_EXPRESSION_LIST WHERE: FORMAT IS A STRING_VARIABLE OR STRING_LITERAL CONTAINING THE DESIRED FORMAT MASK AND PRINT_EXPRESSION_LIST IS THE SAME AS FOR THE PRINT STATEMENT. 'PUNCH.HF4fPUNCH TO OUTPUT ALL OR PART OF THE CURRENT PROGRAM IN ASCII TO THE TERMINAL PUNCH. [ LINE_NUMBER_1 ] [ TO LINE_NUMBER_2 ] SYNTAX: PUNCH [ , LINE_NUMBER_2 ] [ LINE_NUMBER_1 TO LINE_NUMBER_2 ] [ LINE_NUMBER_1 , LINE_NUMBER_2 ] 'RANDOMIZE.HFq RANDOMIZE TO CAUSE THE RANDOM NUMBER GENERATOR TO START AT A DIFFERENT POINT IN THE SEQUENCE OF RANDOM NUMBERS GENERATED BY THE RND FUNCTION. SYNTAX: RANDOMIZE 'READ.HFg -G READ TO READ VALUES FROM THE DATA LIST (DATA STATEMENTS) AND ASSIGN THEM TO THE VARIABLE(S) IN THE READ STATEMENT; OR TO READ DATA IN BINARY FORMAT FROM A DISK FILE OR A DEVICE. SYNTAX: READ VARIABLE [[ , VARIABLE ]...] OR READ FILE (FILE_NO [ ,RECOR&D_NO ]), VARIABLE [[ , VARIABLE ]...] 'REM.HF H REM TO INSERT COMMENTS WITHIN A PROGRAM. SYNTAX: REM [ MESSAGE TEXT ] 'RENAME.HFZ RENAME TO RENAME A FILE IN YOUR DIRECTORY. SYNTAX: RENAME "OLDFILENAME" , "NEWFILENAME" 'RENUMBER.HF{ 5 RENUMBER TO RENUMBER THE STATEMENTS IN THE CURRENT PROGRAM. THE FIRST LINE OF THE PROGRAM IN NUMBERED INITIAL_LINE_NUMBER AND EACH STATEMENT AFTER IT IS INCREMENTED BY INCREMENT_VALUE. THE DEFAULT VALUE FOR INITIAL_LINE_NUMBER IS 10. IF NO VALyUE FOR INCREMENT_VALUE IS GIVEN, THEN THEN THE VALUE OF INTIAL_LINE_NUMBER IS USED FOR INCREMENT_VALUE. [ INITIAL_LINE_NUMBER ] [ STEP INCREMENT_VALUE ] SYNTAX: RENUMBER [ , INCREMENT_VALUE ] [ INITIAL_LINE_NUMBER STEP INCREMENT_VALUE 3G] [ INITIAL_LINE_NUMBER , INCREMENT_VALUE ] 'RESET.HF9aO RESET TO POSITION THE FILE POINTER TO THE BEGINNING OF A FILE. SYNTAX: RESET [ FILE(FILE_NO) ] 'RESTORE.HFg P RESTORE TO RESET THE POSITION OF THE DATA ELEMENT POINTER IN THE DATA_LIST (THE COLLECTION OF ALL DATA VALUES IN THE PROGRAM DATA STATEMENTS). IF THE OPTIONAL LINE_NUMBER ARGUMENT IS USED, THEN THE POINTER IS POSITIONED TO THE FIRST DATA VALUE OF THAT STATEMENT. IF LINE_NUMBER IS NOT USED, THE POINTER IS POSITIONED TO THE FIRST DATA VALUE OF THE FIRST DATA STATEMENT IN THE PROGRAM. SYNTAX: RESTORE [ LINE_NUMBER ] 'RETRY.HF,T  RETRY TO REPEAT THE EXECUTION OF A STATEMENT WHICH CAUSED AN ERROR. SYNTAX: RETRY 'RND.HFo RND(EXP) TO PRODUCE A PSUEDO-RANDOM NUMBER THAT IS GREATER THAN OR EQUAL TO ZERO AND LESS THAN ONE. A NUMERIC EXPRESSION IS REQUIRED AS AN ARGUMENT, BUT IT IS NOT USED. THE PSEUDO- RANDOM NUMBERS ARE GENERATED IN A FIXED SEQUENCE UNTIL A RANDOMIZE+3 STATEMENT IS EXECUTED. 'RUN.HFg  RUN TO EXECUTE THE CURRENT PROGRAM EITHER FROM THE FIRST LINE OR FROM A SPECIFIED LINE NUMBER; OR TO EXECUTE A SAVED PROGRAM, SPECIFIED BY "FILENAME", FROM THE FIRST LINE. SYNTAX: RUN ([ LINE_NUMBER ] ) [ "FILENAME" ] 'SAVE.HFg \z SAVE TO WRITE THE CURRENT PROGRAM TO A DISK FILE OR TO A DEVICE SPECIFIED BY "FILENAME" IN BINARY FORMAT. SYNTAX: SAVE "FILENAME" 'SGN.HFg #ٯ> SGN(EXP) TO RETURN A VALUE WHICH REPRESENTS THE ALGEBRAIC SIGN OF EXP, WHERE EXP IS ANY VALID NUMERIC EXPRESSION. THE VALUE RETURNED IS: 1 IF EXP IS POSITIVE 0 IF EXP IS ZERO -1 IF EXP IS NEGATIVE 'SHARECMNDS.HF5  SHARE COMMANDS THE FOLLOWING COMMANDS MAY BE USED INSTEAD OF THE CHATR COMMAND TO ADD/REMOVE THE SHARE ATTRIBUTE TO/FROM A FILE. SYNTAX: SHARE "FILENAME" AND UNSHARE "FILENAME" 'SIN.HFr SIN(EXP) TO CALCULATE THE SINE OF AN ANGLE WHICH IS EXPRESSED IN RADIANS. EXP IS ANY VALID NUMERIC EXPRESSION. 'SIZE.HFKSL SIZE TO DISPLAY THE CURRENT PROGRAM AND DATA STORAGE USAGE. SYNTAX: SIZE 'SPOS.HF88 SPOS TO MOVE THE FILE POINTER TO THE BYTE POSITION SPECIFIED BY THE NUMERIC EXPRESSION. SYNTAX: SPOS FILE(FILE_NO) , NUMERIC_EXPRESSION 'SQR.HF cU SQR(EXP) TO COMPUTE THE SQUARE ROOT OF EXP, WHERE EXP IS ANY VALID POSITIVE NUMERIC EXPRESSION. 'STOP.HFk=Q STOP TO TERMINATE EXECUTION OF THE CURRENT PROGRAM AND RETURN CONTROL TO INTERACTIVE MODE. SYNTAX: STOP 'STR.HF < STR$(EXP) TO CONVERT THE NUMERIC VALUE OF EXP TO A STRING. 'SYS.HF5 :l SYS(EXP) TO RETURN SYSTEM INFORMATION BASED ON THE VALUE OF EXP. EXP IS ANY VALID NUMERIC EXPRESSION WHICH EVALUATES TO AN INTEGER BETWEEN 0 AND 19. THE SYSTEM FUNCTIONS ARE DEFINED AS FOLLOWS: 0 - SECONDS PAST MIDNIGHT 10 - TAB SIZE 1 - DAY O7F THE MONTH 11 - HOURS (CURRENT TIME) 2 - MONTH OF THE YEAR 12 - MINUTES (CURRENT TIME) 3 - THE CURRENT YEAR 13 - SECONDS (CURRENT TIME) 4 - TERMINAL PORT NUMBER 14 - SECONDS OF TIMED INPUT 5 - CPU TIME (IN SECONDS) 15 - PI (3.14159) 6n - FILE I/O USAGE COUNT 16 - E (2.71828) 7 - LAST ERROR CODE 17 - 1/10 SECOND CLOCK 8 - LAST FILE NUMBER USED 18 - TOTAL BASIC I/O CALLS 9 - PAGE SIZE 19 - LAST ERROR LINE NUMBER 'TAB.HF G TAB(EXP) TO MOVE THE PRINT POSITION TO THE COLUMN NUMBER GIVEN BY EXP. EXP IS ANY VALID NUMERIC EXPRESSION WHICH WHEN EVALUATED IS TRUNCATED TO GIVE AN INTEGER RESULT. 'TABSET.HF4 .TAB_SET TO SET THE ZONE SPACING BETWEEN THE DATA OUTPUT BY A PRINT STATEMENT. ( THE DEFAULT VALUE IS 14. ) SYNTAX: TAB = NUMERIC_EXPRESSION WHERE: THE VALUE OF THE NUMERIC EXPRESSION MUST BE IN THE RANGE 1 <= NUMERIC_EXPRESSION <= PAGE WIDTH.. 'TAN.HF 'uE TAN(EXP) TO CALCULATE THE TANGENT OF AN ANGLE WHICH IS EXPRESSED IN RADIANS. EXP IS ANY VALID NUMERIC EXPRESSION. 'TIME.HF TIME TO ESTABLISH THE TIME LIMIT FOR TIMED INPUT (TINPUT) OPERATION. SYNTAX: TIME = NUMERIC_EXPRESSION WHERE: NUMERIC_EXPRESSION REPRESENTS TIME IN SECONDS. 'TINPUT.HFg ,e TINPUT TO ASSIGN, WITHIN A PRESCRIBED PERIOD OF TIME, THE VALUES SUPPLIED BY INPUT FROM THE TERMINAL TO A LIST OF VARIABLES. IF LINE_NUMBER IS USED, THE PROGRAM WILL BRANCH TO THE LINE SPECIFIED WHEN TIME HAS ELAPSED. IF LINE_NUMBER IS NOT SPECIFIED, AN ERROR RESULTS WHEN TIME HAS ELAPSED. THE VALUE OF SYS(14) IS USED IF TIME IS NOT SPECIFIED. SYNTAX: TINPUT [ (LINE_NUMBER [ ,TIME ]), ] [ PROMPT, ] VARIABLE_LIST 'USERS.HF4#fUSERS TO PRINT A STATUS REPORT, ON THE SYSTEM CONSOLE, OF ALL ACTIVE USERS OR IF AN ARGUMENT IS SPECIFIED, ONLY A SINGLE USER. USERS IS A PRIVELEGED COMMAND. SYNTAX: USERS [ USER_ID ] 'VAL.HFg 4n  VAL([STR_VAR]) TO CONVERT THE STRING VALUE (STR_VAR OR STR_LIT) TO ITS NUMERIC [STR_LIT] REPRESENTATION. 'WHATS.HF44M6WHATS TO DETERMINE THE STATUS OF A SPECIFIED FILE. SYNTAX: WHATS "FILENAME" 'WRITE.HF:Ke WRITE TO WRITE A RECORD OF DATA IN BINARY FORMAT INTO A SEQUENTIAL OR RANDOM FILE. SYNTAX: WRITE FILE(FILE_NO [ ,RECORD_NO]), EXPRESSION [[ , EXPRESSION ]...] NF4SCSP.LBHB$ @&BUD$$('OCYPIRHG TC( )GD,C1 79,4577,D$$,677A.LLR GITH SERESVRDEL.CID$$NEES DAMETIRLA- P OREPTR YFOD%*D CG. _E  @@Z-@E@@fC`iCn#qÎ9LN郜 xáD dG"'9    bEd%8 z G "KSc G  G D>x+CX(_.,  'C  Dȿ:  / H$$HHO 'Z\,I$VYh ' ZDzdhX$h  X$$In  #PC7ZD9 %R|9# Y$cu - X9$  #  H$DO   ' H%Ϭ YDDjú Gh#G+ EgY$$6    D($? 0 D@"I\Go\]\aiy8 _&5\   \b @@@KY\ @@#qÎ9LN郜 áD dG"'9\%    E@\`D$$;@B'D$d Y$$ C   'G+(G   'G D$@-'[=7X$$7 PC'/[KED($oE'CPKr'C/7PK"G$X~KS# Z]r D9$0af 0 dG#PC3DD3oSS C# C HdG$ G} +  C 0"G K X$,%~  #Z E:X$$ # C#D,%$a+Z #D%$6G#PCw#Z@/X(@    D\`D$% "E$i @ "I?\]8\Av\y8 _05\n  @@@F\n@@k-efcFfcggcU`icnÎ9LN&郜 D dG$GS s  {CC  ED$8L|' {@ H$ +  |X'(.% PC  }'[,E$8E36A  } MXX$\A  }w Dl9;ơO |w  #DKn]Zcq   E k|YؒD m & |}ED{@~D\]n8 _j~g  @@@~g+@@²fcKfcPffcFfc؀gcgcggcUh`icnÎ9LN&郜 D dG$,G#^    C  bG$( D!PCbG,7    Xb%bˇ(+   b[,ǒ$&9   DH$8GJU  pXXظU    -D$zc ' G#Y$q { Xbǔ {     H$$& DDEDغ@eD\]|8 _,\Tv@I \@vrGÎG$$Al '/KK   3"D$$!3*POK@woh _u[\GH$\&\GrGÎG$$r 3"*;3;K KD$$$gK 83BJJ KD$808PՋW 3"*D$cQ*;3;Dfohfp _\t@ܿ\`rGÎG$$  3"*PՌS[D$$wCKҊ3"*p[ӐCD$$S+K+ 3DD$~*+ +# +ZD$({83BJPՋW?H.ohBfp _2@\c@I\crGÎG$$e  SS3"*[D$$PPғSCKPՌW3"*D$$G[CK5)K3D$$-* #+@@ ; 8CD$$8K#+@@CK3#+D$$FӐҋ3BJ#+DD[6T3BJE!DffohXfp _E\]@\]rGÎG$$. 3"*BJDfoh fp _g<  @@@g5<@@TÎ9LN郜D dG"'b%M6  7  ;   D$$Q#   'PGX$81    G$b' *   'PG  E(8?? @@D%aF8 _bF  @@@xφF@@TÎ9LN郜:_cD dG"'%A    X(   Y( #+ K'7D$Dc"/C/[0,'GD$$ *0'CZ#C/@ Dy' > '+ K D$$1L#/O#PC4@ZX$$Z  #Z\jIhsX%j  , X$$Wx '+G'C#D$$zC/@  DȒ(˲ /G#CEZY$eu  Y$%|   E f @AI-Sa[gnkX8 _ͦE  @@@fE@@#"ÎLN郜 ácD dG"'9    ZdE%9A{ C4#C X%9Щ #&  ' $DEX+27 C'CD99/K7' S + KD$8 GPC#C+ #D$$&tU'C+PΣK $#'C"G8p$c+ ΣK $#'C D"'8qC#C  #D$EY\ #/tD%9#C C#C X$$gg #!#/E"'([#C C#CYĒ$g  #"#/D(8)#C #D"'"ǰ# C + K +X$"'Ϊ ##O+PΙK# D"%iCK  "E$$g(@'@ &u8 _*nEL  @@@@.EL@@TÎ9LN郜  áD dG$:M    X(DY   # D&!Y((F  'Co#CD'$ (/@  'CHD%I69  7Dc"G9$SD# C + KZ\$E"%8RVf_ +[f_#DG$5`Gm C  #GH$+(n%#   D$%| #PG   D$5e  0@nD '+K'+K7D$$t/!C'PP! D$$G!OPPO/3D$*"G@aoh- _p\@p\rGÎG$$N  '+K'+K/D$$./K1!C/@p@@@@@D$$&u@ G/3"D*G@coh+ _ `  @@@`@@TÎ94LN郜š D dG"'%;  $  (  D%Ȥ R C - KD%S 0 S& $ $C-D% + * +C4  2C;D 9 , 9CX("'؊>  .#C+K -SDĒ$u1L'C'C # 'C+D$)-Zz^#+|f#+DH$|hvn#+xD$$Jv#C#C#C#/[X$$?n #!'C # #GD$H#PC3Z#+DD"%q#+#D)$߮+#PC#PD %ǼC7[PY$$ ? "#/[HRX$9  4"# ,DĒ$L{  #'C+D$) #+ 'PD$āC $##G #D$W #G#Z"Y$$   ##G[D$%"  // k@Ͼ0@Ͼ0H`gny8 _2l  @@@HSl@@k-efcFfcggcUhcx`icnÎ9LON郜 gáD dG$ k   'CX(G   D";$ / KZ\$E9$Et'+5K# ZK5bYؒ$5  #PCD,%$UC7Zj HȢ$ QT ' R`K";(b_e C5Y$Dpj  # D;8}4x   $ bIbǔ1{   D$$ܮ A 0Dں@[D;yk8 _xTv  @@@x@v@05@TÎ9LN郜cD dG"'%eA    X(   Y($ 'C/7Ό'D"%$["PK[*R'Ms+[I$$(0{2#G'CP#C+DĒ$>@ !'ZI($LN9{#G/7P'D$DgZCPCS'C{#C+D8$kh@ !'Z"EDpvyd#PC S#CE$'~#C/@ D$$0!'C+K !#/D)$G#PC#G8H2+ K#+ [#GH$'w#+ ['+ OY$;u  Y$%L    E $ @D\^X8 _m<=@=eNQꃅÎG$$E4 <1 :!C9!P8) ?51X$$Q !S  0ˋD8%p" !P "H$"%P**>C !P "'(H$$ 88BC  *  IZ_x6eaohfp5 _q  @@@q3q@@ÎLN郜D dG"'%  .  2  'CD$$n/K  'GD$$#PC3S/Z,bK)D+  66yv6 @ȿ7 u8 _?Ԕ  @@@x?@@#"ÎLN郜? D dG$$u   H  'C/K Db)X  ' L; D$$6    'G#+[DĒȽ+7/    LG#PD$,%M:9C#PC7[ F X$+G M @N u8 _vr  @@@dr@@TÎ9LN郜cD :3dG"'%`    '/D$)'7PCZ^X(  Y($" 'PCX%(- 'CO#CD'$R;/@ 'ZD(-IaM8Yf%tO . Y$8eIV #  'G 'CH$8{}d#C/@ D$ĢKr'CZ{ Y$$F G#+7ŝC#C#D$$mC/@  D' U '+ 'D%O#PCeX$  #+ KY$ WV D$ @-IܟSagnPX8 _!Tv  2@@@!@v@@ÎLN郜D dG"'%  5  9  'CD$$І/K  '/D)$7G $3#PC3SD,%+/Z3  ==D 9= @> u8 _Ei  @@@Ei@@TÎ9LN郜?D dG"'%\  L  P  'CD$$/K  X(8r V#PC D)X($`f* U#+O?#PC"G$$83 TS'@EؤDwFJ  WWWWD"T@XHYxFZ{S+8 _5{@L{?QꃅÎG$$ 1 1S EI% 7 L$DkTP I~Z_xe!ohfp _rXv  @@@v@@xSYKZePffcFdSfcgcgcggcUThhcxÎ9L:N郜cD dG$$j  }  'C/K XK; | [c   GG[b C GXb;M#+  D)$:q9#Z@F#PCW DȒD}G +  O+PD$$U͛K #/[#tX;8 c  p  D1rqC#X$%6t     D$# 0A@uD;yu8 _yqU8@1U8?QꃅÎG$$ 1 S  EI% 7 C$DwRD I>[_xeaohfp _VN@mNeNQꃅÎG$$Q "1 S D8%# !Pf "H$$$& #  IsZ_xe!ohfp _Ŵ8  @@@Š8@@TÎ9LNɃD) cD dG"'%[  P  T  'CD$$/K 'C @X($ [# ZG#PG$D+C Y"+g1 YK X+  ZOD$$IH?+PΕK#ƎC/ZNbK)H%M  ]\]] D<[@^DxF28 _M X  @@@c͛X@@#"ÎLN郜 cD dG$8    :  PG  D,%D& 'C[ >G#/ D")$LZ\1%,'Z1cH'$-+,#PC   #G X$i9 ? @@ u8 _O깛y  @@@ey@@YÎLN郜 ácD dG$$   z    'D9$C 0 Z\,I$$G# -# !`H"'$+0 1# .@ .EȒ$9= 9 ;K@ԑ+DE$EGNR A# PD$9U@ _ I ]KD$( c@ԑ+pHȔ$(qt J# r@ D$$ R K@ԑ+.,DE9 S# D(D@  Z K@D$"+ԑ+ G"[ȔDv  G +  KD";d%YNPG +  K "G"+'G +  K GYĒȒA +  K' ZDKbI\F4  ! DdG # C +  ~D$u0 O   # C HD$l+  ~O   #YDX' C +  ~O  D9E5 # C +  HȒDC~O  G/ bI$"'lRQSF  \ - ZG"[9,%]_  G/ lF D(bG9&m u 0 sG  E$${ QI@0@v @v u8 _߾)o  @@@~)o@@?aZfcÎND G  *?    @  u8 _*gn  @@@gn@@ÎLN郜D dG$%ؾ?   !  'C#D$$C/@  'GlE%$   % @ٿ& u8 _tSt  @@@S`@3@#"ÎLN郜l ácD dG$D   J   OC/K D$G_'+C N+ K#bY$)zT N #C#[4)# H$ă1+NvC3PS# D$"%-9#G#PC7[F#bG( ҎGG  P @Q u8 _HUb@:Re`U:U8ÎG$J 7;!CP ?K#8D$$/ĐC'Q+ 3D$$`")J#C'1D$$u*1ƐGΐO'D8 ;181)G  _&)U@zQe U:U8ÎG$$K$ '/Q&1SPґS3D$$QS1 C'/GD$$ / 1 1W7# bG$b*?  _ NF4HCSP.LBHD $ @&BUD$$('OCYPIRHG TC( )GD,C1 79,4577,D$$,677A.LLR GITH SERESVRDEL.CID$$NEES DAMETIRLA- P OREPTR YFOD%*D CG. _E  @@Z-@E@@lCoCn#qÎ9LN郜 xáD dG"'9    bEd%8 z G "KSc G  G D>x+CX(_.,  'C  Dȿ:  / H$$HHO 'Z\,I$VYh ' ZDzdhX$h  X$$In  #PC7ZD9 %R|9# Y$cu - X9$  #  H$DO   ' H%Ϭ YDDjú Gh#G+ EgY$$6    D($? 0 D@"I\Go\]\aiy8 _&5\   \b @@@KY\ @@#qÎ9LN郜 áD dG"'9\%    E@\`D$$;@B'D$d Y$$ C   'G+(G   'G D$@-'[=7X$$7 PC'/[KED($oE'CPKr'C/7PK"G$X~KS# Z]r D9$0af 0 dG#PC3DD3oSS C# C HdG$ G} +  C 0"G K X$,%~  #Z E:X$$ # C#D,%$a+Z #D%$6G#PCw#Z@/X(@    D\`D$% "E$i @ "I?\]8\Av\y8 _05\n  @@@F\n@@+llcFlcmncUocnÎ9LN&郜 D dG$GS p  xC  ED$>Ly' x@ H$ +  yX'(1% PC  z'[,E$8E36A  z LXXmA  zt  bE˒$Oyt  #Z,E;$F{7H]`n   yYؒDj & yzEDx@{D\]k8 _j~g  @@@~g@@^lcK^lcllcFlcmcmncUnocnTÎ9LN郜 D dG$,G$^   C G$( Da6#PG+C    K$b9kH+  XǒD9   DEmGKV  K+XUp   D$zc t ' G#Y$q { Xbǔ{     H$$& DDEDغ@eD\]|8 _,\Tv@ \@vrGÎWG$$Al '/KK   3"D$$!3*POK@woh _u[\GH$\&\GrGÎG$$r 3"*;3;K KD$$$K 83BJJ KD$808PՋW 3"*D$cQ*;3;Dfohfp _\t@ܿ\`rGÎG$$  3"*PՌS[D$$wCKҊ3"*p[ӐCD$m$S+K+ 3DD$~*+ +# +ZD$({83BJPՋW?H.ohBfp _2@\c@I\crGÎG$$e  ՏSS3"*[8ӒD$$PPғSCKPՌW3"*D$$G[CK5)K3D$$-* #+@@ ; 8CD$$8K#+@@CK3#+D$$FӐҋ3BJ#+DD[6T3BJ!DffohXfp' _E\]@\]rGÎG$$. 3"*BJDfoh fp _g<  @@@g<@@OTÎ9LN郜D dG"'b%M6  7  ;   D$$Q#   'PGX$81    G$b' *   'PG  E(8?? @@D%aF8 _bF  @@@xφF@@TÎ9LN郜cKD dG"'%A    X(   Y( #+ K'7D$Dc"/C/[0,'GD$$ *0'CZ#C/@ D' > '媘+ K D$$1L#/O#PC4@ZX$$Z  #Z\jIhsX%j  , X$$Wx '+G'C#D$$zC/@  DȒ(˲ /G#CEZY$eu  Y$%|   E f @AI-Sa[gnkX8 _ͦE  xm@@@fE@@#"ÎLN郜 ácD dG"'9    dE%9A{ C4#C X%9Щ #& ' $DEX+27 C'CD99/K7' S + KD$8 GPC#C+ #D$$&tU'C+PΣK $#'C"G8$c+ ΣK $#h'C D"'8qC#C  #D$EY\ #/tD%9#C C#C X$$gg #!#/E"'([#C C#CYĒ$g׷  #"#/%2D(8)#C #D"'"ǰ# C + K +X$"'Ϊ ##O+PΙK# D"%iCK  "E$$g(@'@ u8 _+*nEL  @@@@.EL@@TÎ9LN郜  áD dG$M    XAU(DY   # D&!Y((F   'Co#CD'$ (/@  'CHD%I69  7Dc"G9$SD# C + KZ\$E"%8RVf_ +[x+f_#DG$5`Gm C  #GH$+(n%#   D$%| #PG   D$5e  0@nD '+K'+K7D$$t/!C'PlP! D$$G!OPPO/3D$*"G@aoh- _p\@p\rGÎG$$N  '+K'+K/D$$./K1!C/@p@@@@@D$ h$&u@ G/3"D*G@coh+ _ `  @@@`@@TÎ9LN郜Zš D dG"'%;  $  (  D%Ȥ R C - KD%S 0 S& $ $C-D% + * +C4  2C;D 9 , 9CX("'ŗ؊>  .#C+K -SDĒ$u1L'C'C # 'C+D$)-Zz^#+|f#+DH$|hvn#+xD$$Jv#C#C#C#/[X$$?n #!'C # #GD$H* #PC3Z#+DD"%q#+#D)$߮+#PC#PD %ǼC7[PY$$ ? "#/[HRX$9  "# ,DĒ$L{32  #'C+D$) #+ 'PD$āC $##G #D$W #G#Z"Y$$   ##G[D$%"  // @Ͼ0@Ͼ0H`gny8 _2l  @@@HSl@@+llcFlcmncUncxocnÎ9LZON郜 gáD dG$ k  'CX(G   D";$ / KZ\$E9$@t'+5M# ZM5bYǒ85  #PD$X=CC7Zl D"'$QV ' TH(DU_bg C5Y$Dpl  # D;8y4z   bIǢY    D$$.A 0D[@ZD;ym8 _xTv  @@@x@v@@TÎ9LN郜cD dG"'%eA    X(   Y($ 'C/7Ό'D"%$["PK[*R'+[I$$(0'9{2#G'CP#C+DĒ$>@ !'ZI($LN9{#G/7P'D$DgZCPCS'C{#C+D8$kh@ !'Z"EDpvyd#PC S#CE$'~.#C/@ D$$0!'C+K !#/D)$G#PC#G8H2+ K#+ [#GH$'w#+ ['+ OY$;u  Y$%    E $ @D\^X8 _m<=@=eNQꃅÎG$$E4 <1 :!C9!P8) ?51X$$Q !S  0D8%p" ӑ!P "H$"%P**>C !P "'(H$$ 88BC  *  IZ_x6eaohfp5 _q  @@@qq@%@ÎLN郜D dG"'%  .  2  'CD$$n/K  'GD$$#PC3S/Z,bK)D+  666 @ȿ7C u8 _?Ԕ  @@@x?@@#"ÎLN郜? D dG$$u o  H  'C/K Db)X  ' L; D$$6    'G#+[DĒȽ+7/    LG#PD$,%M:9C#PC7[ F X$+G M @N u8 _vr  @@@dr@@TÎ9LN郜cD dG"'%`   2  '/D$)'7PCZ^X(  Y($" 'PCX%(- 'CO#CD'$R;/@ 'ZD(-IaM8Y%tO . Y$8eIV #  'G 'CH$8{}d#C/@ D$ĢKr'CZ{ Y$$F G#+7ŝC#C#D$$mC/@  D'  '+ 'D%O#PCeX$  #+ KY$ WV D$ @-IܟSagnPX8 _!Tv  @@@!@v@@ÎLN郜D dG"'%  5  9  'CD$$І/K  '/D)$7G$3#PC3SD,%+/Z3  ==D 9= @> u8 _Ei  @@@Ei@@TÎ9LN郜?D dG"'%\  L  P  'CD$$/K  X(8r V#PC D)X($`f* U#+O#PC"G$$83 TS'@EؤDwFJ  WWWWD"T@XHYxFZ{S+8 _5{@L{?QꃅÎG$$ 1 S ETiI% 7 L$DkTP I~Z_xe!ohfp _rXv  @@@v@@AYKZlOllcFslcmcmncUnxncxÎ9LNՊ郜cD dG$$j    'C/K XK8,~ [b   X80I C ,G8+ #DHb%t9Z?E#PCV DdG$RG +  O+PG$,%UK #/["vbG8c   Y@.qz C"X$%6v     D$# 0A@sD;yw8 _yqU8@1U8?QꃅÎG$$ 1 S EI% 7 C$DwRD I>[_xeaohfp _VN@mNeNQꃅÎG$$Q "1 S D8%# !P "H$$ $& #  IsZ_xe!ohfp _Ŵ8  @@@Š8@@TÎ9LN郜D)  cD dG"'%[  P  T  'CD$$/K 'C @X($ [# ZG#PG$D+C Y"+g1 Y X+  ZOD$$yPIH?+PΕK#ƎC/ZNbK)H%M  ]\]] D<[@^DxF28 _M X  @@@c͛X@@#"ÎLN郜 cD dG$8    :  PG  D,%D& 'C[ >G#/ D")$LZ\1%,'Z1H'$-+,#PC k  #G X$i9 ? @@ u8 _O깛y  @@@ey@@YÎLN郜 ácD dG$$   z    'D9$C 0 Z\,I$$G# -# !`H"'$+0 1# .@ EȒ$9= 9 ;K@ԑ+DE$EGNR A# PD$9U@ _ I ]KD$( c@ԑ+pHȔ$(qt J# r@ D$$ R K@ԑ+DE9 S# D(D@  Z K@D$"+ԑ+ G"[ȔDv  G +  KD";d%YNPG +  K "G"+'G +  K GYȒA +  K'h ZDKbI\F4  ! DdG # C +  ~D$u0 O   # C HD$l+  ~O   #YDX' C +  ~O  D9E5 # C +  HȒDC~O  G/ bI$"'lRQSF  \ - ZG"[9,%]_  G/ lF D(bG9&m u 0 sG  E$${ QI@0@v@v ufC8 _߾)o  @@@~)o@@ZZlcÎND G     @ "T u8 _*gn  @@@gn@@ÎLN郜D dG$%ؾ   !  'C#lD$$C/@  'GlE%$   % @ٿ& u8 _tSt  @@@S`@@#"AÎLN郜l ácD dG$D   J   OC/K D$G_'+C N+ K#bY$)zT N #C#[4)# H$ă1+NC3PS# D$"%-9#G#PC7[F#bG( ҎGG  P @Q u8 _HUb@:Re`U:U8ÎG$J 7;!CP ?K#D$$/ĐC'Q+ 3D$$`")J#C'1D$$u*1ƐGΐO'D8 ;181)G  _&)U@zQe U:U8ÎG$$K '/Q&1SPґS3sD$$QS1 C'/GD$$ / 1 1W7# bG$b*?  _ NF5CSP.LBHC  @&BUD$$('OCYPIRHG TC( )GD,C1 79,4577,D$$,677A.LLR GITH SERESVRDEL.CID$$NEES DAMETIRLA- P OREPTR YFOD%*D CG. _rA1DW@:uA1DW ~.ND1\T.SAV2pFLOATn.NCALUNZONEVDWMPYbDWADD^DWCHSW.RETNq.FLFq.FSFc.DIV.F5[3$$6X !3"+ #CG D$$G.OG#0  B;+ J8!#Gb$ĒA+P 7S # # # +KD$$**/36 ;'8!OJ= ;D$'bS8'8!.5+0  J#+P Dؒ$F+ J+P 3 S //D$$mCT7;/8! # 0  B+ JD'b$Gb#+P +' 3.OX$$p # +K7;/ 8! GD$$;~# G3.'  # 0  B+ JD;$$#+P D$$I$I$D!sD D$t0  _rDWA1 :DWQQQ@:uDWA1 ~.ND1T.SAV2n.NCAL^DWCHSYDWCMPQDWSUBUNZONEW.RETNc.DIV.F5[$$X !#C+3D$$MCCK/OS7WK+0 [$$PC'/K7SPK D$$M*'C/K # 3./#3D$$08;'B8!+K3 S DĒ$FC+36 ;'8!C ;/8!K D$'b}T#3*K+0  J#+P D$ؒb7.+ 0  J#+P 3 ;D$$ep/8!K # + . 3+3 D$$@z~KW#C#C3.J3OtD$$/# 0  B;+ J8!#+XH$(P  D$$pT DԙDWQQQI$I$  0 D)JDWQQQD$$;B@'D$d  _mDWFL@5ZDWFL ~.ND1T.SAV2n.NCAL^DWCHShDFLOAW.RETNs.DSFCu.DADm.DMLp.FNG.F5[$$csX ;#C+SD$$|KC/K0 PS'JDĜ'Y#+ #  #+ 3" # D8$s*#+ 3" #  +/ D"$lE;8+0   HH D;F I$$$'HLMNOE _mFLDW@5ZFLDW ~.ND1T.SAV2hDFLOA_IFIXW.RETNn.NCAL^DWCHS e.DGTs.DLFp.FNGs.DSF c.DDVq.FSFm.DMLw.DSBt.DLEq.FLF.F5Y[$$<X +\3"+ #CC D$'l#C C# PK GĒ)# 3" # + 0 7 W # + X;8!* 3" #  # "  # GĒV8# +0 7W # 3" #X$$dF +0 7W ;/8!O # XBl"\T +0 #  ppD$$b!#$&I$I$pwxy}EDD$~D _,\Tv@ \@vO# [$$X '/KK   3"D$ģ3*POK _u[\GH&\%\G`5# [$$ X 3"*;3;K KD$$K 83BJJ KG$؄58PW&X 3"*D$P*;3; _\t@ܿ\`/C [$$MX 3"*PS[D$$CK3"*p[D$$CS+vK+v 3ADD$$*+ +v +ZD$'S83BJPW _2@\c@J\c`4C [$$N{X SS3"*[D$'ʱPPSCKPW3"D$$`*[CK5)K3D$$R* #+@@ ; 8D$$j8CK#+@@CK3#+D$$eFӐ3BJ#+D8T3BJ! _E\]@\]Om# [$8\*X 3"*BJ _QQSUB@hQSUB ~.ND1T.SAV2n.NCALxQADDW.RETN.F5[$$X  -#6 /CC7D$$dW+0  J# B+ J# D'b$\B+ J#+P 7+K/D"$!*O  66H67 _bQADD@*xQADD ~.ND1T.SAV2jn.NCALcNSIGNjCARRYhFILLW.RETN.F5[$$sX #+C K #0 D$ؒ B;+ J8!#+P # D$Ē B;+ J8!#+P 7/D$"2$V7*vK '77G7K'GD$$i8T'C'+ 3K + K+ 7' D$$FvO 'G3S/J#0  D'b$)dTB+ J#+P 7J +D$;\5b3"0  B+ J#+P D$$0p'+ 7K/O/O'+ 3D$$v~6K / W G7J'GD$ؒ# 0  B+ J#+P #  D'b"B+ J#+P  D$$I  _vA1A3@=A1A3 ~.ND1XT.SAV2W.RETNc.DIV.F5[$$X  #+SCKD$$j#+K7;/8!  C;7D$$X8!JS'C /K 7;/D$$*7 KPC# +K7S 3D$$$-8"C+ #C/KS#D$$bF+3 K/  C;78!JD$$T3SC # +3K/  C D$$XTb;78!J3S C # +3KD$$b6p/  C ;78!J3S #3D$$+~.;/v8!3 K;/8!#D$$gvb# 3 K+3KW# C ;D$'d/8!# C 3S+J  H$$D$$pI$I$$  'D "@( _0 A1DEC@Q{A1DEC ~.ND1T.SAV2n.NCALUNZONEW.RETNc.DIV.F5[$$X d#C#0  B;+D;$# J8!#+P ;78!/ D$'bm1#0  B;+ J8!#+P D$$*'C#+K 7 S;/8! ;DĒ$r8/7 KJ  ;'8!D$$VFK#GC#G #C/JD$$T36/  3S 7+D$[b3 K W  rr D:p I$I$$$r{|}~ D i0   _vA3A1@=A3A1 ~.ND1T.SAV2W.RETNc.DIV.F5[$$OUX i#W+7SK /D$$KC #+ K7SJ ;7 D$')g;'8!C#3.6 K#D$$E*3..v#C ;7 D$$8K v# C #3#S3 'D$$8FB+ #+C# /CO3 +D$${T3K+ 7K-?W;78!+D$ibK#C7K  D$$ppDm~I$I$@}( _?DECA1@wDECA1 ~.ND1T.SAV2En.NCALUNZONEW.RETN.F5[$$hX K#3.O7CC D$$7/ K ;/8!O7 W 'GD$$'+K 7 SJ  ;/8!D$$9*K'G3.O  +36;'vD{$$C\88!O 'G/J#0  B+ DdDCFJ#+P  XX D:T I$I$ X_`abcef * Df0  _]QDIV@%cQDIV ~.ND1T.SAV2n.NCALcNSIGNhFILLjCARRYW.RETNc.JMPc.DIV.F5[$$sTX , #+CK# 0 D$ؒ B;+ J8!#+P #  j$D$ĒB;+ J8!#+P 7/D$$4 *S/O/O7/+D$$8J7/3"0  B+ J#Gb$$F+P 7S#+K7.D$$cxTC7J'G3"0  B+ JD8$ǟb#+P #+K7S7D$<$p/K 77C/O'D$$~+36K/v'3C"D$$3 KK/?#G +O ' +D$$uK7 K+K+7v'G7 D$$>W 7 W /J' G# 0 D$$[ B+ J#+P 7 K;D$$f/8!'vO;'8!C3SD$$ # +3KWC +O#J7D$$+W7 / vO# 0  B+ DĒ$J#+P # 0  B+  J#Gb$$짺+P #  B+  J#+GdD$_ P  ** !"D$$o@"#$$%%%%%%%%%%D9&%&&'I$$a*./01  _`[C@ [C/C [$$gX '+K'+K7D$$$ /!C'PP!D$$V OPPO/D*3"G _p\@p\/C [$$oX '+K'+K/D$$:/K1!C/v GD$8:/3"G _iEDIT@1eEDIT ~.ND1T.SAV2n.NCALUNZONEhFILLW.RETN.F5[$$MX ##+36SKD$g$ ;/8!K;78!S ;78!S C;D$$~U'8!G ;/8!K ;78!S #0  D$Ē*B;+ J8!#+P 3 WSD$$ 8G/K7S#+K7W+ D$$eF '3 '7 '3 D$$lT 1'G'C#G#/JD$$B2:b%3+K7W#3'B+D$$ 4pK7/3 7+   D$$Ś~7+ 3W#C/D$$K#0  B+ J#+D$$P 3/J# 0  B+ J#Gb$$P4+P 9'3. '3D$$Y="DG3 /#  'D$$Ā+3 KW'+3 KW'/D$;XY#0  B+ J#+P 7D;$$4+3KW  D$$oD9I$I$H  R 3- D$$0 $ * , D _]<GET@$GET ~.ND1T.SAV2n.NCALUNZONEhDFLOAW.RETNsJ.DLFs.DSFc.DIVm.DMLu.DADp.FNG].FNZ.F5[$$nX w#/KC#0  BD$$K8;+ J8!#+P ;# #X$$ #+K '/ 36 ;'8!OD$$*J ;'8!.#+ #X8$k8 3" # #C7.D$$BF#+K 7 ;/8! ;#X$$FT #  G#0  B+ JD$$b#+P ;7 8!/ #  X'lp #  # ~   D$~ I$I$D"D$$0 A  _ICOMP@mICOMP ~.ND1T.SAV2n.NCALc,INSIGNW.RETN.F5[$$sX #+CK# 0 D$ؒ B;+ J8!#+P #  D$Ē<B;+ J8!#+P 7S /D$$OQ*'KJ'K-7 D$$8W7S#+K7.[UC3JD$$F' G/7'CC SD$$T/K#+K7.@C3JD$$.wb#CK 3 S#+K7S + D$$npS #3# S2G +D$$V~K3S/J7 / v3 vD$$\?K' G / 7 vJ/7 D$'bݗvO#0  B+  J#+P D$d# B+  J#+P  H$$ɁD 1ĀI _m<=@=lNHDaC [8$X #9# !!C !P) ? Dl'9# S0!D#+DX$L# )*  *H0*& I ]*TC$ea! 9# _QMOVE@ZQMOVE ~.ND1T.SAV2W.RETN.F5[$$OX ##+7SK/D$$KC#+3K +7 K W CD$8$#C+'/  00D$* H01 _RJUST@`RJUST ~.ND1T.SAV2W.RETN.F5[$$~X 0#/KKC#+D$$K7;/8! +#/C O D$$3+K;78!W#hC#D$H#*C/K  << D;8 I<>?  _VQMPY@WQMPY ~.ND1T.SAV2n.NCALcNSIGNhFILLW.RETNjCARRY.F5[$$X  #+7K /D$$nf/W C/U# 0  B;+D;$>  J8!#+P #  B;+ Dؒ$*J8!#+P 7W3"0 D$$"48 B+ J# +P 7S#+D$$1FK7.#C7J3"0  D'b$6TB+ J#+P #0  B+ D8db J#+P 'G 'C#D$$Dp+ K7S / O37GD$$a~#G'+ 7K+K+ 7'vD$$gO'G7W/=J#C/D$'b?J#0  B+ J# +P D$$FT7 / vO#0  B+ J#+[$P  ρD$$qĀI~ _ NCOMP@mNCOMP ~.ND1T.SAV2W.RETN.F5[$$OX '#+7SK/D$$KC#+3K +7 K / WD$$G  C#C+'/  I$ *44 H4D 5 _dPACK@,qPACK ~.ND1T.SAV2n.NCALdISHFTW.RETN.F5[$$OX <#+7SK/D$$KC#+K 7 &;/8!3D$;O ;+8!S 0  J# + P 7 D$$)*/ 3K +3 KW3S#D;$$)8C7K  MMD$8FI$$MQRST _5{@M{l< fHaC [8fkX 9# S0#D#+b[$$DL#)I]e! 9 _T,PUT@PUT ~.ND1T.SAV2`DINT_IFIXn.NCALUNZONEW.RETNs.DLF].FPZq.FLFu.DADs.DSF c.DDVm.DMLw.DSBp.FNGq.FSF.F5[$$U X Br#/K7WC # X8; E# # # + # 36D8W # 3" # + # 3"X8$* #  # +0 7S 3/D$$8S+ 36;'v8!'3 D8$oFJG# # /7JG;8T# # #  # # + #X$$b 36W #0  B+  J#+[$ pP  D$$p~#'+/126:I$H$A0 Dg _yqU8@1U8lfHaC [8gkX 9# S0#D#+b[$$DL#)IҢ]ea 9 _VN@nkNlfHaC [8;5X 9# S0!D#+l[$(=DL# )*Db I ]TCe! 9 _UNPAC@nUNPAC ~I.ND1T.SAV2W.RETN.F5[$$OX ;#+7SK/D$$KC #+ K 7 W;/'8!D$$@3+K G S/;'8!S D$$&*;7'v8!#3JC3SD"$8/õ/  JJ D:FI$D OTJOPQRS  _NSIGN@cNSIGN ~.ND1T.SAV2W.RETN.F5[$$"FX  *#PO7CC/D$$źKK;78!W/3vJ D$$z '.#C'+3KGdD Z*W  44 IP467 _NZONE@UNZONE ~.ND1T.SAV2ņW.RETN k.CGOc.JMPc.DIV.F5[$$X #/CC7S;D$$L/8!.  +;'8!D$$e F #3.KP+C&JD$$#*P3 8;'KnP8!C ;D$$q8'JP8!3 3;'KPD$$F8!C ;'JP8!3 .;' D$$]TKP8!C ;' JP8!3 DĒ8b)3& G 3& G+6 ;'D$$ p8!K$PG+36 ;'8!KD'$~3&G+6 ;'8!K5  3DĒ$Ve&G+6 ;'8!K'3. D8$.@ 1/ #3.D$Ē16 ;'v8!'3J #3.D$Ē16 ;'v8!'3J #3.D$Ē1o6 ;'v8!'3J #3.D$Ērz6 ;'v8!'3J 3& G/jD$$U& 7+;78!KW 3D$$G&G/& /#.CO Y"$$Jn  I$I$I$O!#%')+-/1345I$I"$6789:;<=0 - 1 D$$dS$9 A I J R S Z D$$n20@IQ 0 _ WHOLE@iWHOLE ~.ND1T.SAV2`DINTW.RETNs.DSF.F5['"uX #+ #   D9l _eFILL@-hFILL ~.ND1T.SAV2W.RETN.F5[$$X  #/KC#+7D$HKWKWC7J  D;S =8HC _ CARRY@jCARRY ~.ND1T.SAV2W.RETNc.DIV.F5[$$vX 7#K7SC#+D$$K3K / K;7 Ksv#D$$C#K 3.K3S#D$$*+3K W C7K+O[$$$?\8  CC I"$CFGH  _HUb@;Re`lU:U8C [$;+(X E7*11GOX$$8'1)G  _&)U@{Qe `[U:U8C [$$X F'/Q&1SPS3D$$S1 C'/D$$G / 1 1W7#D$W* ?  _  FIV.SV 3'P%V  (0 &~&%&&'2& #'2,&y&W#3R""U"_"W\ z#M""!P!!c#& E"@V"""j""c!F""""c!Z!"!#a#!!!t'n'3'n:%VXR  xH9j  nH!Y4  e0P)W  _"*9WX9SYS9NX9JY=9KY9!bA`P  E  A)5  =  : )"  41 1,Q+I)!  )  & ) ")      ReFCOM.CM(  @   \ ;Z;P  9 8 ➐)KH\ ;J;P # )\ )ҫ ! )1\ )\ ;Z;P) )X  X  X  XR! RHRCOPYRIGHT (C) DATA GENERAL CORP., 1972, 1973, 1974, 1975, 1977ALL RIGHTS RESERVED.)+H ( .X -Z -Y)#0 (0P 1) 9Xi9XCC)HL,PHK)H  )%#/S.MAIN&& ; DGC FORTRAN IV REV 05.20NS \ w@D@B@I /~DB(D0B}0D 3 B "0BPZ12 Z($9;XZ @ Z *2Z$@ QM OL   D8B C=8C=;  6    2,8) -'8#% 9$8 9*! *)9 : P PDId{dq( c* 0BPZ12Z wB /c }D *7 /c d~}w( 0DPZ12Z } ( e XU } /c 8CP@C@b \ +p /91** & ) ~  b W ! 4   S ` e h j d pIUL g jnj j /I| 8 z5^t7Ox ; b 6 $* ? B *8};)  .k0"P@K.{ / / *k !8P@K \ 8|8  G0}2  2 S }H}1) 8A0Pr0nHn m(< y8 >9X o{&0 2 6 Y G ) ,4w2"4w 4w  PX\XM8XS wX4(@0m8|<|+0|* *  |P@   5M 8A@@A0P[ @\* * \ 4[#0 P["@k* ?4[(P=s ;5q@k $9m @P(P ;@k (| 2*28 T8X[*:J 18 >8 @<[X}860"P[*!, ъ 0[*    > ;  Z 4[0zP[8* : 4[ 4L&|&}HEHt -7 8};#( # +& HX8}  #)1 ;|fU08A-]   &%& E Ȁ 0 E ǀ&0}:62P[X\ * @U 8\;(8}# qc @f4}P^ 2P`@eHh4}6:KP] :X_Hg@d4}2*M  |m| ' g(h@>H>PP4[P   e ˂ %%,,'] H)5 A A cu ^ ]o0` 0` 0^ ^a ]^0^8`0]8_EWUT]T _ 5O Ѫ5L"' 5F 5E z5C @:P6?  558]0` -Q ^ 5( 0^ 5!5 5 z=0>` 9] !!))"#++**'' '' X Z 'knttvw; '(> - 8 |  $' p f b869 U86 9- K93 U3U D;] 06N C'' H + #  " "   DL'&& \  ' -5Q(j2HU/---+  \ (]0_ (^0` \ MU  5 8 TO5 z' ' E8h 0_ 0_ 0] (g 0^ 0] ;  4} } 0PO4} } UJ XZ^\0>0g0hP<}PUX`(i* C0 BJ z(z8`K U8U zDO p0]*8^"(8f g0h (Pb   P@[@\P@C }08_+J[8`+J\ 1\ + f  }4} } $0PPM f (hP   8 f }4} } } }4} } P` HU* 2 @]88\%@Q p8h@U H^ H_ yHb8 (\ 8X] / /D]] 9ڜ  :ނ8i#;HQ.XMAMID]$9)8)(Q\ ^(-]L]80+!K+K(HM(U @[(_  80/(^ 8 (8b(_8^( (^(U0"(9BJZ4w2 0 V 0UHU8}a(Q&#\ 8b    0] 0wP]28:)P(@b@U(\HaH_ w qPcUa w' U 2 52 5 ' 0c M B  (^ (0UR(_Ҝ Ҕ10b 0]28* J8* J(_0c (_ L- U8i#(0BJ z 0z 0z "(J0} 2B0w_ 2 z w; w(M_88U (_ 0] :;#J(_8  F!G(UP\ 2." B E8} S4} (h (HU(jI (h &4}  f  h }4} }1PPKk1  0(  0d  G 1 \ 0^(g h'  '  0` 0] 0i ҉ 0^ 0]  0] } 0_ \O0` 0O _ BP\0] υ0] D\eeffgghhxyrr}}||zzhh{{ININDDCCppooinssttuuvvww qqdd\ 0M8PO(M6 _(`:]05.  =' LO(="Hj8K%O0O=U 04O U 5 0E %@0'''''\ U*E)P* E"0z *=UM2-5 ҎP1 r1 = "Z5J&|&}''''\ P0 2P1  Pl002P100 01*  HjP 8S(l 01*9TO"P e0 - \O( A8r ?*     H* l*2 01 S* 01(lTO\ P02P100 ѪC2 Hj\ Hj8XOP0*8r ;?*   2\ @:P6Xl 00l @0Pl 0028l  00 8l00 2Z06;Xl\ ]0` 0_  0] 0^ (> 8S' \ `P\ U1 Ѫ58 + <XO(  Ԫ''\ ъ I8 \ 8 8r9   \ * 8CU1''\ *  2 D]0  9A;]=L2*UU * A8r ?**2 **"8 08%+ 8} S ' CFFm2."99]U;'!E\  ) 2 \ 09 2 B&| \ 0^ 0]P  ?*&\ ;J;P]>9?SKE> OE80_ M5MvMv0` 0` M.0^ -*Mk-'Mg%"@O5 'U9ӝ5])OE  )ƍ )  &&'&&&/']-] C8])5 U  d\#*!9S z-/1D z z: zI zNPL_1122AA)EE'''1 *M J Ekpsux{~E''--  ,(j (k-(: !##%-506)"AFC l(85]--&52*\ 0( (; EMU(ADC ,_A ,ADD ,_JSR @MOV SUB@.+MOVZL#,S2_2_JMP ʦ.NREL_?L.: _LDSTT,3_?V.: ?.C: .EXTN JSR @._+S.T..GADD , @V. ,SZR_ZL ,_ ,CL,SZR_L,SZR_ ,,SNC_ ,,SKP_ADC_ ,_CAL_.F..BLK V_V.+?/L._1_L._FS._?: _?_.STOPէ_V.+ TS.=_FTS.=T.+_VS.=V.+FVS.=V.+__FS.=SFS.=_T.=-167_V.=200+T._.END_.FARL_@A.+1 ?L._.C_@V. ?L.: .TXT "?"_ ;__.COMM .GLOC _.BLK INI_.F1_.F2_.TXTN ALO_A._? ;_.TITL _.ENT _.TXTM 1_.EXTU_.I_?.Fm1:_?.F2: 0_.CSIZ RED_A._@V.+.+3_?A.: ;___ANDCOM ,_AND ,_ ,__SMPY_,3@,3.CL.____SDVD_JSR @.FSUB_L._ 1,0_ZR 2,2_AND 1,2_L 0,2_ 0,1,SNC_JMP 0,2_.CGT_ZC_6_ZR_NC_MOV,SpNR_ZC__RET_AFRT_.PAUS_MOV,SZR_.+3_REA_WRI_.-4_.BRD_.BWR_?N?= ?= @._A. V. L._ZR_AND ,_L ,_INC ,Z 0,1,SNC_@L.-1_SUBZL_.+*V. .LOC V._P.=._.LOC P._V._;_.ENTO __.COMM TAS=K,_FIL__*@FV_ ,,SKP_ADC#ADC#COM_NEG_SFS._@F@F@V_FXFLLFXFSGN_ADSBMLDVNEGCLECLTCEQPWRLIPRCXIPWR_MOVE_FIPR{ .B{ ?1 1a `{ *ao. .{.V**bf**i6****-d**g^,93* e*h4 F)(2*?=**F!*\;*#_,>**%^b:8:{43* F)(2*:*0`,a,B,^ e**e**h*z0 3vv*ve* .h*M** .h**ze*M** .h**zh**Gȯ.2:h*{e4*M** .h**z h**$*$h*#e*&e*'hz"hh*&h*&h**%h**'z&h *.h*0v*2e*1{ h**1z0u*3h*2v'*0h*2v'*0qh***-q{{{čGȯ.H.2*c{ŪeF{ĪeJS********7Q:<* *@8 h*> z**?h *. {@ he. e *A { h*A z* 8{ *Ee|Z{  9 . e*JHh*K zjHWq*.Jq*. h*d zj zj zj h*d h*d qz. zHh**Lz+hWjec.1{h *. e#*L qYq*O   Ư h*c z+ {Mz+{h*cV hYh*P hY zYh*Qzѯ zYz+ @  {د 5 . VW.eegZ hF zFٯ efZ5z 5eZ5 [zT]*S s*S ty*]r] e 5 .| }  hª*.{êeRL'M\ 8o0( 1U J3x [^kgkkkkkkkk E!5a \HS HS $( .u X(CHC(Eg(red(8b C&=9WX[ <[zZT[?8?Z8G-8};)H(1$ 4[(PJ8i#B Ҏ8X :)J(?JR- M B0 'L'HP 4[:( (G (A  : "iN`d2 8n ҂D8 *K\- i02* + 2 rU<'\ %)@C01;" OO i T S0 C1@ @S T 8KK)* (t9) e0` iELLKKWIIIIJJ*JdJJJJKKKK Kcqqir{."30C- 8!"  GHHILH9)\ 8#B^C8G 90+HC+J+J+J "  B*Hm 3P  R'$PXT!bH]D . HS)80P 9 K  + - 8HS9 8t68}# 5 *D آ *)L@S HE 8 DpX^J^3y\ 0 0? 8CK  ETFH7 (7HS<(i* @b @CG n (C8 8xZPx8]9 ' C& 8ZP(J8i b+ J #:]! (C* (b  W@EJ V"(BPK@p@E@8 H' (S!@S 0T]V \ 傟  ]  E-5* PHT\   ]89XsX9  V8o0p $   ; ;'#NJ'$AZ09(/ ::==""''$$ 0019: EL C&y8Xy C&Y8At C&K C& J5g 8i+ (:8rZ*!R8A !N8r!I(C0 B8ZP+8A r4 Ҏ0J Ҏ8;H;8 )0(8rJ -8A 82 "9  C&9E}EA@c { (HS Q + r c . Q  W t .  '/ : < 9   . 0 + . # %    (aH^p Y  ^p'1'07 M\  ( )  Q@o8c  i \ Mp 8٢ 5˵  \ Ha  KEE"8a PXc \  "WWW< aPP@a//((--09HHPPXX""AAIILLOOSTDG''ZZ((PPDGAAIILLXXHHOOSS''""DGIIOO))//,,09""''\ 0PH( P(8H C S E@0H 7 w"B 7 .:2 ؂M 8   M-HT)H7\'"',- LHT-HSH7 + -!@7 J 7 K E D:;'+ **8C ! 8#+Z  :ZZZ \ZZ 8Z $*:J( B a):JP ! Z8Z D8K  \ (" k\ :  8\ : ZJ !B. 2 0HN  2 0HJ \ 8:RSRZ: ZZ 9Z  . 2 0HN B\ (8#8Z 9&  \ (J"P2B(8#@C\ (J"B(8#C\ Z 7 .  7 + -  7(9* *(* : ;!  "98C+#1+" ,+J)" KP3[0b 3  ]  SL J8+8#(Hb")$ Z 8+@* CP"PKL: L M XR9ƐRXR9P@ @R0(P:"*2]F;K9@]A8YXS 9X!@&&B \ (s@s 9$] +& -"0 E 8=E 0M(V0 0M +&; &&&&&0XRZ1 R00ZRdXR8CKS X#;R]\ ;K9] \ 8CS }0}XR1$+J+J+J+J4/ P\<182,0H["+ [0\8R4\,0<18R/\ ' 3+ u  C:JX \ 3Z28 #@( "ZC02"C"C \ H^P]H\P[ HcP[0\ P\0[ P[ (^0]8C ](c<PXRڐ+8R\ 8Ғ*B\ H7;+  (7832C\ w0}H\P[ w }0w! \*0}" he\ \ P+#8C kXR<R<T3J2 4T3 4\ / G3  CH XR IXIR8K#K KR@I!R/XR]4@(R:-* +XNRXR\] 08] @@@@@r@ =  E 5 '-'.\XR#; RRXZ08H@c  ( cZ0H8Z L\ ##  "C PB8><"\ 0J9 '9 ! !!  ! 9 0V(P!' 8 89ֽ  ! p\ 0J) Ґ@ 8 J ,&ZXJ74# @@ #@@ ?#o^^D######w##?#######oo $- $- $- $-  %COSDIMABSINTMODEXPSINTANDCOSCABSIABSDABSAINTAMODDINTMAX0MAX1MIN0MIN1IFIXSIGNIDIMSNGLREALDBLEDEXPCEXPALOGDLOGCLOGDSINCSINCCOSDTANTANHSINHSQRTATANDMODDCABSDCLOGDCEXPDCSINDCCOSDREALIDINTAMAX0AMAX1DMAX1AMIN0AMIN1DMIN1FLOATISIGNDSIGNAIMAGCMPLXCdONJGDSQRTCSQRTDATANDTANHDSINHDATN2ATAN2DAIMAGDCONJGDCSQRTALOG10DLOG10DFLOATDCMPLXDATAN2s+t-u*v/q=h,e(z)M:w^@TOSDOQIFi.EQj.NEk.LEl.LTm.GEn.GTo.ORWERRJEND:DATANCALLOGOTOTSTOP8TYPEYREADEREALp.AND^.EOTr.NOTeTASKZWRITEUPAUSE_.SPEC`.EXEC-a.BODYK.TRUEPASSIGNRRETURN\REWINDL.FALSE9BINARY7ACCEPT?COMMONBFORMATDINTEGERGCOMPLEXILOGICALcNOSTACK]ENDFILEdOVERLAY2FUNCTION;EXTERNALACONTINUEVCOMPILERfCHANTASK=DIMENSION4BLOCKDATA[BACKSPACE6PARAMETER3SUBROUTINE>EQUIVALENCEFDOUBLEPRECISIONDlsosz_y} d] zP z)#4<G"(,3 z7@YthH!Y#}; *** *** CHR 'b; 'P5*Z"*:X8:2! H`:Y:2` Y8 ` =CKS8Z9(J+J@Z*J8H` FORT.SV   ^Y66`ep|!{L% h` *4 ) +!PB -)B /B -  + (# ."*1ٷSҭBCK# 1#٪ 3Ґ"*1C#+ 7 )) 0" ."  +! #т (3Ґ"*1CK# .# 1# 1#+Ѫ ) 1# 1  +! #҂#  +  3P28@#խ  02K֠   4 59)  +C;9  +9 *4  +  + ) +;9)  +;9  + ) .:9IMPOSSIBLE SYSTEM EXCEPTIONAL STATUS FATAL ERRO&R FROM FORTRAN PHASE ONE FATAL ERROR FROM ASSEMBLER PHASE FCOM.CMASM.SVFIV.SVCOPYRIGHT (C) DGC, 1972, 73, 74, 75, 77 ALL RIGHTS RESERVED.LICENSED MATERIAL - PROPERTY OF DATA GENERAL CORPORATION.PI%N  LHE!?5? HK9; XXFF15 x9/  *!"HG)"XSSTE1XJ0 *HDP "(I 7  7/ , ~   ! "  ! MEMORY OVERFLOW OR NO F$COM.$$ $TTO   8 ; 5ϵ HI! ;(I DPP ; ;8;XI:Z(GI!HG :9CKCC# B K# B # ::3:TJ0Z; X[;Z QBJ@J; !:^S1 P)C0HJ 83*" TJ0Z(EHI,I I  7`# ?! ? : H`@HB:0FATAL RUNTIME ERROR AT LOC. m, CALLED FROM LOC. ?sy9J B: @3CC!&C'pC#  !#S C33 #) C C3B:0Z'd P)K)@)K)P@S C3 C3B:9 ) ;! 9 B FXI* !@8IXI1 #K@8I5*Z"*:X8:2! H`:Y:2` Y8 ` =CKS8Z9(J+J@Z*J8H` CLG.SV  `\lu|~zzFv!(0@H8Pr@RSBR.[], /;3%/z?zf%$#(OC  (PHr N  (P@f B<  ( 1(L  ( @  ( A(L  ( P@s 2  (@3@4@5 h  (Q 3(R 4(T 8(S 1l 6(L  ( 7  ( >(L  ( imkoq0s 8  )P(L  (g(Xt0d (0l &Pl(9H40nPn0nPn Y ( gC0s  ("S 3 ` W a T b Q c M"J"(V G B< *  ( ; + @ , : + 3 , 6 +" , * : +" , : + - C(H . B< *  ( = + @ , : +" , * : + 4 , 6 +"*J" , : + - D(I .*J" (X0s gC B< * ƛ ( < + @ , : + 5 , 6 + 7 , > +*"9K 9I* " ,S 38`  (M  ((W" eQ : +(X i(U E , : + F , : + - G(J . B< 8e *  ( 7 , > + -(K 70e  .  (<  /$&@x   (zx(L  (zx  (zx  (zx P zx #z   @(^  ( ?  (#  ( (x2SP8Z8f N  (PXf 8(rJ 0%(_ )1 (c  8(r3J0[ 0(r3J0\ 0y[] r(M  (@ry3"BByx2S0]SK S#K +3 C#  + + @ryFCOM.CMFIV.SVASM.SVRLDR.SVFMT.LBFORT.LBFATAL ERROR FROM COMPILER PHASE: FATAL ERROR FROM ASSEMBLER PHASE: FATAL ERROR FROM RELOCATABLE LOADER PHASE: FATAL ERROR FROM RUN MODULE: lCOPYRIGHT (C) DGC, 1972, 73, 74, 75, 77 ALL RIGHTS RESERVED.LICENSED MATERIAL - PROPERTY OF DATA GENERAL CORPOEeRATION.P%N  LH!?5? H9; XX15 9/  *!"H)"XSST1X0 *HP "( v  v& u =   ! "  ! MEMORY OVERFLOW OR NO F$COM.$$ $TTO   8 ;V 5ϵ H! z( PP z z8zX:Z(!H :x! ~. "P ~! ~ STOP T0Z; X[;Z QBJ@J; !:^S1 P)C0H 83*" T0Z<T0Z39-;08;X!$@#؂#+38"):22 P9X v&J |I |x" 0""*2xC2"9s+  D8!gPC2)dπ# v!(H,   v# ~! ~ y `@Boy * 0 @ J ^FATAL RUNTIME ERROR AT LOC. , CALLED FROM LOC. ?yxJ y 3CC!&C'pC#  !#S 33 #) 3By0'd P)K)@)K)P@S 3 3B0yx ) z! x B X* !@8X1 #K@8\5*Z"*:X8:2! H`:Y:2` Y8 ` =CKS8Z9(J+J@Z*J8H`FORT0.LB + +F-@ByF`fCFFfCÎbGS   @oh _DY4@DY`>fcFfcDYÎbGS   @)oh _YxZ-@peZԝZfCÎbG8g   @oh _S4@SzKfCÎSbG \   @#oh _ G4@/GQGfCÎbG \   @oh _8Z4@oϐZ>fcZÎbG \   @oh4p _4o@nfCFfCÎbG h   @oh _ec4o@cnfCFfCÎbG h   @oh. _?`g48@g:WfC`iCnÎbG h   @oh _G48@?G 9G#9fCÎbG \   @oh( _AH4 @v"IH@U"UH#UfCÎbG \   @oh _RZvY4L@vYKfCFfcÎbG h   @oh (_]1[4G@1[F:=[FfcÎbG8g   @oh _5iY4=@&Y?*Y?fcÎbG \   @oh %_k[48@P*[9fcFfcÎbG h   @oh _}2KY4t@TKY`t`fc]Y#uÎbG \   @oh _.Ǚ[4 @ [@UBfc[#UÎbG \   @oh _'Z4~@Z`~Wfc`icnÎbG h   @oh _'Dx4@{x֥xÎbG$  @oh _JXz-@aEz4zÎbG$  @oh _uSy4@&xSyeyÎbG$  @oh _ y4y@<y{Îy{bG$  @oh _WpqH4G@1qHFfC}HFÎbG8g   @oh _2?-@I,͓ÎbG$|   @oh _y4t@ys^ysDÎbG$|  @oh _m.[{4V@[{XÎm{XbG$|  @oh _}EU-@jEU`fCFfCEUÎbGS   @oh _o*c-@\*c`8fCF*cfCÎbGS   @oh _P-@P`fCFfCÎPbGS   @oh _P-@P`fCFfCÎPbGS   @oh _aIH4V@"IHU`dy`fCFIHYfCÎbGS   @oh _M={I4y@{Ix`GaSSCFÎSCbGS  " @oh _E@U4e@@U f`j@UhSCFÎSCbGS   @oh _U4@\U`_ASCFÎSCUbGA5S   @oh _*(Y4~@AY `dLYScFÎScbGS   @oh _1Y4@(Y@`kYScFÎScbGS   @oh _3(Y4~@Y`mLYScFÎScbGS   @oh _'-Y4y@Yz`aQScFÎY|ScbGS   @oh _#Y4@ۥY`]BScFYÎScbGS   @oh _#FY4`@ZYb`]jYcScFÎScbGS   @oh _xP4[@PZ:]ZfCÎbG \   @oh _xP4[@PZ*:fCÎ]ZbG \   @oh _@I4@${I`xmIcxfCÎbG8g   @oh _HH\4[@;\@zyXU\CzfcÎbG \   @oh _H \4[@\@z Y-\CzfcÎbG \   @oh _rVY4@IVY`xfc]Yc7ÎbG8g   @oh _;T4o@T@r{TCrÎSCbG8g   @oh _)#Y4@YJb\YCÎScbG8g   @oh _ FORT1.LB & (v$II%U@cUa#c`ttf@tf tf8;lP%CCb]GK$D$$19OCYPIRHG TC( )GD,C1 79,27 ,3D$$J7 ,47 ,57 7LA LIRHGSTR SEREDv@$$EV.DILECSNDEM TAREAI L -RPPOD$$9*REYTO FADATG NERELAC ROOPARD$$<28ITNO.PN% L H?!?5 X$$ FH;9 XX51 D$$vT/9 * D$'b"!H")XSԁST1X$(haxpX 0*HP "( yX$$~   DAf8D$$, ! "  ! D$$TV8EMOMYRO EVFROL WRON OD,$$FOC.M$$ ZT$OTN  D$' 8; 5 H !DĢD  ( PP  8bE''iX:Z(!H Dyx:$)Hf88!q違AThNfp|b}@;I'?ftr@`?f`rrGÎxG$5 / @oh _ݙ @Y rGÎG$$= /  " 12$!D$$S1*73/D$$! 11%d D$*,Ϩ` IlSS{S{#\ _YK@pKrGÎG$   ";SKCHlJS{ S{ _[VYK@VYKrGÎG$$9  #h";KC)SDHjJS{ S{ _E"htH$ha fa5uNÎG$8q  "GOW '/7D8 "Y @}oh _gԗHgf g5uÎNG$^ '+ "  ' "HY @oh _^oh8$RA<FDPnODiboh8 ``Llll%,P??飲?죙xCCI=b#qNQRPCU8$v DDDo!P  D$$cPCKS!PCCU!`ZCM!PD$$~CN!`CH!CCCCCCCD$$*CCCCC;!xCPCC2S "D$$U8C'C 3 %)" D$юFPҐS# + +3  SD$$EZT"' )+K 1D$$%b Yn$II$p8` $3 #C#%D&$D~d#  CC!C# D$$0K 1# N1+"\mD&$ "KS C3"KP%( C32IEDFHE(:=GO5AP9LS(HE( :,/Z! )HE(e6H XaT<"'oH$$+H# 1# .#++)DD0e)&3S#)3 ++D$$T3#PSPՠSP3D'(hX ;  7 4 # D$$+# 3 3 3!D$'B(&+ ! !  `p#D$$4#C N1 3$EH$BsDT#C G# G$$iPـ 0+ J#+P$$Y^ 3""&)&B3")ـX$$єl G+`P2` 3" "D$$1z*'G+#KD$$T,3*K1B)F;$J  \)83;"D$a/B843D8D #C3 (/:#3 D$$#C n# k#Z+ G$)G C#Z+ ) #3 3J# 3C#D$$5L+P ]3#P TD'eZS#)Z3 CL3#  D$$dOhS#)Z3 C ) D$$tv3Ҽ1ş+P1 .3)J D'^ S#)Z3 C)#P D8$ۀ# # 1 1D$8J  1 G FD$$T 3# 3#S)Z3PĒĢ Z+ )? ) C'D$hC3 CPC+t 7"D'$m)a \!S *3J+JRD$D3C "GVD$'3B3" +3 C5!Db'$Ǘ3 "/DOP3 "bG$$c/4Jʠ3"D$';C3 C3 C D8$, )3<>ΏK ;+J3 D;$:C C3  C")K1D$$H"C1"C3#)J PҠSD$D V X  w#P+ D'9d-CS C# 1D$(rS #Z+ ) # D$'T3.C 3#+ 4D$͒CV P# KPC3DĒ$7"ƏC 23#B# D$$O# # # #Z+ G8$) #3 #) # GD$} ;C#C#C#C!D$%$pC(LAP!S# D$$s:# #) F) ) 3D$$:+K+K=71 W3B#BD$y.PB#`3` 3'ND0$D: %)B"C C#C# #)D$$R? ) 5+3ͣK*) [ ) D%$S(X&FIDGv+ )D$$؃6 ' +3 +K3 F$'ZwD #+C+E 3+)D$$sR #+K3#K#JD0&O`C#3 +3K #)D$$n  1)#SZ3 C D$$|*#S+#!Jb# D0J3# +3K #Z+ G$$bH ;) #C##P$$k ) #C#))K)KD$$m3J#+Μ3)D+8sl[$۲\L8S3 , lGS44#s[$$p\83#@"+BD 84 s[$$\8C3#Bn)PBh)D$'`EBCBCC#C#  D$$] 9`1 X1 V1 # !YD$$ *Q1 I)I1 4G1 1E1 'D$$[(C1 ,A1 )9!3#D&;36 3S $ـX0$ID 3#B# #4# Db@ RC D# $D$$@`+C@0+-.ED {rn[$% n\8+3SS3/ObG(c|4xr[$$@J\8#C#C3/[$ǎ4Ocr [$$\83 I/#CPC# D$S 3#5CD$$= C#PC%D$B&DC 3PC# S 3D$D*#Cy D$bCC#PC 84r [$;Y:\83"  ,:\XDǜ$$L0"+)B",Xb'$V#%9$LG$'9:)Z<"@#D$$  Bq ,[b$j,\83P*L9 ,D'$:D9:,DX$H9:)q PB[$$*P\ 3"99"DGbǒ^@P$@D$D$8l@q t[$$Ot\8C3*K")B+D&$K7  3" #1 D$$5 )3Ҕb))3Ҕ])KCD$$+K+K+ #q) m) D$$+K#+J#D$$i#++J+K3D$$uS/ .+3SS3/D$   #9) #D$$sC&rCCC# +  D$'u +)# D$$^#+ # 1Gb'%K #3+J4FG[$ )u\8!0h'&Dؒ$0&P+\8CCCK'G$$4 #;1 ) 3 D$$=MBP+1 )1 &!3D($P1+ 3+J KC#D؜81^+4# Y D$ l +-9 }ps[$$s\8KKK3[$l'^WD #C#+ ,D$Kߏ`1  #4Tp[$$q\8 J/26CSCD$$2r3##0K#8)Z3 D$'&LC# #Z+ -) 3 D$&;3S#!)Z3 CD$v$CCCSCS#D8ևZ+ ) #4 -*D0o[$$\8KSD$ǀc(KC#Z+ #) )3D0$%  S#Z3 C3 )D$m3 S# )Z3 C4CDHe(K0.$)@~qtf!\Uohh  _ltL@Jl`LFH~ qH#vD$$ ! '  3*KD$'/! 8ۋ3WB ! 7"DDG'WB IaPat!oh h _@o@J$@@C@oQR`S??N#vDD'#))K=! 32SDĒ$C' )K'7 bG$DI  +3 &!! !D$;* 3 '7   DD$83#B$3D"F Hoh<h _cHDJRҠf(Ä젙IcHb8`??Qꃅ#$uD%'O Cg!C CKP #S)D$$F?  W!C#3 /  D$$,F1 D1 KՑSC3D$$h/*2S ,2)/) p4K51 $D$$s8 31#* N ")D$$QFK) )"K D$$oT+32#S D$)$b01{o#3 D8Ěp?C   ?E$$S~z3 ! !j;D$$SP  1SCKD$% J!C 1+ ?+ D?$IHZAlZ!kHN^_x]mh9Pohh _JmZ8HaZ@Z ED(J + 1 ( . S4D(%i 7 :="H$$@%P$TLT$PTC$RDD$$a *T$OT1T$OTT$IT1T$ITL$D$$r8TPP$RTP$PTT$RT _cI ILҀcI?QꃅÎ'D$$CC 3҂7 D$$S/2K/3 ?'#D$%7P+ ? ?## E/k*OI S{+S{' _ ! 4DĒ$L ?)15- PP ?* ?'G$$UC #P%5 P "-D$8*4! ?)- PP D$$8? ?##   DFf8L$דG$FOC.M$$H S{ES{@f8oh?tf!tf _n`ft9HaTbDwf:`~NÎP%D$$FC 0*K  *"TDĒ8o! 4 ?+ PP D$$t+?  ?#P3 # X$|* Z$FOC.M$$D S{+tf! _]VeCIa_CLieC`~P%NÎD$$C   4!7 D$b'y \ 0* *"!T!DĒ8 4 ? 8+ PP Db'dzi*? ? 84h$FOC.M$$D~8#  >HS{=tftf! _HoH#hoV~?ÎQꃅDǢ$h2"C 7 #/ ? H`JS{ S{  _HԎHh\MrGÎPhG, @S{ _`HTOHcO@OrGÎG$ #3B+H.ohS{ _3Z4rH CYNZ r5uNÎG$$1+ #P+ !D w ) IJohS{ S{  _9S4r@ S rrGÎG$$n #P/P   DD$86  +/ !HD1 1H=JS{S{  _uN@ʿuNp9D$$+ 1 ! )ZJZ@D$ )ıT|aBoh _p-T;H?,T-T;.eQꃅÎND'$C 7   ?(D$$27;KCS';+ #+D9@ ?') ف "@ioh% _\h:@h:`QꃅS{ÎS{Gߚ 7 ' ? _?THTfeNQꃅÎG$$z 7 K ?3!D$$B1'* J#D$$<8‹3# ) HX* I^|aB'S{S{%oh* _FzJ{|`BzQꀅNxX8'X 9 )I P3K8H$$@ D$$ r ;T D$$ * D$$q8 D$$F D$$qT D$$b D$$qp - D$$~ D$$q D$$ D$$~q D$$~ D$$bq  J D$$b D$$Fq D$$F D$$*q D$   _{Ԕ$I@ϬM!O\_Ox!W{{5uÎND$$% ' 'G)X$Ď QP8 ' 'D8$G  ' 'G@foh( _{@p{rGÎ G$$U 3*"29 "DHdJS{ S{  _$z@;Ez Qꡐ _!Ot$IZ{S1yxF QꠐrGÎG$8" '/GT '/D$$+ ' /7G$$X '/JPDk *@oh _t@trGÎG$ } ;3+# "HhJS{ S{ _OohtHPoh`HLCU8#q#xD$$iA! 3#B;)JK'CD$$C1 ځ3+J'CD$$63 "G#C[P#3D$$lN*K 0:KD$$Z8K83J3 IatA+oh=h _ze~Ppe~ qH#xD$$#! 3#;*CK&C DuIPatohh _%!CIP5CI頲xD$$r+3)3KSIR^ hThN  _T h@J kh`=hi逜?N}PN#IUviDؒ$Z#D0`!PZZ(J#D;$k Y)B*3 8S2SS32 G$$lQ*83"7ҕD$84*3';!K32+ *83D8$8#:283"KD$$NF/3"}@@@3D$$ T2J232  J!XbG$c b84\8)XCD'|1pC2S8)X @+< _(?UP!y?Ua@v?xD$ڒ8kCKCC# KG$(S#  # 3Hohh _TPTYCUNxD''\.K2 "+) D$Օ3:+JHohh _2lPCF͓}"á#xD'! /' GHohh _dxP|C?xH#xD$}! 'JGHohh _^1[FR%~]F=[Fl8fcFgP#UPfxD$<8S C3 CbG$$2 0"G) B)`! G$$~83; 02)J39 D8$*.) 00B3BBBDے$[D8B\8L#+3;P@@GF@\8CKS4S4[$yAT4@P _,[{X)#PU am{XH#xD$$*w! 'J/JGHoh h _ysPwFaysH#xD$$! '/KGH/oh h _P`P4PNx[$$\RJ0K  4X$.Y @' _XFP$FkP4PNx[$$\ KJKDĜ$zJD04J4X$I @[c\ _wqqHFP~}HFl#8S C3 CbG$$98#*)"(1`#+ D$PB81S9 1 0GĒ$*8CK3P@G$88SH@ _YZ#R sZlzfCF#UfCvhCFh xD$l 8S C3 C Gǀĵ3 _X pH4HIzH kH xcH }H x}H XfC`iCn#v D((PPPP PE$$> CK&CPG$$ '+K'CPX$$* '+@30 C D(P8#  :Hoh=h5V _1—4@JXВݒH#vDD$AP.KCP #D$8CP 'GP '/D$D@30 GHohh _?8 pHTDJ@>@x@}H@x}H@kH@xcH@ `fCFfCfC#vD((PPPP PE$$t C&CKP  D$آ+#C #  P   X$=:*#+0C +X&8 7Hoh:h _"GR {]G`fCFPFx['$&p\3 8S0"')&)D$$ ")QB9Db'$R$"+B84BBBB"E$ 4*!-@HD _XZRQ{Z`fcFPFx['$C\3 8S0"+)8gD$$M*)%) #) )D$$ ZZZ9"+B84D$$m*ZZZZZ2@HDZ8DLP _Jz(RaH@ceyPz~nfCFgC#(QxDB!   Hohh _IxJ"ɺxIx]x``hfCFfC#xD;'TC !  '@pDX$$K P #CP+Hohh _K\X@ -x+\X\X-\X` hfcFfc#xD;'TC !  '@pDX$$K P #CPHohh _x-0[Tw(8o]@x]@@x@=[@x=[@+[@x#[@ `DfcFfcfc#vD($SPP PPD$'$C&CKP  +#D$8C #  P   #D$$*+0C + H85Hoh8h _% y{RLFby{>nfcFgc#xDB!   Hohh{ _kGFqHRkFU DY F [%xD$%0BHSThNh _—TDJRF   ] В  ݒ  `fCFgCfC#vDD$ڵPC&C! #DؒğCP   #+0D $qC  Hհoh$h _ FORT2.LB 1 %WSPkS WS@ llP}hCvhCFfC xl[b\  84[ @ _WYtNPfSWS` lXD(lP}hcvhcFfc xl[b\  84[ @ _cn@Js9 `tG 9}n fCFPFwDؒ$HQ0B\3 8ӅSXB84 _9j[9HJKYw[;] 9n]Y u\9 fcFPFwDؒ$Q0B\3 8 )SX84+ _wqUPbqU qU@ l`TYPT }hCSvhCFxb[$L.\0"" @8  l[l{   4 _YbP]qUqU` l`P}hcTYYvhcFxb[$Q.\0"" @8  l[l{   4 _8TTrT@rT@=fCF#xDD!   Hohh _!YԄKf@rY@Y@fcF#xDD!   Hohh _-aSPaSaS llg P}hC*ce vhCFEUbgCPxl[llt\     l[l;lc   !  4X$g@X _'S4PS S ll}Vg P}hC*cvhCFEUgCPxl[llvI\    l[z 4 _YT YY llFD\|gPY}hcvhcFYgcxl[llsI\    l[t 4 _ 5Y4q<֠Y Y Y l`.ְcxP2}hcTcvhcF=8 [Yxl[llۂ\     [V4 _VTUPT TY l`;ְCxP}hCTCIHY?vhCFxl[ll}\     [V4 _EUԏPUU llְ۪Cxg P}hCTC?vhCFEUgCPxl[lۧ\  v!  l[llB}  @    l[$ 4#@ _Yy֠ Y`Y ll \|ְcxgP}hcTcvhcF#\Y=8gcxql[lۜ\  !  l[llA}  @   l[Ő$b 4#@ _ 2UxPUU| llg P}hC*ce vhCFEUbgC'9Pxl[llr)\     b[llqT !   4E$y@ _CDYb8֠| Y`Yc llؕ\|gPY}hcc\vh=cFYegcxl[llg)\      b[llmT !  4E$@ _%Y֠ Y Y llؕ\|gPYR}hcc\vhcFYegcxl[llt\    l[l;lS   !   4X$V@ _UTTU@ U`ޖfCFPѪvhCFFx['bǾX\3 8S!84H U _UtPY`U` `ޖfcFPvhcFFx['bǾX\3 8S!84H$oOג _;VTnRV@n ZT`PvhCFF`iCnx['bX\3 8S!84H U _:VtnPhۛYV`n `׳PvhcFF`icnx['bX\3 8S!84H$ג _UUUR9UUU`U U@U [%xX$j08 _[)U S@ SPfCFx[$Q\3 8SӅS8[V4 _ YPn˘YS` ϽPfcFx[$b\3 8S )S8[V4 _fSF@JSU<U  S lOP}hCe vhCFvXlln0\    b[V4 _^YG@J3AYFYU S lP}hcvhcFevXlln0\    b[V4 _e SPSS {llۥg fCKPT }hCe vhCFPf gC xl[b;b \ D DDlGllQ    l[ll;4   ! b[l;mZ*$ 47D8A _RCYcPGYS ll%gfcKP}hcTvhcFePfgc xl[b;b \ D DDlGllU}       l[ll; 4   ! b[l;mZ*$ 47D 8A _)"CDlS1B1!& -! bGl;l'!   ! Gll;K!* ! ! ! 0D'$)Y8#B  C!#SYGMD$$UAF:AA ?D$$q?TB@Hðoh:h _N"YP4\AYl`ZlgPvhcFPfh&hcgc x[lb\!   !b[ll;x}r! !4$ED$NY:"A?G52RAD$$*軌O*Cj9o$9CD$$8O@-oT씛8AD$$mFBU `2C}OG_-D$$TC̋YA  _ے#\ԏRZM#\$٠ #\ lcgvhcFePf&hcgcNxD$b'0"1"‹C0"D$$k,)J CpC&!$!X$'00"+J!CS##[ȹ*Pe!#@  DH$-8@?QK@*ͨD$$ YF@>9N(@@@DTHɰoh4h _ Y4R>Y@ Y ll؇dg}hchcxvh$cFeciePfh&hcgcNxD${0"CBM!J)>DlxCC!  C  #;!b[g  2!  # # X8'a*(!#+?!0:Db'$8J8C!# !d[;$)SF D !WqH$$T^B<gD$$bE DNv)IFXH?D$$cpACTm_hD$$~EPm҇F[\ 8u@D$$zAf;uAeG+DOHohIh _O [UHJ~@U [ ] UQ֠Y [ U [Y llۛ&hc`icnfcFgfcvhcFePfh#gcNvD$3$P  PC0"D$'%nD"M"O) J@C0"JD$;4G! @!>!D;ئ<*)B=1ՋoB-K\uHoh]h _lVY:HJQVYxVY|]Y`x]`xC֠| ]Y`7VY; ll&hcfcFgfcvhcFePfh#gcvDؒ$!  $PO KCX'$ޡ $+KC0"D$l'{CBCC"@)C! [bi* 7! 3!2!b[lll8 ,!   bG;F"! !!bGd$5T!#D# !C[$E"I$gbA|pjvAC2Z0D$$G(p@ k,AzLXt@D$$~DzQ5{XA!T-DFAD$$g)2B}@DnVC>WrD$$C@B3,1AD$$zB%BϗS^ULCD$ ö4F3B3,1Hohah _+;\xRH\H ;\| lˮgvhcFeciPfh&hcgcxD$0"CB,!ClG'$&!q#+0#@lGbC   !!["I*07WW>D$$%8A_m0ɥB-9yDD$$6Fm7O[E h@vF%oD$$TSACj?YD$$bBE$ !gkW.F< D pFөtqH˰oh2h _GYHJ7f \Y  \| Y lˮgvhcFeciPfh&hcgcvDD$t i0*uPCDl'iB!+K!Gl;Si+0   !lG$)$,*!kY4Y>6-D$$78-j@A17APQ6D$$]FCZQFC;Ƞ:(DD$$;pTp˴0AJBMsD$$Tbp]ZDxU%lX@nDNDip'H˰oh.h _1[trPw[`&h` l}wgP}hcvhcFex[$bǼ\8(KC*K# !,DĐz+C#4 _ Z|YtLP+|Yie`i lgcPvhcFh`icnxl[Ē$\ 0")  "KD8؃nC#4D _ FORT3.LB ; PZ@JUl#xb]ZllظfCFg *cfCvhCFPf &hC#gCh  vDb'tP  $C Xl'=8!   !Q$El;l3?Sh!   Xl0*! !  !X8lT8!#D   $E$$FdKXA2BEXD$$TT@-oUABK"BD$ ^bj<@A Hoh>h _PZPQR]Zll۩HfCFg fCK}hC*cgCUe vhCFPf #gCh wDؒ$%>P  0S*!*Db;KB 2! $ *! b[l '!   ! lGb'H0*!  ! ! ! [b$)8 ! #0+J HLPH$$uFTAA A-VDT@HohBh _*cPx*c}*c llȿg hCxvhCFeCiPf &hCNgCh xD$ة0"CB=!=)0D8TC6! 0"CB0!*!#D8'=5 +!0:Db'$*J8C!<#!d[;$)8 6 !YUIQI$$|FM^AeGA@D$$TAf?.ID$$]b?AJ@=ȶ@qADpH°oh;h _`I^@JIII`x{I| ll)fCFg gCUfCe vhCFPf &hC#gCh vDǜ$!  $PKCG8$. $+KC0"D$$;:"CJKK"=1:!l[bb'{*  2! 0![lۿm8)! )!  X$$iF!! !! X$T#D# ! YAy$EI$KbAimqu~AC2A!D$$o1pT@ Az@DyQD$$h~@ X@ 3@TU@D$AHoh_h _EU@JcUP EU lg gCUvhCFeCiPf &hCh vDD$hP`0"TCCD$dB)!K+K!Xb;،M+  !!X$$1*0+#a"I$$FC8;@Q@ɢ=%[_>D$$wF/H@@ɗ>D$$LT]? @2@N@tDϪbAHİoh5h _AHR\AH UH UIHY ll[`iCnfCFg fCKe vhCFPf &hC#NgCh vD$P  PC0"D$$f?"F*H! B@K"*JD$FP@BJ 7!X$؍*8!0!C #l[ 8  $!  !Xْ$F!H BBPBD$)uT!BL x@DhtlpI$$UbydA@@-oUD$${p@r@3@IjD$~@A HohVh _BPPqn@P l`۝g gCUvhCFeCiPf &hCgCh xD$ۗ0"CB$!0CD$'! 0+# [d;`!+!$"I$$*1-6@ɡA>D$$bP8de>hH0|?z, ? D$[F@Y)@sH԰oh)h _TP9 l'e vhCFPf NgCxD$$}0""3*7!S61D'80!CK#.1#+1Xl'[ĭ#0!B0+SJ#X۬ī9*#)K!D$Hi8#  @FVJ D$$FA AA<@D$$TEF@m@WC@@Hǰoh6h _O 8P &h@ lg P}hCe vhCFx[$bǺ\8(KC*K# !DĐz+C#4 _voO9PRuOe@i lgCPvhCF`iCnh xl[Ē$\ 0")  "KD8؃nC#4D _egHJ琢ggg` g@ @b PvXbǒ$M )A\9\#*BKD$(<84 _xP4q@OuÏHRÎD''xC # )0'HX   N _\GPV\G#UxG  ;C@oh _z.TP ` [%xX h ) _xpgHHHVf@ f@ f@K fc@ f@K g@U Pf  g  h  e  h@x g@ `i@n f@ f@F $I$I$Isffg~fg|g`hMg$fi0fgeVeWh"pgYKg:%nlfNPCF$$I$I"WV$M`|~nv['\3 "*8N10IXPD$$pSA1C>!KCDbǒCC84\3 8S-!X$$O*X#+@ +1+9D8;J8!8 ;KC84+D$$ F 9Hؒ$3T\8#3"CCD$ob?! @!\#+59D$; p, <CKX$$G~8#+#+3; 8D$8疌 8CK68 J!BM!B#+30N8Db%$,LZ!B6+]0: K CG$$,Z518# +  C0D8'h )8#C8D$b'Hv)"C09P8 1Gؒ$>lX 84 z D I 80HX\HRg _&̋4M@J̋̋ vh`F vh@F `"PCNvD'Gc))\098P#Db'8HB84  _LΜPxD$83&*J@oh _̔ ?=̔A̔??vDD$o_ 2SCKpC#X$$  #K # 3+D1 H۰ohh _kP%|xD$(߻KHNThN h _kДP9ДPxD$$r*"CHKThN h _ !ȓKHZTȓKѾ??D'$`6CK #K + #D$QCK2 S # #D #3B@noh  _7t$@R  b$H. D$$C'/7G\8OWD _ @ 9CCxD$I ! . "P ! M${ &TSPO E4tf ohh _W϶[렞W9CCxD''! "P J!  D$${$,APSU ES RTKI ENA YD$9EK YOTC NOITUN.E Hohh _t؋$Jl n0؋$v DD$AP D$$.PC&))ΊK)"D$$x/@3 92 8GD"I$$*0258;;;D$#B8  HȰoh)h  _6gbPgb`z%xD$8O>&"(J D j#CHKThN h _S{(nS{S{S{OS{|U8U:vD$$l !P8#JҠֈW@oh  _gz$IH =F:/*;N9ThNohhmh9 fp 8 qHb.b#K]GK$@6*/:FX$$T0Z; X[ހ;Z QD$$JBJ@J; !:^S 1DĒ$PC)0H 83*" X8$*T0Z<T0Z3-9;D$$808;X$!@##+3D$$HF8"):22 P9DG$8xTX YJ I Hm8_at' _)HIJ@N KNlgP;HRCC v D$$s" 0""*2Dp!$$C2"s9+  D8g!PD$$C2d)π#1b[')fF(H,  34# G'Y.T!  `@BWM$$\@ebAFAT LURTNMI EREOR RD$$ApA TOL.C ,ACLLDEF OR MOLD%$0~.C ?y$IH~8tfAY+顒Q.:%fpPoh_h  _;ӭZPSZ@C_u?aÞx#DĐ$ÃJ  3Hohh _ ;M@1.:W?D$$c CC&!C'D$SpC# !#S 3D$8B3 #)  +ρ3BE$j*0,'d @eoh) _rLA@4D+頒W?D$$A?P)K)@)K)P@G$$S 3 3B@voh _GU-@JPT GU[xav D$(!]  )  ! D UB HGThNh  _͋@J ??v X$X* !@8X 1ϒD$ #K@8 _ ȓMPjBȓMj PFbx[ؒ8b\3 T<3 <+<"CD84 _osU:@bsUqsU:b`#IvD$$)ΉK2*KJC3D$E*7 8W )D$XΉK2&HͰohh _bn7@Jհ} IFwD$$(!Z\@\2D 2[ _'qhoP6qhoW/PCUxb[\ "4 _#De4U@JWqhqh @U UvXĒ$X8+X82!\J @D$'2J2 _1I@Jd-eYer 'vX''`X83&X83C C*D$$.KJ)0K!)07]D$$=K2W _4I4hNHȐ"]GKbHR@Phbhb%$V% _.h g _,o\tw$f7~h逕g _.I@A@p֍gX _ SMPYD.LB # 6԰\   v G$8P0X 98XD$$ۢ 9P@ @!8 _ HMPYD.LB  2t԰\    vGF0Xv8XAv8 _ NMPYD.LB  v԰\   v G$;-0Xblv`ak8X D$8RblAvak!8 _ FSYS.LB , p9@p9S{ÎS{G$> #+PP  _[K@rKrGÎG$| #P HlJS{S{ _'mn@n`QS{ÎS{Gy 7  ?G _TZ@keZrGÎG$| #P HlJS{S{ _Uz%@lzS{ÎS{G$ #P/  _el@|ǃlrGÎG$k #P "HlJS{S{ _@4S{ÎS{G`'| #P )" _[Uԏ@[US{ÎS{G$ #P/ " _e S@|SS{ÎS{G`'% #P " _ fH{nD$%n " "@ThN  _x@[lxrGÎG$]3 #P "@oh #_alԞ@޴alrGÎG$\3 #P "@oh _c峴p@z峠prGÎG$  "@oh _DltN@2l`NrGÎG$   "G@oh _2e\p@e\pS{ÎS{G`'i '+ " _@pS{|ÎS{G$o #P+ " _hIea^b _>S{ÎS{Gb'  #P " #P "[$F #P " _-T@2-T`QꃅS{ÎS{G߈ 7 # ?, _q&T:@1&T:`S{QꃅÎS{G߅ 7 ' ?+ _J:@a:`WQꃅS{ÎS{Gj 7  ?. _:bc@bcS{ÎS{G$ #P+P " _(n\z@n\zrGÎG$Q #P +"HlJS{S{ _E*[z@\[zrGÎG$$ #P+P3 "HbJS{ S{  _ xx@ xxS{ÎS{G`'V #/ " _5vHHv =vS{ÎS{G$8  #/7 " #/7D " _J ~4b@a~ b`QꃅS{ÎS{J$D$ğsC # 7 /# ?&D'~W3 ҎO 7[ 1 )'D[ 1`p _(SfF@?fFrGÎG$  %"G@oh _I@6IS{ÎS{G$;x #P  " O  _O@O@yÎS{G'߱ #P (" _G cU@ cU S{ÎS{G$WT #P/ # _Ҕ@gҀS{ÎS{G`' #P " _GcU@cUS{ÎS{G$c #P/) -@ _n@nrGÎG$M3 #P ."@oh _ FMT.LB   ek$I$IB`tetftf@tf @8#c@HNn8Zl"]GKNCCHR%$D$$19OCYPIRHG TC( )GD,C1 79,27 ,3D$$J7 ,47 ,57 7LA LIRHGSTR SEREDI$$EV.DILECSNDEM TAREAI L -RPPOD$$9*REYTO FADATG NERELAC ROOPARDl$S8ITNO..D$$ F! " ! D$$Tf1  PP " G$snb 0 HM%   \GMD$$SKp9   <=;59Db'$?~9 HP0-C!D$$PC!C!C- 1 D$$KC)1CS(K1 SDĐ$1ş C)  Df8 Df8 D'f8 M$DT( X'$rB,5 L!  , D$%FPP  S D"%$g 8;   !PEDzEZC! # ! D$$ 7Y # 22I/%P(D#RD$$o C# B#B# C# C#CD$$HO C;K)K!9 *D$$)(JB  * BJJ1 D5f8D$$6 " Y5Pҕ+3R D$$DSYSTSMEE RRRO: D$$RNIUSFFCI=EITNM MERO Y$FOC.MD$$ |`$$T$OT*J  "I$IIpS!z;8!qlhbA+顒mh9HThNohfp\f7>~hHf8違CHABb@Zh@ûh6Ï.sÎG$(ݤ !+C  D$'# Ioh{{fp _{{@{{rGÎD$$C '/ 1+3 D$׵7 IQSUQS{S{ _c`e9ID(.IHp gI@rGÎG'G  '  '  ' H]7  IJaJJaJoh _ hy@ʃ5rGÎD { H}'AThN _8,h_@ rGÎG$hT ' H#d_oh _T(TV@(TVrGÎG$N;I /' I>[AIS{S{ _giIe666ÎÏG$$o #/  #/ X$$  # O  Ie״A_!_oh _(\Vh:@ Vh:?QꃅÎD'$c[2*KC +# 'D$$K3 B#BJ "):D'$B"  12 ‹3B #DK* InG,|aB+S{)S{( _(`ȓoH#hoV~?QꃅÎD%2"C 7 /# I6a S{ S{  _`ȓԎHh\MrGÎD B2"C # I%[( S{S{ _ȓTOHcO@O5uNÎDĒ$ 2"C #3B+# D9   I(ohS{S{ _`ȓkHWU9@cUa5uNÎD$42"C # +  D;IR(akoh S{ S{ _o)Fԏ@FrGÎG$ / Iq?[HS{S{( _jE~tF@~tFrGÎG$ / Iq>[IS{S{ _:@QrrGÎG$\ / GE|S{S{ 5q_n@{nrGÎG$ / I>[IS{S{ _7eI~@eI~?ÎQꃅDĒ$w 2"C 3B+J+$!D$$'M B'/9BZ ZD$'J8#)#B' B12 ;E$*S I|aB,S{(S{+ _-ԏ@DvrGÎG$$+ 3" ? "CKS E$$9" 141t"C//'41KD"I$*% )+02:87D$$|0*1 1,3Ə31E$%<8113B#J  1@CH$$FF d<2$INP7\9S{AS{E _@rGÎG$$ 3" ;#B#+ 1D%y3J < Ir S{S{ _C9Vo@ZVorGÎG$$Q 3" 6BB " ,1ؒD$$g@/1"C//'/1K  %$I$$1'40,871 D$$R* 1 1- 3J DH$8 17:= d<2D;F$IF1\(S{8S{< _iSB I9[[:SCSBrGÎG$ / IiRc]S{S{ _&DzA)Vƨ@z "zA?QꃅÎG$$  Ղ+7 S Պ/D$$Ӡ/I @ ,/ 3Ή3B#E$  2*K #D$$ *&C+ D$$R81!1AE8D$$fF#J@#B'/BD 8T'/JB$II+ ;5Eb:}Xa4d] |S{2S{1 _s Y@YrGÎG$ / IX~JS{S{ _PW@PWD { H!zThN _pҮt@񒮔`D { H}qThN _ PARF.SR " 95 ; COPYRIGHT (C) DATA GENERAL CORP., 1972, 1973, 1974, 1975, 1977 ; ALL RIGHTS RESERVED. ; ; LICENSED MATERIAL - PROPERTY OF DATA GENERAL CORPORATION **.NOCON 1 ; DEFINE OPERATING SYSTEM VALUES (?OS?) .DUSR ?RDOS= 1 ; RDOS/RTOS/SOS .DUSR ?IRM= 2 ; IReRM ; SET FORTRAN IV SWITCH FOR ASSEMBLY OF TASK MODULES AND OTHER ; ROUTINES .DUSR F4SW= 1 .DUSR F5SW= 0 ; FORTRAN RUN-TIME PARAMETER TAPE ; DEFINE THE CURRENT STACK POINTER LOCATION **.DO ?ECLIPSE .DUSR FP= 41 ; ECLIPSE FRAME POINTER .DUSR SL= 42 ; FECLIPSE STACK LIMIT .DUSR SO= 43 ; STACK OVERFLOW ADDRESS **.ENDC **.DO ?OS?==?RDOS .DUSR FSP= USP **.ENDC **.DO ?OS?==?IRM .DUSR FSP= FP **.ENDC ; DEFINE THE NREL PARTITIONS **.DO ?OS?==?RDOS .MACRO N?RLS ; SHARED CODE **.NREL % **.ENDC **.DO ?OS?==?fIRM .MACRO N?RLS ; SHARED CODE **.NREL 1 % **.ENDC .MACRO N?RLU ; UNSHARED CODE **.NREL % ; DEFINE THE FIXED STACK DISPLACEMENTS .DUSR FRTN= -170 ; DON'T MODIFY THE DISPLACEMENTS .DUSR FAC2= -171 ; FOR FRTN, FAC2, FAC1, FAC0 .DUSR FAC1= -172 ; AC1 .DUSR FAC0= -173 ; AC0 .DUSR FCRY= -174 ; CARRY .DUSR FEAD= -175 ; SUBROUTINE ENTRY ADDRESS .DUSR FPLP= -176 ; PARAMETER LIST POINTER .DUSR FOSP= -177 ; OLD STACK POINTER .DUSR FLGT= -200 ; STACK FRAME LENGTH .DUSR FFEL= 11 ; FIXED LENGTH OF THE SE}TACK FRAME .DUSR FTSTR= -167 ; TEMPORARY STORAGE STARTING DISKP. .DUSR TMP= FTSTR .DUSR FZD= -200 ; FUDGE FACTOR FOR ZEROTH FORTRAN ; DISPLACEMENT .DUSR EMSK= 177B7 ; MASK FOR EXPONENT ; DEFINE THE RUN-TIME ERROR CODES ; FATAL ERRORS USE @"CODE" WHkERE THE "CODES" ARE ; GIVEN BELOW ; DEFINE THE ALC MAGIC .DUSR ENOP= @11 ; ALC NO-OP .DUSR EOS= 1B11 ; ERROR CODE OFFSET .DUSR FATAL= 1B1 ; FATAL ERROR BIT .DUSR FEMOF= 1.*EOS+ENOP ; STACK OVERFLOW .DUSR FECGT= 2.*EOS+ENOP ; COMPUTED GOTO ERROR .DUSR FEDV0= 4.*EOS+ENOP ; DIVISION BY ZERO .DUSR FEIOV= 5.*EOS+ENOP ; INTEGER OVERFLOW .DUSR FEIPR= 6.*EOS+ENOP ; INTEGER POWER OVERFLOW .DUSR FEFUF= 7.*EOS+ENOP ; FLOATING POINT UNDERFLOW .DUSR FEFOF= 8.*EOS+ENOP ; FLOATING POINT OVERFLOW .DUSR FEFMR= 9.*EOS+ENOP ; ILLEGAL FORMAT SYNTAX .DUSR FELER= 11.*EOS+ENOP ; LOGIC CONVERSION ERROR .DUSR FENER= 13.*EOS+ENOP ; NUMBER CONVERSION ERROR .DUSR FEIOR= 14.*EOS+ENOP ; I/O ERROR .DUSR FEFLD= 15.*EOS+ENOP ; FIELD ERROR .DUSR FESQR= 16.*EOS+ENOP ; SQUARE ROOT OF NEG$qATIVE NUMBER .DUSR FELOG= 17.*EOS+ENOP ; LOG OF NEGATIVE NUMBER .DUSR FECLS= 18.*EOS+ENOP ; CHANNEL NOT OPEN .DUSR FEOPN= 19.*EOS+ENOP ; CHANNEL ALREADY OPEN .DUSR FECHN= 20.*EOS+ENOP ; NO CHANNELS AVAILABLE .DUSR FEDOS= 21.*EOS+ENOP ; DOS EXCEPTIONAL STAT"US .DUSR FEEXP= 24.*EOS+ENOP ; EXPONENTIAL OVER/UNDERFLOW .DUSR FEOOB= 25.*EOS+ENOP ; ARRAY REFERENCE OUT OF BOUNDS. .DUSR FEPWR= 26.*EOS+ENOP ; -VE BASE FOR FLOATING POWER .DUSR FENSO= 27.*EOS+ENOP ; NUMBER STACK OVERFLOW .DUSR FEBNI= 28.*EOS+ENOP ; BACKS EPACE NOT IMPLEMENTED .DUSR FERST= 29.*EOS+ENOP ; ATTEMPT TO RESTORE CHANNEL ; STATUS NOT PREVIOUSLY SAVED .DUSR FEQTS= 30.*EOS+ENOP ; QUEUED TASK ERROR .DUSR FEFNR= 31.*EOS+ENOP ; SEEK ON NONRANDOM FILE .DUSR FEOVL= 32.*EOS+ENOP ; OVERLAY ABORTED .DUSR5 FEARG= 33.*EOS+ENOP ; ILLEGAL ARGUMENT .DUSR FEDEL= 34.*EOS+ENOP ; DELETE ERROR(FILE OPEN) .DUSR FEOVK= 35.*EOS+ENOP ; OVERLAY ERROR IN OVERLAY KILL .DUSR FEADR= 36.*EOS+ENOP ; UNDEFINED ENTRY .DUSR CDDSP= 3 ; SYSTEM ERROR DISPLACEMENT ; DEFINE THE NEW}-LINE TERMINATOR **.DO ?OS?==?RDOS .DUSR CR?NL= 15 ; RDOS NEW-LINE IS CR **.ENDC **.DO ?OS?==?IRM .DUSR CR?NL= 12 ; IRM NEW-LINE IS NL **.ENDC ; DEFINE THE FLOATING POINT PARAMETERS .DUSR MAXPR= 10. ; MAXIMUM PRECISION ; (NO. OF WDS. OF MANTISSA MAX.) ; DEFINE THE FLOATING REGISTER EQUIVALENCES .DUSR SGN= -3 ; SIGN (BIT 15) ; (LEAVE AS MOST NEG. DISPLACE.) .DUSR EX= -2 ; EXPONENT (BITS 9-15) .DUSR PRC= -1 ; REGISTER PRECISION .DUSR MANT= 0 ; HIGH ORDER MANTISSA WORD **.DO ?HARD ; DEFINE THE NUMBER STACK DISPLACEMENTS .DUSR OP1S= 0 ; CURRENT STACK OPERAND - SIGN .DUSR OP1X= 0 ; EXPONENT .DUSR OP1M= 0 ; MANTISSA .DUSR OP2S= -4 ; LAST OPERAND - SIGN .DUSR OP2X= -4 ; EXPONENT .DUSR OP2M= -4 ; MANTISSA .DUSR OP3S= 4 ; NEXT OPERAND -u SIGN .DUSR OP3X= 4 ; EXPONENT .DUSR OP3M= 4 ; MANTISSA .DUSR REGL= 4 ; REGISTER LENGTH ; F.P. OFFSETS .DUSR FPW1= 0 .DUSR FPW2= 1 .DUSR FP2W1= -REGL .DUSR FP2W2= -REGL+1 **.DO ?NOVA ; STRUCTURE OF FPU STATUS REGISTER .DUSR FPANY= 1B0 ; SET IF AN )Y ERROR OCCURS .DUSR FPOVF= 1B1 ; EXPONENT OVERFLOW .DUSR FPUNF= 1B2 ; EXPONENT UNDERFLOW .DUSR FPDVZ= 1B3 ; DIVISION BY ZERO .DUSR FPMOF= 1B4 ; MANTISSA OVERFLOW .DUSR FPGTZ= 1B5 ; (FPAC) > 0 .DUSR FPEQZ= 1B6 ; (FPAC) = 0 .DUSR FPLTZ= 1B7 ; (FPAC) < 0 .DUSR FPIND= 1B13 ; FPU INTERRUPTS DISABLED .DUSR FPPPM= 1B14 ; PARALLEL PROCESSING MODE .DUSR FPDMD= 1B15 ; DIAGNOSTIC MODE .DUSR FPUST= FPIND+FPPPM ; INITIAL FPU STATUS **.ENDC **.DO ?ECLIPSE ; INITIAL FLOATING POINT STATUS .DUSR FPUST= 0 ; NO FAULTS, NO RUNS, NO ERRORS **.ENDC **.ENDC **.DO ?SOFT ; DEFINE THE NUMBER STACK DISPLACEMENTS .DUSR OP1S= 0 ; CURRENT STACK OPERAND - SIGN .DUSR OP1X= 1 ; EXPONENT .DUSR OP1M= 2 ; MANTISSA .DUSR OP2S= -6 ; LAST OPERAND - SIGN .DUSR OP2X= -5 ; EXPONENT .DUSR OP2M= -4 ; MANTISSA .DUSR OP3S= 6 ; NEXT OPERAND - SIGN .DUSR OP3X= 7 ; EXPONENT .DUSR OP3M= 10 ; MANTISSA .DUSR REGL= 6 ; REGISTER LENGTH **.ENDC ; DEFINE I/O CHANNEL ASSIGNMENT TABLE. .DUSR CHCNT= 64. ; MAX. CHANNEL COUNT **.DO ?OS?=l=?RDOS .DUSR CATOV= -1 ; FIV OVERLAY CHANNEL NUMBER **.ENDC **.DO ?OS?==?IRM .DUSR CATOU= -1 ; FIV RUNTIME OUTPUT CHANNEL **.ENDC ; PER ENTRY .DUSR CATFL= 0 ; FLAGS + RDOS CHANNEL # .DUSR CATRL= CATFL+1 ; RECORD LENGTH (RANDOM ONLY) .DUSR CATLK= CATRL+1 ; LOCK WORD TO PREVENT CONFLICTS .DUSR CATBP= CATLK+1 ; BYTE POINTER TO FILENAME .DUSR CATL= CATBP+1 ; LENGTH OF I/O CAT ENTRIES .DUSR CATOP= 1B0 ; CLOSED SWITCH .DUSR CATMO= 1B1 ; MODE - 1 => BINARY ; MULTI-TASKING MEMORY SEGMENT PARAMETERS .D9USR S.LNK= 0 ; LINK TO NEXT MEMORY SEGMENT .DUSR A.TLN= S.LNK+1 ; ADDRESS OF TELN FOR SAVE/RESTORE .DUSR I.FSP= A.TLN+1 ; INITIAL FSP .DUSR I.QSP= I.FSP+1 ; INITIAL QSP .DUSR I.NSP= I.QSP+1 ; INITIAL NSP .DUSR I.SP= I.NSP+1 ; INITIAL SP .DUSR A.FPU= I.SP+1 ; ADDRESS OF FPU SAVE AREA FOR TCBMON ; THE NEXT LOCATIONS FORM THE EXTENDED SAVE AREA .DUSR TLEXS= A.FPU+1 ; START OF EXTENDED SAVE DISPLACEMENTS **.DO ?NOVA .DUSR TRTSP= TLEXS ; SAVE AREA FOR SP .DUSR TNDSP= TRTSP+1 ; SAVE AREA FOR .NDSP **o.ENDC **.DO ?ECLIPSE .DUSR TNDSP= TLEXS ; SAVE AREA FOR .NDSP **.ENDC .DUSR TAFSP= TNDSP+1 ; SAVE AREA FOR AFSE .DUSR TOVFL= TAFSP+1 ; SAVE AREA FOR .OVFLO .DUSR TSV0= TOVFL+1 ; SAVE AREA FOR .SV0 .DUSR TQSP= TSV0+1 ; SAVE AREA FOR QSP .DUSR TFLSP= TQSP+1 ; SAVE AREA FOR NSP .DUSR TLEXN= TFLSP-TLEXS+1 ; LENGTH OF PAGE ZERO SAVE AREA **.DO ?HARD **.DO ?ECLIPSE .DUSR E.FPS= TFLSP+1 ; FLOATING POINT STATUS .DUSR E.FPU= E.FPS+2 ; SPACE FOR FPAC .DUSR E.FPE= E.FPU+(4*REGL) **.ENDC **.DO ?NOVA .DUSR E.FPU= TFLSP+1 ; SPACE FOR FPAC AND TEMP .DUSR E.FPS= E.FPU+(2*REGL) ; FLOATING POINT STATUS .DUSR E.FPE= E.FPS+1 **.ENDC **.ENDC **.DO ?SOFT .DUSR E.FPE= TFLSP+1 ; NO SPACE FOR FPU **.ENDC .DUSR A.SP= E.FPE ; START OF RUNTIME STACK **.DO ?OS?==?RDOS .DUSR L[0.SP= 32. ; LENGTH OF RUNTIME STACK **.ENDC **.DO ?OS?==?IRM .DUSR L.SP= 52. ; LENGTH OF RUNTIME STACK **.ENDC .DUSR A.NSP= A.SP+L.SP ; START OF NUMBER STACK ; THE NUMBER STACK IS OF VARAIBLE LENGTH, SO NO SYMBOL CAN DEFINE ITS START ; FORTRAN QUEUE ARRAY EXTENSIONS **.DO ?OS?==?RDOS .DUSR QXAC2= QPEX ; AC2 FOR TSK.X: 0 => STACK, <> 0 => NO STACK .DUSR QXLEN= QXAC2-QPEX+1 ; FORTRAN EXTENSION LENGTH ; FORTRAN PROGRAM TABLE EXTENSIONS .DUSR LXAC2= LPEX+QXAC2-QPEX ; THIS GOES INTO QXAC2 .DUSR LXLEN= QXLEN ; EXTENSIONS ARE SAME LENGTH **.ENDC **.DO ?OS?==?IRM .DUSR QPEX= ?DXLTH  ; FORTRAN EXTENSION STARTS AT END OF LONG PACKET .DUSR QXAC2= ?DAC2 ; 0 => STACK, <> 0 => NO STACK .DUSR QXFPC= QPEX ; FORTRAN START ADDRESS .DUSR QXOVL= QXFPC+1 ; ROOT/OVERLhuAY ENTRY .DUSR QXLEN= QXOVL-QPEX+1 ; FORTRAN EXTENSION LENGTH ; IRM FORTRAN IV IPC DEFINITIONS .DUSR F4?UC= 1B4 ; IPC MESSAGE IS FIV UNLABELED COMMON **.ENDC ; DEFINE MNEMONICS FOR COMMONLY USED INSTRUCTIONS .DUSR NOP= JMP 1,1 ; NO OPERATION ; UNSI,GNED INTEGER COMPARISONS: (EG USLT 2,3) .DISS SEQ= SUB# 0,0,SZR ; SKIP IF ACS = ACD .DISS SNE= SUB# 0,0,SNR ; SKIP IF ACS <> ACD .DISS USGE= SUBZ# 0,0,SEZ ; SKIP IF ACS >= ACD .DISS USGT= SUBZ# 0,0,SZC ; SKIP IF ACS > ACD .DISS USLE= SUBZ# 0,0,SNC ;@ SKIP IF ACS <= ACD .DISS USLT= SUBZ# 0,0,SBN ; SKIP IF ACS < ACD ; SIGNED COMPARISONS TO ZERO (EG SLTZ 2) ; NOTE: SGTZ AND SLEZ. NEGL# DOES NOT WORK BECAUSE 100000 IS ; TREATED INCORRECTLY .MACRO SEQZ ** MOV# ^1,^1,SZR ; SKIP IF AC = 0 % .MfACRO SNEZ ** MOV# ^1,^1,SNR ; SKIP IF AC <> 0 % .MACRO SLEZ ** ADDO# ^1,^1,SEZ ; SKIP IF AC <= 0 % .MACRO SGTZ ** ADDO# ^1,^1,SBN ; SKIP IF AC > 0 % .MACRO SLTZ ** MOVL# ^1,^1,SNC ; SKIP IF AC < 0 % .MACRO SGEZ ** MOVL# ^1,^1,SZC ; SKIP IF AC >= 0 %  .MACRO USLE1 ; SKIP IF AC = 0 OR 1 ** MOVZR# ^1,^1,SZR % .MACRO USGT1 ; SKIP IF AC <> 0 OR 1 ** MOVZR# ^1,^1,SNR % .MACRO SEQM1 ; SKIP IF MINUS ONE ** COM# ^1,^1,SZR % .MACRO SNEM1 ; SKIP NOT MINUS ONE ** COM# ^1,^1,SNR % **.DO ?NOVA .MACRO S?+PSH ; PUSH RUNTIME STACK POINTER ** ISZ SP ** STA ^1,@SP % .MACRO S?POP ; POP RUNTIME STACK POINTER ** LDA ^1,@SP ** DSZ SP % .MACRO J?POP ; POP THE STACK AND JUMP TO ADDRESS IT CONTAINED ** S?POP 2 ; GET RETURN ** JMP 0,2 ; GO HOME % **.ENDC **.nDO ?ECLIPSE .MACRO S?PSH ; PUSH RUNTIME STACK POINTER ** PSH ^1,^1 % .MACRO S?POP ; POP RUNTIME STACK POINTER ** POP ^1,^1 % .MACRO J?POP ; POP THE STACK AND JUMP TO ADDRESS IT CONTAINED ** POPJ ; GO BACK TO CALLER % **.ENDC .MACRO S?EXT **.DO ?7NOVA **.EXTD SP ; NOVA RUNTIME STACK POINTER **.ENDC % ; DEFINE MACROS FOR MULTI-TASKING CALLS .MACRO T?CAL ; GENERATE A CALL TO A TASKING PRIMITIVE **.DO ?OS?==?RDOS ** JSR @^1 ; GO @NREL TO AN NREL ENTRY **.ENDC **.DO ?OS?==?IRM ** ^2 ; USE IRM MACRO NAME **.ENDC % .MACRO T?PTR ; GENERATE THE NREL DATABASE NEEDED BY T?CAL **.DO ?OS?==?RDOS **.EXTN ^2 **^1: ^2 **.ENDC % ; DEFINE MACROS FOR SYSTEM CALLS AND ERRORS .MACRO S?CAL ; GENERATE A SYSTEM CALL **.DO ?OS?==?RDOS ** .SYSTM ** ^1 ; RD˂OS VERSION **.ENDC **.DO ?OS?==?IRM ** ^2 ; IRM VERSION IS A MACRO IT SELF **.ENDC % .MACRO E?DEF ; DEFINE ERROR STORAGE **.DO ?OS?==?RDOS **^1: ^2 ; 1ST VALUE IS RDOS CODE **.ENDC **.DO ?OS?==?IRM **^1: ^3 ; 2ND VALUE IS IRM CODE **.ENDC % **.DO 2?OS?==?IRM ; START OF IRM PACKET MACROS **.EJECT ; MACROS TO EASE THE BUILDING OF IRM SYSTEM CALL PACKETS ; FROM FORTRAN ISA CALLS, WHERE SOME OF THE ARGUMENTS ; MAY BE NIL, DEF, OR NOT PRESENT. .MACRO C?NLW ; SKIP ?IF AC# = NIL **.IFN ^1<>^2 ; IF AC-'S ARE DIFFERENT: ** MOV ^1,^2 ; S --> D **.ENDC ** COMZL# ^2,^2,^3 ; CHECK FOR 077777 (SZR OR SNR) % .MACRO C?NLB ; SKIP ?IF AC# = NIL, ELSE SHIFT LEFT ** MOVZL ^1,^2 ; S --> D ** COMZR# ^2,^2,^3 ; CHECK FOR 177776 (SHL NIL) % .MACRO C?WAD ; CHECKt ARG, SKIP IF NIL, SET TO -1 IF DEF ** ADDOR ^1,^1 ; SET 1B0 FOR CHECK ** COMZR# ^1,^1,SZR ; CHECK FOR NIL OR DEF ** ADDOR ^1,^1,SKP ; NORMAL, CLEAR BIT 0 ** INC ^1,^1,SZR ; DEF -> -1, NIL -> 0 AND SKIP % .MACRO C?BAD ; CHECK, SKIP IF NIL, SET -1 IF DEF, ELSE SHL ** ADDOR ^1,^1 ; SET 1B0 FOR CHECK ** COMZR# ^1,^1,SZR ; CHECK FOR NIL OR DEF ** MOVZL ^1,^1,SKP ; NORMAL, MAKE BYTE POINTER ** INC ^1,^1,SZR ; DEF -> -1, NIL -> 0 AND SKIP % .MACRO M?WARG ; MOVE WORD ADDRESS FROM ARG1,3 TO ARG2,2 ** ; U`SING ARG3 AS A TEMP IF SUPPLIED, ELSE AC0 **.PUSH ?A ; GET A VAR **.IFN .ARGCT==3 **?A= .ARGCT ; USE THIRD ARG AS TEMP **.ENDC **.IFE .ARGCT==3 **?A= 0 ; USE AC0 AS TEMP **.ENDC ** LDA ?A,^1,3 ; GET ARG FROM STACK ** STA ?A,^2,2 ; PUT IN PACKET **?MA= .POP ; RESTORE VAR % .MACRO M?BARG ; GET ADDRESS FROM ARG1,3. SHIFT IT LEFT. STORE ** ; IN ARG2,2 USING ARG3 AS A TEMP, IF GIVEN, OR 0 **.PUSH ?A ; GET A VAR **.IFN .ARGCT==3 **?A= .ARGCT ; USE THIRD ARG AS TEMP **.ENDC **.IFE .ARGCT==3 **?A[= 0 ; USE AC0 AS TEMP **.ENDC ** LDA ?A,^1,3 ; GET ARG FROM STACK ** ADD ?A,?A ; MAKE BYTE POINTER, SAVE CARRY. ** STA ?A,^2,2 ; PUT IN PACKET **?A= .POP % .MACRO C?WARG ; GET ARG1. CHECK FOR NIL OR DEF. ** ; NO STORE IF NIL, -1 IF DEF. ** ; mUSE ARG3 AS TEMP IF GIVEN. **.PUSH ?A ; GET A VAR **.IFN .ARGCT==3 **?A= .ARGCT ; USE THIRD ARG AS TEMP **.ENDC **.IFE .ARGCT==3 **?A= 0 ; USE AC0 AS TEMP **.ENDC ** LDA ?A,^1,3 ; GET ARG FROM STACK ** C?WAD ?A ; CHECK FOR NIL OR DEF. SKIP IF NIL ** STA ?A,^2,2 ; PUT IN PACKET **?A= .POP % .MACRO C?BARG ; GET ARG1. CHECK FOR NIL OR DEF. NO STORE ** ; IF NIL, -1 IF DEF, ELSE SHL. ** ; USE ARG3 AS TEMP IF GIVEN. **.PUSH ?A ; GET A VAR **.IFN .ARGCT==3 **?A= .ARGCT ; USE THIRD ARG AS TEMPX **.ENDC **.IFE .ARGCT==3 **?A= 0 ; USE AC0 AS TEMP **.ENDC ** LDA ?A,^1,3 ; GET ARG FROM STACK ** C?BAD ?A ; CHECK FOR NIL,DEF, OR SHL ** STA ?A,^2,2 ; PUT IN PACKET **?A= .POP % .MACRO P?SET ; STORE A VALUE IN EACH OF GIVEN DISPLACEMENTS **.PUSH ?A **?A= 2 **.PUSH ?I **?I= .ARGCT **.DO (.ARGCT-2) ** STA ^1,^?A,^?I **?A= ?A+1 **.ENDC **?I= .POP **?A= .POP % **.EJECT .MACRO H?SYS ; VANILLA HEADER FOR VANILLA IRM SYSLIB CALLS **.NOCON 1 .TITL Q^1 ; FORTRAN INTERFACE TO ?^1 .ENT Q^1 .EXTN ISA.ERxR,ISA.NORM .EXTD .FARL N?RLS **.DO .ARGCNT>1 ^2= FTSTR **.PUSH ?A **.PUSH ?I **?I= 2 **.DO (.ARGCNT-2) **?A= ?I **?I= ?I+1 ^?I= ^?A+1 **.ENDC FS= ^?I+1-FTSTR **?I= .POP **?A= .POP FS Q^1: JSR @.FARL **.ENDC % **.EJECT **.ENDC ; END OF IRM PACKET MACROS **.DO ?HARD ; FLOATING POINT MACRO DEFINITIONS **.DO ?NOVA .MACRO L?OAF ; WAIT FOR FPU TO FINISH ** SKPBZ FPU ** JMP .-1 % .MACRO F?AS ; ADD SINGLE ** L?OAF ** DOA ^1,FPU1 % .MACRO F?SBS ; SUBTRACT SINGLE ** L?OAF ** DOAS ^1,FPU1 % .MACRO FT?MLS ; MULTIPLY SINGLE ** L?OAF ** DOAP ^1,FPU1 % .MACRO F?DVS ; DIVIDE SINGLE ** L?OAF ** DOAC ^1,FPU1 % .MACRO F?ATS ; ADD TEMP TO FPAC (SINGLE) ** L?OAF ** DOC 0,FPU1 % .MACRO F?ST1 ; SUBTRACT TEMP FROM FPAC (SINGLE) ** L?OAF ** DOCS 0,FPU1 %y .MACRO F?MTS ; MULTIPLY SINGLE FROM TEMP ** L?OAF ** DOCP 0,FPU1 % .MACRO F?DTS ; FPAC := FPAC/TEMP (SINGLE) ** L?OAF ** DOCC 0,FPU1 % .MACRO F?LDS ; LOAD FPAC SINGLE ** L?OAF ** DOBP ^1,FPU1 % .MACRO F?STS ; STORE FPAC SINGLE ** L?OAF ** DOBS ^1,FPU1 ** L?OAF % .MACRO F?MFT ; MOVE FPAC TO TEMP ** L?OAF ** NIOP FPU2 % .MACRO F?MTF ; MOVE TEMP TO FPAC ** L?OAF ** NIOC FPU2 % .MACRO F?SCL ; SCALE FPAC TO C(REG) ** L?OAF ** DOB ^1,FPU2 % .MACRO F?COM ; NEGATE FPAC ** L?OAF ** NIOC FPU1ξ % .MACRO F?NRM ; NORMALIZE FPAC ** L?OAF ** NIOS FPU2 % .MACRO F?PLS ; MAKE FPAC POSITIVE ** L?OAF ** NIOP FPU1 % .MACRO F?AD ; ADD DOUBLE ** L?OAF ** DOA ^1,FPU2 % .MACRO F?SBD ; SUBTRACT DOUBLE ** L?OAF ** DOAS ^1,FPU2 % .MACRO F?MLD ; MU+LTIPLY DOUBLE ** L?OAF ** DOAP ^1,FPU2 % .MACRO F?DID ; DIVIDE DOUBLE ** L?OAF ** DOAC ^1,FPU2 % .MACRO F?ATD ; ADD TEMP TO FPAC (DOUBLE) ** L?OAF ** DOC 0,FPU2 % .MACRO F?ST2 ; SUBTRACT TEMP FROM FPAC (DOUBLE) ** L?OAF ** DOCS 0,FPU2 % .MACRO F?xJMTD ; MULTIPLY DOUBLE FROM TEMP ** L?OAF ** DOCP 0,FPU2 % .MACRO F?DTD ; FPAC := FPAC/TEMP (DOUBLE) ** L?OAF ** DOCC 0,FPU2 % .MACRO F?LDD ; LOAD FPAC DOUBLE ** L?OAF ** DOBP ^1,FPU2 % .MACRO F?STD ; STORE FPAC DOUBLE ** L?OAF ** DOBS ^1,FPU2 ** L?OAF % .MACRO F?LST ; LOAD STATUS REGISTER WITH C(REG) ** L?OAF ** DOA ^1,FPU % .MACRO F?RST ; READ/CLEAR STATUS INTO REG ** L?OAF ** DIAC ^1,FPU % .MACRO F?CLS ; CLEAR FPAC SINGLE ** L?OAF ** NIOS FPU1 % .MACRO F?CLD ; CLEAR FPAC DOUBLE ** LkZ?OAF ** NIOS FPU1 % .MACRO F?RHW ; READ FPAC HIGH WORD ** L?OAF ** DIA ^1,FPU1 % .MACRO F?LDX ; LOAD EXPONENT ** L?OAF ** DOBC ^1,FPU2 % **.ENDC **.DO ?ECLIPSE .MACRO X?PND **.DO ^1>1 ** ^2 0,0,^1 **.ENDC **.DO ^1<2 ** STA ^1,.SV0 ** ^2 0,@.SV0 **.E:NDC % .MACRO F?AS ; ADD SINGLE ** X?PND ^1,FAMS % .MACRO F?SBS ; SUBTRACT SINGLE ** X?PND ^1,FSMS % .MACRO F?MLS ; MULTIPLY SINGLE ** X?PND ^1,FMMS % .MACRO F?DVS ; DIVIDE SINGLE ** X?PND ^1,FDMS % .MACRO F?ATS ; ADD TEMP TO FPAC (SINGLE) ** FAS 1,0 % .MACRO F?ST1 ; SUBTRACT TEMP FROM FPAC (SINGLE) ** FSS 1,0 % .MACRO F?MTS ; MULTIPLY SINGLE FROM TEMP ** FMS 1,0 % .MACRO F?DTS ; FPAC := FPAC/TEMP (SINGLE) ** FDS 1,0 % .MACRO F?LDS ; LOAD FPAC SINGLE ** X?PND ^1,FLDS % .MACRO F?STFTS ; STORE FPAC SINGLE ** X?PND ^1,FSTS % .MACRO F?MFT ; MOVE FPAC TO TEMP ** FMOV 0,1 % .MACRO F?MTF ; MOVE TEMP TO FPAC ** FMOV 1,0 % .MACRO F?SCL ; SCALE FPAC TO C(REG) ** .IFN ^1==0 ** FSCAL 0 **.ENDC ** .IFE ^1==0 ** XCH 0,^1 ** FSCAL 0 ** XLCH 0,^1 **.ENDC % .MACRO F?COM ; NEGATE FPAC ** FNEG 0 % .MACRO F?NRM ; NORMALIZE FPAC ** FNOM 0 % .MACRO F?PLS ; MAKE FPAC POSITIVE ** FAB 0 % .MACRO F?AD ; ADD DOUBLE ** X?PND ^1,FAMD % .MACRO F?SBD ; SUBTRACT DOUBLE ** X?PND ^1,FSMD % .MACRO F?MLD ; MULTIPLY DOUBLE ** X?PND ^1,FMMD % .MACRO F?DID ; DIVIDE DOUBLE ** X?PND ^1,FDMD % .MACRO F?ATD ; ADD TEMP TO FPAC (DOUBLE) ** FAD 1,0 % .MACRO F?ST2 ; SUBTRACT TEMP FROM FPAC (DOUBLE) ** FSD 1,0 % .MACRO F?MTD ; MULTIPLY DOUBLE ۫FROM TEMP ** FMD 1,0 % .MACRO F?DTD ; FPAC := FPAC/TEMP (DOUBLE) ** FDD 1,0 % .MACRO F?LDD ; LOAD FPAC DOUBLE ** X?PND ^1,FLDD % .MACRO F?STD ; STORE FPAC DOUBLE ** X?PND ^1,FSTD % .MACRO F?CLS ; CLEAR FPAC SINGLE ** FSS 0,0 % .MACRO F?CLD ; CLEAR FPAC DOUBLE ** FSD 0,0 % .MACRO F?RHW ; READ FPAC HIGH WORD ** .IFN ^1==0 ** FRH 0 **.ENDC ** .IFE ^1==0 ** MOV 0,^1 ** FRH 0 ** XCH 0,^1 **.ENDC % .MACRO F?LDX ; LOAD EXPONENT **.DO ^1==0 ** FEXP 0 **.ENDC **.DO ^1>0 ** XCH 0,^1 ** FEXP 0 ** ֎XCH 0,^1 **.ENDC % **.ENDC **.ENDC ; END OF .DO ?HARD .MACRO N?ARG ** S?PSH 3 ; SAVE RETURN ** LDA 2,0,3 ; GET FORTRAN ADDRESS ** JSR @.MAD ; RETURN REAL ADDRESS IN AC2 % .MACRO N?OUT ** LDA 3,FSP ** S?POP 2 ; GET RETURN ADDRESS ** JMP 1,2 ; SKIPw9 OVER ARGUMENT % **.DO ?HARD .MACRO F?PSH LDA 2,NSP **.DO ?ECLIPSE ADI REGL,2 **.ENDC **.DO ?NOVA INCR 2,2 INCL 2,2 INC 2,2 **.ENDC F?STD 2 STA 2,NSP % .MACRO F?POP LDA 2,NSP F?LDD 2 **.DO ?ECLIPSE SBI REGL,2 **.ENDC **.DO ?NOVA LDA 1,.+2 SUB̥ 1,2,SKP REGL **.ENDC STA 2,NSP % .MACRO F?SNP ; SET SIGN BY ARG (IN LEFT BIT) LDA 2,@NSP MOVL 2,2 MOVL ^1,^1 MOVR 2,2 STA 2,@NSP % .MACRO F?SNG ; EXTRACT SIGN (INTO LEFT BIT ) LDA ^1,@NSP MOVL ^1,^1 SUBCR ^1,^1 % .MACRO F?NEG LDA 2,@NSP L ADDOR 2,2 STA 2,@NSP % .MACRO F?SNA ; SIGN TO ^1 AND ABS TOP OF STACK LDA ^1,@NSP MOVL ^1,^1,SNC JMP .+4 MOVZR ^1,^1 STA ^1,@NSP SUBZR ^1,^1,SKP SUB ^1,^1 % ; ABS TOP OF STACK .MACRO F?AB **.IFN .ARGCNT==1 LDA ^1,@NSP MOVL ^1,^1 MOVZR ^1,^1 U STA ^1,@NSP **.ENDC **.IFE .ARGCNT==1 LDA 2,@NSP MOVL 2,2 MOVZR 2,2 STA 2,@NSP **.ENDC % .MACRO L?BYT (((77777&^1)/400)+(200*(^1<0)))% .MACRO C?PSH ; CPAC TO NUMBER STACK LDA 2,NSP LDA 3,.NDSP F?LDD 3 **.DO ?ECLIPSE ADI REGL,2 **.ENDC **.DO ?N OVA LDA 1,.+2 ADD 1,2,SKP REGL **.ENDC F?STD 2 **.DO ?ECLIPSE ADI REGL,2 ADI REGL,3 **.ENDC **.DO ?NOVA ADD 1,2 ADD 1,3 **.ENDC F?LDD 3 F?STD 2 STA 2,NSP LDA 3,FSP % .MACRO C?POP ; FROM NUMBER STACK TO CPACK LDA 2,NSP LDA 3,.NDSP F?LDD 2  F?MFT **.DO ?ECLIPSE SBI REGL,2 **.ENDC **.DO ?NOVA LDA 1,.+2 SUB 1,2,SKP REGL **.ENDC F?LDD 2 F?STD 3 **.DO ?ECLIPSE ADI REGL,3 **.ENDC **.DO ?NOVA ADD 1,3 **.ENDC F?MTF F?STD 3 **.DO ?ECLIPSE SBI REGL,2 **.ENDC **.DO ?NOVA SUB 1,2 **.ENDC SmGTA 2,NSP LDA 3,FSP % **.ENDC .MACRO C?ONS **.DO ?HARD ** ^1B0+^2B7+L?BYT[^3] ** ^3B7+L?BYT[^4] **.IFN .ARGCT>5 ** ^4B7+L?BYT[^5] ** ^5B7+L?BYT[^6] **.ENDC **.ENDC **.DO ?SOFT ** I= 1 **.DO .ARGCT ** ^I ** I= I+1 **.ENDC **.ENDC % .MACRO F?SFP ; SQUARE THE FPAC **.DO ?ECLIPSE FMD 0,0 **.ENDC **.DO ?NOVA F?MFT ; TEMP := FPAC F?MTD ; FPAC := FPAC * TEMP **.ENDC % .EOT ; END OF PARF.SR PARFNS.SR "  ; COPYRIGHT (C) DATA GENERAL CORP., 1972, 1973, 1974, 1975, 1977 ; ALL RIGHTS RESERVED. ; ; LICENSED MATERIAL - PROPERTY OF DATA GENERAL CORPORATION .TITL PRFNS ; NOVA SOFT F.P. PARAMETER FILE .DUSR ?NOVA= 1 .DUSR ?ECLIPSE= 0 .DUSR ?SOFT= 1 .DUSR ?A HARD= 0 .DUSR ?OS?= 1 ; 1 => ?RDOS .EOT ; END OF PARFNS.SR DFTAB.SR "  P**.NOCON 1 .TITL DFTAB ; DEFAULT CHANNEL/FILE ASSIGNMENT TABLE ; IF A FORTRAN PROGRAM TRIES TO DO SEQUENTIAL I/O WITHOUT FIRST ; OPENING THE CHANNEL, THIS TABLE IS SEARCHED FOR A DEVICE NAME ; TO BE ASSOCIATED WITH THAT CHANNEL BY DEFAULT. IF ONE IS FOUdND, ; READL OPENS THE CHANNEL FOR THAT DEVICE WITHOUT A 'CALLOPEN'. ; THE FORMAT FOR THIS TABLE IS THREE WORD ENTRIES, THE FIRST WORD ; IS A FORTRAN UNIT NUMBER, THE SECOND IS A WORD POINTER TO THE .TXT ; OF THE DEVICE NAME TO BE OPENED IN THE DEFAULT CASE, THE THIRD ; WORD CONSISTS OF TWO PARTS -- THE LEFT BYTE IS 0 FOR REGULAR OPENS ; OR 1 FOR APPEND OPENS (FOR OUTPUT FILES), THE RIGHT BYTE CONTAINS THE ; MODE EXPECTED BE THE OPEN CALL: 1 FOR READ ONLY, 2 FOR SHARED, 3 FOR ; EXCLUSIVE OPEN. BY USING THE *SYMBOLIC NAMES AS IN THE FOLLOWING THESE ; VALUES ARE EASILY HANDLED. OPEN= 0 APPEND= 1B7 READONLY= 1 SHARED= 2 EXCLUSIVE= 3 ; THE TABLE IS TERMINATED BY A CHANNEL VALUE OF -1 .ENT DFT.0 **.DO ?OS?==?RDOS .ENT DFT.1 ; USE DFT.0 AS ENTRY FOR BACKGROUND, DFT.1 AS ENTRY FOR FOREGROUND **.ENDC .TXTM 1 N?RLS **.DO ?OS?==?RDOS DFT.1: 10. ATTO1 APPEND+EXCLUSIVE 11. ATTI1 OPEN+READONLY **.ENDC DFT.0: 9. ACDR OPEN+READONLY 10. ATTO APPEND+EXCLUSIVE 11. ATTI OPEN+READONLY 12. ALPT APPEND+EXCLU)SIVE 13. APTR OPEN+READONLY 14. APTP APPEND+EXCLUSIVE **.DO ?OS?==?RDOS 6 APLT APPEND+EXCLUSIVE 15. ATTR OPEN+READONLY 8. ATTP APPEND+EXCLUSIVE **.ENDC -1 ; END OF TABLE **.NOLOC 1 **.DO ?OS?==?RDOS APLT: .TXT /$PLT/ ATTP: .TXT /$TTP/ ACDR: .TXT /$CDR/ ATTO1: .TXT /$TTO1/ ATTO: .TXT /$TTO/ ATTI1: .TXT /$TTI1/ ATTI: .TXT /$TTI/ ALPT: .TXT /$LPT/ APTR: .TXT /$PTR/ APTP: .TXT /$PTP/ ATTR: .TXT /$TTR/ **.ENDC **.DO ?OS?==?IRM APLT: .TXT /@PLT/ ACDR: .TXT /@DATA/ ATTO: .TXT /@OUTPUT/ ATTI: .TXpT /@INPUT/ ALPT: .TXT /@LIST/ APTR: .TXT /@PTR/ APTP: .TXT /@PTP/ **.ENDC **.NOLOC 0 .END ; END OF DFTAB.SR