-not a Macintosh disk-,(+@m@@o)R dS@S@ @%J_zNF,  8!"@$|Gn"`I N.@A,H<( F<B<H111Bx<kNNF`, 8! "NH@"|J(g g`LNu"_ |a||a0@||9݁g|w|a||NH瀀 |(_@"g2<@gBA?N`Fa`||aPLNu  fBR$N"NBH@&|݁ |B$<0HN~NL@dBgg>N&|)`RNuBBBA*2h/ BBB N _"_$_"H&|݁ |B$<0NNd 0<`L$|J HA H  2I<FFI<<FFfHHFFfHHH?B@L"_2N _0H 2<@I6@o Az:<2`6@oJA~:<26" @n2BDBB(`EB@nAJEkz`z2<HAIL0.NL0.N  / p? O@ 0  0  XO _,_2_!.NBBB/ BBBN08 @ gNu@ f"_E!NH\O/ ?`@&x|N _!@"|xEx En"`CE"|xN"Ҹ< A  33"|@E E4n"`C&E"|@.N _LHNFLN*8&E@CJJKK f`  f `><$CS*<F|4>BRIBC Gff&<CBSC`D GnKG45BQf` f `Ns |0< BXHQ!4 _$_"_!XOHH/8/ $ f0<? QN ! N.x $_$ g ! N.x !C !!LLyp!N\OFN  l0P߀ Aǀ`  6lo6@ 0_an*>]> j 56, l602  ۰Poo A` &ll6p@ 0?۷a?^ ꭕ 5o6, l602 8!ED91kE"0369? CoNGNOS BOOT FAILED TRY A NEWER MACHINE AND BOOT PROM _"_NN o0<BAN o0 _PON _"_$|0<J"PJQN _"_$|0<"PJQNHL$ orD?|?@?e\SFk!!QSWk:CL<HL|hH>L|4H>L|H>SWjTO>SGk\!Q`TSFk QSWk8L|H|L|H|4L|H|hL|H|LSGkQLx _O NNVH8=| f=|G* G, &N(N n"n$n 0.  S@ZeJ S@BBDBG S@gg.BC CJDg720faL`fa:` 320f8<S@`JDg  fa$` fa`  U@o$SBjt`(N&N><`JGg (Ev#$#$QNukJDg`g 3$f(N`BnLN^ _NUNPACK NV;n N^.NuEVINIT NVH,. ^J]g n0`4B?N. f n0`/.//. /.N(n)FLN^ _NEAD_BLONV/ (n Jno./.?././ /.Nj nJPg`RSn`(_N^ _NEAD_SEQHNT"|E.|r |BBByBygRBf~NuLHPPNqNqpS_n.0<QLHPPNqNqpS_n|~By&JM*Np|azJGfb|a|,Mpa`JGfH|a<<AaJGf0Avtp BQvr BQH@02N\LhL"4NtB@6Kd a"JDf`02IP g a JDf`Nub SBg pxNuBDNu><Nu4< vB@bp2IPSCfSBfNuppB@(4<dBC(4< CBC(C"H4<BACSBf(CAg><NuJoNV?-Nh.H|)?NpN^ _TONRAP NV.HgVS@g`J.f& -XмS//<N(/<N+_X-mX . ѭX -Xo<Np`B . TJ.f/-T/<N/<N+_T-mT -Tl<N,N^ _PONGETSPACNV .мS//<N/<NJ-_ .=@ N^.NuINDSPARNVH.. Bg/N0Hހ m0.@I/./<N( 8//<N @n ?.Bg?<BgN(LN^ _ NETMMU NV0. S@g S@gS@g`=|`=|` =|`BnN^ _\ONONV_DEVNVH nCJp"S@n2BgHnNE g BgNN=_   nV@g8B. Bmh|` @BvRF Fo mXf=|;|@`Bm@`|BgN;_hBgN> Ggd G] G^g$ GdfBgN;_@BgN>`<ND`.BgN8JD] D^g<N$ @=BgN>`|`.H@ABpR. .oBg?./N;_"Bg?./Nz;_,Bg?./Nj;_.Bg?./NZ;_0-| nBPLN^.NuEAD_CONNVH nCJp"S@n~`LH6p@J@^H6pA A_gH6p@H"AA1`H @ABpR o;nh0.H@;@@A r<Ё(@&|H@6LN^.NuROCESS_NVLH nCJp"S@n2BgHnNAx/NAx/HndNJndV nxVgB-e`|e  gHnxNA&HA(AL,*<Hnf?-Z E0-NPH///NJnfg<N(A(H/ HndN.JndV TVg B-fmeg`l-eg*0.zlW"-BWD@f-f @g` B-g -Bf|f/ N`B-f  -e -fg/ NLN^.NuNIT_CONNVH+| \+|l+|(|+|t+|+|l+|(|;TN(|;TZ(|;TX&| n!SLN^.NuETVARS NVH/Nt;| ./+@ .м/м+@+|X*<(< E"D +@T&|?-Z0-NS?NHnHmBNJngp+@BAC6 0HnNBBg/-BgN+_ -Э+@PBB<0<H/BgNZN<+_H+mHBG` m @I G~V GTVgd Gl|p@ @8`$ Gf|p@BT`| p@BT H< @"@=A?.??<BgNJRG Gox mI|p@BT mIP|p@/-H/<N 8LN^NuOOTINIT system.configNVH(nB BgN@BgN8HH,BgNp0HѬ f,/, NBgNBgNHH,BgN>0HѬ f,/, NZBgNBgNHH,BgN 0HѬ f:J`f< N/, NBgNBgNHH,BgN0HѬ g<NHBN,BN+_ n/BN  _r Ё0p//-XN /-/-XN&mX:=E E0o<N0<H+@d+| -dЭ\ n2HҀ -Ё"-Ҁ(Bg Э/N0Hѭ -Є+@B</-BgN+_+m` -\Э`+@h -dЭh, n0HІ+@ -Э+@ -Э+@?<f/-/-?<N^-m/ /./-N n LN^ _ NUILD_SYNVH(nBGBF. gB `P-n n0. PoB."` n0. A-H&n/+/<N&  n0>+<+/, N$BgNBgNHH-@BgN0H(٬ JVJ_gB."`4JGW WJGV WgJFf n `H n n/B."n/BgN.  _ BN-_JGf n Q/ n P/N` Q@H/ n P/N|B. n=h-nA-H n-P/./.p/NJGgR-m`Bg n/( n r Ё/ n P/ nP/ | ? Q@?N9_Jlg< N( nQ f|"LN^ _NOADSEG NV/ BBg/-lBgN+_p -p"-Ҁ+Al(|`p}//<N -Пp((|p}//<N -Пp(?<}/-p/-l?<N(_N^.NuLLOC_SCNVHAC 0BgHnN __m_^+m-^gBBg/-BgNX+_`+m-_gBBg/<BgN4 м,BgBgBHnBgHnHnBg/.N g<NACD 0BgHnN p g B-n`.BgBgBHnBgHnHnBg/.N g<Nn .@+@n -Эn+@j` B -@+@n -м@+@j?</-n/-j?<NH <逐n.JfB` .ЇP-@JfB` .ЇP-@-_g -Ї/ -Ї//./.N\`/-/-BBNJ(|p((|t(LN^.NuOAD_DEB SYSTEM.DEBUG2 SYSTEM.DEBUGNVH nCJp"S@n2&n (nBBgHnN gZB /, N BgN FBgN >HH(BgN v0H* f&.B</BgN&B /, N ~//N LN^ _ NOAD_UNPNVBgBgBHn</. /.Bg/.N g<NN^ _ NOAD_LLDNVH(n 0-F|>Jg,, .* Ю(H//<N ( Д-@`,.(.H//<N p-_?//?<N6 .P/N LN^ _NNSTALL_NVH(n=n ~`/, N dBgN _BgN HH(BgN 0H-@Jg .Ѭ `<N .fBN 4(BN ,( GfAqB0pB5pB`ACZ 0z`BgN f_ .ARE EoHn?<?<HnN AC 0HnHzNdg(AqB0pp @A^B @AB`2HnHzN,gAqB0pB5pB`Aqpp| 5pgnBg?/.Hn @AHp @A^Hp</.Nd g<NN?. @A^/0 @A"0Ҽ/?<NPRGinoLLN^ _ NOADCODEkrni NVBBg/-BgN +_?<e/-/-?<NN^.NuAKESUPSNVH(m . R A T&@-kLN^ _ NINDMAINNVBg/-|NN0Hѭ|B</-|BgN+_?<g/-/-|?<NdBg/-tN0HѭtB</-tBgNF+_x?<{/-x/-t?<N*N^.NuREATEOPNV/Jmho@ mFhomFh0-hH.//<N .0<AHЭX"-ToT.N^.NuONFIG_DNV A0C ArC 0AC 0/NHnHm`/NBgHn0N g< N0HnHn/NfBgHnrN g<N/NBg/.Hn$/N;_F/./.Hm`/Nh-MgN/.$?-F/N/N n /B/.$0-FH//N  _ /N&/NN^ _PONOADSYS $ SYSTEM.UNPACK SYSTEM.OS SYSTEM.LLDN NV,_NUTN z+|T mT PVD@MN0HmHmNHm?- -tЭx//-NNިNRN]N (NuN^NuOADER NVHAT(HA<&HHn?-0-H".Ҁ// / N Jng<NLN^.NuEAD_PAGNV0.H H"-"Ҁ-A0.H H@J@=@/.NvAT0.HЈ-@ N^ _TONIND_SENNVH n-h .S/0-H/N ;@8-n p+@4;m:BF` ATIBBlRF Fo=mA-HA<-HBE n0-HА(BnJf<NHn?-0-HЄ//./.NJng<NxBGA0.HЈ&@Bn=knnZ Eo<NJ ATI ( 9s Jlf<N0,n0.ްm8o`RERG`(-L`HLN^.NuPEN_FILNVH(n| @=@~`84p@k|nAP2IDA0 <f 4pAFRGinoLN^.NuHIFTNAMNVH(n @:JEnBn`pp4A4P@R@H. Eo U@<`BFJFo$ R@4A T@4BRBHށSF`Jl D./0.H/N =@LN^ _\ONDHASH NV~H n CJp"S@n2BA&/Nb 8<-HnNBgHn?-N>H/p6/NNBp6/A/NdACp S@n0HnN^J.gHHnHnN .Wgz n/B?.N~  _ `SFRGmfBGBNJFfELN^ _PONOOKUP_ENVH;n ;m?.?-N;nBNAT(HJg<N;l~+l";l ;l;l;lB?,N&_+S&+k*+k.LN^.NuNITMEDINVBg/.HnNr_n .gB/.N-_N^.NuPENINPUNVH(.BGBF Go<N AT:0JEf<N EHl@ ATH"Ұ n n Jf<NHH " n ``RGE`LN^ _ NIND_POSNV-m4/.0-H/N+_4J4]2-8H4]g<N&0-H/-4/Nl .;@: -4g/-4HnHnN/.NN^.NuILLBUF NV0-:mf -4R2-H//NNT0-:ATpRm:N^NuETBYTE NVHBgNHH<BgNH>JGl H м> G=@LN^NuETWORD NVHBgN0H//<N~,BgN0H.Jl޼ Ї-@LN^NuETLONG NVH,. 0-m:>HǼl>JGo0-:ATA//.H/N$H߮Hǜm:0-HnJ4]2-8H4]g<N -4R/HnHnNn-nA<(H/0-H/N*l-EJoZHn?-0-H".Ҁ/?././ NJng<N0-H/./NV(ٮ .Ѯ .ѭ4`:Jo -4R2-H//N"NhJfLN^ _PONOVEMULT//0/2/ AH@B@2/Ё/@" /WXNu// /"/ N2/A" /WXNu// /"/ N/@" /WXNuH>*jD,jD$&BBx㉰mRSDlJjDjDL|NuH0/ oC"4JBAR`$aJBBB`QQ oC"0/H#//IL._NuH oJB@BA"o JBBBlBA`$HR` fQ`RS@`?A"/oL\NuH o0/2/SA"o JBBA@m`Q/o L NuB`$_02 _ @o0 Ao*BBAm"6@SCBoSA`@"H`RCoN$_0"_ _J/ S@m*BABB@m6B$I”@`!Q`QNuHr`HBA oJ"oJB@f`fQ AA/oL\NuH"o J oJv`:H"o J oJBC`&H o J"oJv`H o J"oJBCB@BA@m4`4`fQ@n C`cC"/oL\NuNuNuJoNu r , COBOL 4 2.0a&;f/Nt0. @ g0@#g2S@g6U@g:_@ , *`$kTk , f${%0LZ5uN' "[|AV !H" rootcatalogːp8 .[, ,tZ   COBOL.I53OBJ@g| N@Bg/N STOCK2.TEXT@g| N@Bg/N COBOL.OBJXT@g| N@Bg/N  COBOL.ERRXT@g| N@Bg/N {T11}BUTTONS"hTTONSh COBOL.I56XT@g| N@Bg/N PI.TEXT53OBJ@g| N@Bg/N IXSIO.INTOBJ@g| N@Bg/N COBOL.ISRXT@g| N@Bg/N OBJIOLIB.OBJ@g| N@Bg/N{T11}MENUS.TEXThNUS.TEXT COBOL.I59XT@g| N@Bg/N COBOL.I51XT@g| N@Bg/N COBOL.I52OBJ@g| N@Bg/N STOCK1.TEXT@g| N@Bg/N COBOL.INTOBJ@g| N@Bg/N  COBOL.ERRXT@g| N@Bg/N  ,&0Y,g C @ L PERFORM J8-FSR-RESET-IDX. J8-IDX-CHECK-99. EXIT. * J8-DATA-CHECK-00. COBOL.I51XT@g| N@Bg/N  ,&,hB C @ Z COBOL.I52OBJ@g| N@Bg/N  ,&9,iN C @' u' COBOL.I53OBJ@g| N@Bg/N  ,&O,jX C @  COBOL.I56XT@g| N@Bg/N  ,&,ga C @  COBOL.I59XT@g| N@Bg/N  ,&,hk C @  COBOL.INTOBJ@g| N@Bg/N  ,&ݼ,j6 C @. . COBOL.ISRXT@g| N@Bg/N  ,&凜,h C @  COBOL.OBJXT@g| N@Bg/N  ,&4֜,f5 C @ INITICONINITICONDRAWSTUFDRAWSTUFTONE TONE ޺'r к IXSIO.INTOBJ@g| N@Bg/N  ,&+,i+  C @! |! (WrBuffer); /end; ,for i := 1 to length (str) do /begin 2WrCharNum := WrCharNum + 1; 2WrBuffer [WrCharNum] := str [i]; 2i OBJIOLIB.OBJ@g| N@Bg/N  ,&,i C @+ +PI.TEXT53OBJ@g| N@Bg/N  ,&q4,kq7 C @ 'qz"LB)|w >W`3qRXMETRIwSw|'G$nB>:.SE<.46f`,JFxKBKAQR`xKBQxKAQB‘Q^> STOCK1.TEXT@g| N@Bg/N  ,&-,f/ C @  (* pointer to node of binary tree *) #TPpfitem = ^pfitem; (* pointer to pfitem (procedure,function) record *) #TP STOCK2.TEXT@g| N@Bg/N  ,&3,f5 C @  c = &record )filename: PathName; (* file name *) )filelevel: integer; (* nested level of file *) )nextfile: TPfile (* {T11}BUTTONS"hTTONShΜ  ,&ݜ М¢ E D$ ${T11}MENUS.TEXThNUS.TEXTΜ  ,&q 盺r E D Compiler error; consult Technical Support Illegal format : Data-name Illegal format : Literal, or invalid use of ALL Illegal format : Character Data-name not unique Too many data or procedure names declared Illegal character in column 7 or continuation error Nested COPY statement or unknown COPY file specified '.' missing Statement starts in wrong area of source line Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support '.' missing DIVISION missing SECTION missing IDENTIFICATION missing PROGRAM-ID missing AUTHOR missing INSTALLATION missing DATE-WRITTEN missing SECURITY missing ENVIRONMENT missing CONFIGURATION missing SOURCE-COMPUTER missing OBJECT-COMPUTER/SPECIAL-NAMES clause error OBJECT-COMPUTER missing Compiler error; consult Technical Support SPECIAL-NAMES missing SWITCH clause error or system name/mnemonic name error DECIMAL-POINT clause error CONSOLE clause error Illegal currency symbol '.' missing DIVISION missing SECTION missing INPUT-OUTPUT missing FILE-CONTROL missing ASSIGN missing SEQUENTIAL or RELATIVE or INDEXED missing ACCESS missing on indexed/relative file SEQUENTIAL or DYNAMIC missing or > 64 alternate keys Illegal ORGANIZATION/ACCESS/KEY combination Unrecognized phrase in SELECT clause RERUN clause syntax error SAME AREA clause syntax error Missing or illegal file-name DATA DIVISION missing PROCEDURE DIVISION missing or unknown statement Program collating sequence not defined Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support '.' missing DIVISION missing SECTION missing File-name not specified in SELECT stmt or invalid CD name RECORD SIZE integer missing or line sequential rec > 1024 bytes Illegal level no (01-49),01 level reqd,or level hierarachy wrong FD, CD or SD qualification syntax error WORKING-STORAGE missing PROCEDURE DIVISION missing or unknown statement Data description qualifier or '.' missing Incompatible PICTURE clause and qualifiers BLANK illegal with non-numeric data-item PICTURE clause too long VALUE with non-elementary item,wrong data-type or value truncated VALUE in error or illegal for PICTURE type Non-elementary item has FILLER/SYNC/JUST/BLANK clause Preceding item at this level has > 8192 bytes or 0 bytes REDEFINES of unequal fields or different levels Data storage exceeds 64K bytes Compiler error; consult Technical Support Data description qualifier inappropriate or repeated REDEFINES data-name not declared USAGE must be COMP,DISPLAY or INDEX SIGN must be LEADING or TRAILING SYNCHRONIZED must be LEFT or RIGHT JUSTIFIED must be RIGHT BLANK must be ZERO OCCURS must be numeric, non-zero, unsigned or DEPENDING VALUE must be literal, numeric literal or figurative constant PICTURE string has illegal precedence or illegal char INDEXED data-name missing or already declared Numeric-edited PICTURE string is too large Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Unrecognized verb IF....ELSE mismatch Operand has wrong data-type or is not declared Procedure name not unique Procedure name same as data-name Name required Wrong combination of data-types Conditional statement not allowed in this context Malformed subscript ACCEPT/DISPLAY wrong or Communications syntax incorrect Illegal syntax used with I-O verb Invalid arithmetic statement Invalid arithmetic expression Compiler error; consult Technical Support Invalid conditional expression IF stmts nested too deep, or too many AFTERs in PERFORM stmt Incorrect structure of PROCEDURE DIVISION Reserved word missing or incorrectly used Too many subscripts in one statement Too many operands in one statement Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Compiler error; consult Technical Support Inter-segment procedure name duplication IF....ELSE mismatch at end of source input Operand has wrong data-type or not declared Procedure name undeclared INDEX data-name declared twice Bad cursor control : illegal AT clause KEY declaration missing or illegal STATUS declaration missing Bad STATUS record Undefined inter-segment reference or error in ALTERed para PROCEDURE DIVISION in error USING parameter not declared in LINKAGE SECTION USING parameter not level 01 or 77 USING parameter used twice in parameter list FD missing Compiler error; consult Technical Support Incorrect structure of PROCEDURE DIVISION Compiler error; consult Technical Support Compiler error; consult Technical Support Too many operands in one statement ©RIGHT (C) 1981,1982 MICRO FOCUS LTDO6 Ctc` %&`MXVXkCHnXh@YLn`k`(.U\܂ܧ܄K de5@I`c `( c2}c`# 3 e `&c&6(6Eh %&v6Eh %&ݯh %&gh %&h %&rh %&c1c  E | 6D@ICH 9 @. ~  ` c  ` 7]<@\>wYR@\>]C@4H@||@4HD#= oZ<[RCR@, @\dhhVX X C \ B:C(e L4J,c LnkJC:=C:? C :L4@ vn WKtC:= + TK( A,C ( /( ElE( Q@ tCh %&rCF9C@ t`$`%hEhL ( 3+ E( E( SX@@tCh %&r( iCF9C@@@t`$`%hEhLtnr( -i ( i( 1( U@`tK Ah %&rCK hEnE( VL n( ]( [( T(T@y#{Bkn( m ݦbhL@UlW[`RܻCDdRc R R ݻE(] cRMg.K FK G`SK H` S(I` S[I`SK J`SK J`SK J`SK J`SK JK`SJ`SJ` S@JbK bJ݋b, S CLL nECLL nECLL nECLL nECMLnE@CNLnECLL nE@CNLnE@COLnE@COLn@FM~@ F!M~ݿMC@UK P@Q,@FLnK RK b,@FLn[S݋b,@F!LnhLK TݾbSbU` E( @XUH E(L H @#T( @\@#bF.uV݋b,@F!kL@U( LnK K bK W,@ F!kL@U( L nkLmLH L nhL( [(] MnXcLb M@Ck`$(V ([ -] WhCXKf`%(] (TE+ [( [`$P([ L5 Zh %&v c,EYZȠ`!/`4[\\ܻ]^`D_c,.C t.C0t.@t( -Hn` Z( /ZE( /l/ECNhz`h-`,CCMfh` ,Q9( ( (/`P+aDbJaEI cdefgghijkl`<.Vmnl El@.#Co1pqC toC`toCtof |,C rstQXuBvNwMf@R`,stk-(- hz@UT,C L  DTCkzRgQcqxy@yC @yy@Hy@( lS>St k 4cl(l  l 4CD(n D H((  C:`p`pC;`k`kC;: q( n( r( tQHQhvCT,C@j#B@4(t ( S}Sܠz@4{`vS}HSHcw@4.|@4`wTN p kvDUCCXT (RgC:@HUC:@U6k-6( -`,st( QHQffTn ݠ}T@HU  n6CHU~(LU 7 nLnRCBUC tRC`tR(- hQh#,  | |ڀftؠ++  |ce%e$$c`!e$$ce$ڀ`ڀ` ڀc%fc,fڀn- K:K( M4@gH M( CL4D L4D  (  ڀl ڀ  l " -    , ڀ( 3- 3+ 3Fڀe+ c6+ ( m Ex#,U#,6(`( cGc)cEFc#GR GdcKc+KcGFcJFc #K R K d@cNd k1c,m #,6dd$( cI `E>kL`PzCKM# ,cD@c@4nH( h3@UcE( DUHd@HUcD`H>C t+E n-/ 4n  D   cE( c%(" D UdkLc%d%d$(L (" ("DUdcFc$BXcEc U CcF cG cI F) 4 4ؠ 4 c(F (!d$dc cD  DU( ,3 + 2Cc(Y(3 Xk3(3 H    Z(3 Y ZYk1zdch1R,cKz |KFRGR+RIR`Kr,cGzCNCOn`GCNd@GCd G@m#RcHz .H}R@#RcIf .I@#RcJz@ #bc0b .JRcFz,ZZ |F |(( !&R^K^K^( LcIKzcI zkLzPZ\)c,܆@#`N@\\)@#ݐ^@#^h( R@\@\@#,@\@#RF.\VVKVM 7 |`7K6VcEz`7 I]Ii]I`A`EH ( 3 (]C`CzE |7@X@9@.@S@ V@ P@-@+@Z@ *@B@0@ /@,@C@ D@A@#) |;V@ |-@^,@^, Cc.*@@ |B C@.c.*^_`9@@ |Wc<#< |V |`>@  |`C   `Ac?#? |V |?c9@  |@  |`A```Bc9@  |@  |`A` `Cc9@ |@ |`Ac9$ 5@ |)`@`A@ |>@ |l`9@ |S$ 6`!@`n`9@ |hV C, 3 cP |P @ |P K |P]qMH |Pc Pģ`.]qNdPM`cAVkB(  VRD c) }   cF ancG aycI ayU C 4 a( 3E4k3Jk 3(3 L 4 aEF`.cJc(cIR@U 4 E 4 |E$6 |Jc)  |Cl3@`!+$5 c+$6 D%6 CE DC@Ec)Dc, $ CEcRcE DUD@cF DUD DE\c+KR@Uc@DUcIDUac+KR@ U P c(cJNc(DDUc@DUD@cJD@aΠ?|$ P cDEQCU 4 aaa ~ C0FcDcEؠU | ( E @F`0 4 c0`+& &`0c)Rc+# 6%6 @c,c'$6'(3:%5;c)cm:c' 'c5F ' ; D ~  ~ D# 4dpcde'k:c' ~' ~;e'm:d ' Ccdc) 4  |C@C& c-& ~ D@ ~ @F+ 3F@c0F`(`+& 4 dCeE@ 4 5 `(c( (  XHXKX`kMe 53Jz&J{"XT.3f  4 S 3o (bLk,kEo2qE]qd :SeMI$=e7vo%1p #$9'-T-)())P)")@,-+ *+<*+K+//////22l22p3-233! 53D56OB5BdBy6o66667c7u7778;<9>p>>>==(>???@==> >>@0@o@x@C@AbB A CUvUUV.V:VTVVW Z_W*ZlWWXX3XXYacXXY?YwZ)ZceZYYaYZ3ZNZrZZZZZ\\\\e\\\\] ]q]`=`^raR`V`f`{^_l^(^9^@^G_`B_B`^_^__`__``a.acbcre6ecdd OVERLAOVERLAY- DICT= : / GSA FLAGS = pAAAA$., |e`C `UC W(C) 1982 MICRO FOCUS LTDO6 `dch#```t`.de 5r15r %&`Ƞ@ ؠ*=@  y/]^HD]]E  L 5C] 5KŠC OF =@55ED>''H( &!DD(5@]6+@]6+%%`(K!^!( !C<, c"L4"#6[cc5`6[`h6h6cc( 6L hH 6hH 6hH 6hH 6E  ~ C(s "Yc |,6,YC.%%ks7ma a ala7u  ww7u( 8(aemala+aw7( aHw7!(k -i (i &pn& p(O @9+ YK;7(4L4@g7r(m W!!HE( &pn&YLEpr(o W!!&(g L8( &!H` !H( &H ( " Yku( s!H7( i( k,8kp(ea7dwM7dmukuw7+ k78p w-i , 8+8k(8k87Y( a!7uLw7un7u7u4rW( cH ( H ` &wn&` (c "!Y+aw9(w ,g 79!Y` ed`c(( c9c#k`@#Cwu66@#rC:rL4KnrW:@ܦ@ܿ@܊@ݹ6 i Kn i + g( g( (@( M  >   >  :  DT N  LNR  DU(r(g ( &!wn&;%`7k@d7(@ M7d , 8k>+R;R(a r0427)( a;C;xc6@y#6cb`Y%K@( g( cݑ.`ܖK Cf!ce6`e(c;Cf:!`"z::( 8:;c7`7( (A "( H!7u!(A !!H Hc Hq  e7c7LH (A "b(>b$=c>b@.'6C9:;>`  D>>>>`_h, -c>#-@d-#-c e-?>>`_`>CD>C?'cc?'E   d@_>>c?,cc?'c-k'?'?,c?'C` E >(  >(  ,/ Ch,h,C?'?,?-?, N ?c_c-d_- M ?-#-`_cv  ( y( cc-/ !( cc-/ !d _ M N?@  @!@{ _  ,`_@|c_`@!@{ _ @|c_`@@|c_cvc-dV_` @`@@`_ ^ ./$x/$/#./d/d/ /M /N$wNdNc NM /N-c`_?@ c_ / #^E#. D@!@{ _ ,ccC_+/ c ccc#^-c_AAc_`  A#^ACCA C$V@@#31E'( S.-d  ,E(S !C :C:BmK BBmC:  B (B B .@:.BB01("( S# |601("( U( W  \$|\Bm BC:C;CK;C)k@CCCHCCH1/(W 1/ \ '4'(S CI+ YCOC:CyC:CUc[CU(S {( S(U {(WU(W +WUCICO( W( Y [C:Cp  Co(UW( U( SCCCoc0.+,  (D (F &kkcz)+,kc ` k,....-c cz 1D cc ( ( ,`( &-(,D(F,F-,F+,!H` !-1D `(D( F,,F-F!cz-&1D D1D D` cze cc@,cE8` cEW` cEWbcD0cz-.-EW` czd D0d0.1.D0cf`0` 1cEcE1cE\cEcb` cE` EW-EE[01F00@1&%1` @,cO&&cO&&{J@FhcO&` cO&F#!cO`O0FFN`O0~FFhF#D@{#F[C"ĠUaAce=@ y  `O@@"F@"F@@"F@"F@@"FFG!GN@#GO#C?dXd^ X E% X X$U d ( !c%czc)+,-`aX |Gb9>cVB1Tc6BcaXdUGdUcV VW`V`BcYeX WV."`cU D' Y0d^`VH#G[-HH00@c0H^c. @#G!GN-."Gb`<9܌dX>;ܕ`eX=:` 7` 8cV`YH# VXGrc. &*B1T*BcBckBcB` ''cf`VG `YH#. `V` H0! . &@''` `OGrI`#0 XV00@cccz`0cc`0G`  ''.-.IAc_`OII-. -c&&-Jg@#G!GNF[I. G[J0G-!c0-M1c0*B'` c)` ( c,G` G1c0(-1GrIGH##TdcU S `S% S Se 9 S cYB`Y`S`iK9`S`ܔK9K3cYKK(S { TK( ShV`TKcYBhVK3cYBccVB`UK$V` _ L (= !L (; !(? L (A !v !.!~!!. VLGY i@c  (a `$$vH !L  04C<C<C<C<C:r-~( c( a!L4 eLL L#L#K.r.(L(c L4K(p KLhc5(T ""$JCڲ(6`1(MLhcE` 6!`2Mc"c6`2`#Mu(c L4@ `0Lh!M0j$Jؠ)v)ݗ V!0\Mc6Y iMcM V6Y iM`xc5@C۲@K K CC6ceze$܅cfvd݅6cfr`d(.c?(WClW` V`?  V( OeSCdSO Z>d?NOYO(u ")$JYctct6O;( ")Yr(w W`tYcc72`({.`sctOJOkcr$JYO.z0  | cc7Jc,Oc zE  % zz z`OC<nCnrBWC;!C;nc8n+ ]PZ"(] 2 .@ 1PZ bPw(QP(cP%#HPwPK%#!cP%-2 PZC;n( ]$cd5(\ "Y$=c`P#k[$04# ``kc>Pk6>( "YQ1c6LO$s6k[$kc:cb9`h$( p!@ i ~DK @c!5H !CQ!Y( c( @9:%+ M&R&&   K LR&cc( "Ycd(^ "!%K( q`Y$=c:Ocd(=5(` "@#.'!31.(c7O$cO$cO$@%Hc p L ` D!)cfc7fp L H Y @E |rPH` p Lpc1 C" Hpn&k=(6>( "!Lp@.O$`$VY@!(S !O@%`ܐ*31dS@  ' V@#F1cc6`Y iO{# f+# c ~g  ~g  ~k  ~k DT# b$ b# c$ c# d$ d# e$ e@TT[% o}   G~  V o %@@rr0qcd5(R "` 31ݠ,@,37ܨ-.O$#x V/06E1Ǥ=@ yY iH!H !!O{ V( a`UKc7Y i(a ")!O{`b`c`f d Vcf>C@ d T dede``1Tc6ݗ6cr ba b T d Tcf e T  $ ` ,` d T``1T݁6 a Tcf e Tekf``1T`ݨ6cr d T@`L`UKcL.c7cgf c Tcf% bdfܣU@@ g r k E } D# fV iO$݆6c7zCf @E!31 VWCWH !31!&cd5( 6>E( !Y iCO{YW?crLc6ݟO$O{crvcr ~%rC$JYW`s!%rO{6O ^  _ EczD,1(+1e_c_@c_@c@ _C@,`_ 9c`c_Xܱ0ܑ1c`c_X:O$ݱNuN$O` ^``0~d`c`00d`c`0XX0d` ~ E ~ (c`Y&"qcdX !)&gX\Y7"qcd0d`X\YcX2X` Y@B`3d@DC:Xw!1!1  1Y` `YXYY`ܼ4݆NY)#Y^X{` `YXYYݗNY)Xܼ5`,"qYKY^X{XX݁N@X` ݼZ;@ `c`N#YX{XX@6݁NXݼN` ݼZ;@& YX\7eR@%`YX{``@)'MC!&g8k (" ( !&O!&O` &&` YXwYXZ```#Y=N VXG[`OH!Y iXw`BDC:O{F[}[r00!c.30-b݆6#F'Y-1cc`O$"q[K;#x0q.e  @0"q [  ` 1` 9d t9݆\ V`[Y i[[D%C\IO{݁6 V`0[Y i[  [@ ~ C\O{k?z D !c^(c !$^1`^K;, a: 1(a Khad \ 1 C;c*d \ 1 C;VH!!K @VO{@܉;K2;`_K2;`_`iܗ]Xc:?\c@L`cA` }C~DCD(A &1O{c` L5c&` ^\L!  'L5&+,?O{,? -?,^^n&H,k !(k m  y(? (A `_L)^``^K^Yd`!0Nccc@,B..^00(,kc( mhmC- k, m^!1T'  c(k (m &^^c:+k _d-k ,k C\_ ^` >ܡDc:E\O$K2\O{݉F\O{` G#l@1H"q"n&KVY@@`I``2c+JݗE݈V?ݡE`gd @` e`^c`VcV,Kc*VLV C@@  1 V` !;Y iO$)k@H"(@ " 0452C:MNBm{("{O"(BC:a3(M"K"a,`aa{K;PC~P}~P~\]+{~}\]+K;`jCciY, g@`i` 'Ycjaha(c , cK;aM"K"a"z( c`j`ihghaab, g(g V` !;ciY i e `^`i,haabc+`cj`Y`j,ab`#"z(c L 4 ncL4 rCE  nd#nrbb`clbb(a L  L[bbK  ! (a K L-`h L+!K `(` Ccccc(c L   C c>c@ccc V@ccY iccc(c 4"K 6K 6crccl@c`_ܦQ`_ܿQ`_܊Q`_ݹR`_ _m#cd(c_6kpSLK _  i K LLc_ccTc_UckRc_TcVK `_WK XT܅Ycd_'W m_Zcd(c_O$c04d;#kp[LKL H " `_Lܞ\\܅]K ^_݅^`_c`c`_K ^K aybK 6`_cdccd_'WO$cd`bM`_LcecC,L`c`_c'W@Y#MMN4Nc_M`cM݋e#c# nrM`_`L`Lcrcrc݋e,d_`:f=gd_`;f>gd_?69f<6`#'WcbbMc# nrHL[M`_MMMccM`_ܰhd_ܣhclO$@H!~!5@ci@@h#jkܜlK2lK2m"q0&3nCr!~!5cl@co܃oicld_@cocl6d_L (a !clO$pO$6Cc `$O{`_MMMcrcO$cM`_Lcrc@Y#cO$ML@Y#@O$` 0\q"q"zcrrCc@,  ``` ݒs"qC:!"$Cd`h ` ''Cݸ6ݸO$$O` 0NcrO+h`ݲt` cu.uCuY$=OO$.O$=O$` ܎O{6k?z0!.c@@,L5`_L)O{ zE  vwxyz{yyyyyyyyyyyyyyy|`O / }~h*(4 84M4#: r( a(4 84M4( cb"q( yL4( eK;r jP ( %K@( w( ujj*(N(aC`js` HÑ (c V( lj]#C;K;rj+ ajPؠC1 0H!1!H (e , Y i`&:(e !` `$`t w`t@#(6`sO{@jj*k%K( ( {%K( ( }E!~C (N(aC`js`c (c !S ( ,   ( =@ yY( mj]!!fC  `$`t kmctzO;ct`tLkxctz`^`UKccBcf( C :( e( e(y (N(aB+e l`^$ |^c^`$Y+@ erilX`tkxr")H H l H lؠC ,U !%K( WYr%K!(U lkS(S L " (A "H ! kS``(S L +U H -U (A "kU!(U `  mjmH md  lkS!(S !f(A l#K` &, !0c^C#(BC@( Unr( ["A1"[1([ F'hYC;C<r(BC( Y!0N` (Y   D ( (Y}, l( U` 0N)cr( n(,SM H kBhS( (A "!0N L ( , !~ hBn!km-( ( ( !` m kY0c(Y ` hY"Ao](W %VC56C5#K00`m`]!~l`]c]`m!1Cݸ6ݸO$Cc `$O{`jKp pC:C:p pce6@`f`q(Al#nQnkYn V fH (Y M " (US``ݤ6`j`%kY( l`e`iKcp;Y#<`eciH ( l( cm ~  @y6K@n@@Ncp;@xp;n nn)ppC( k Yr")ci!~lm!!m-( W!!f( l! gl!!fL l!l!chUnQno`eldip( ")cicj@cq(S H K " (A "ؠ,=@  y` (k H K (m D K (o D K B׃ `qm`(m(`+l(l@&@%c!l( L")Yoc i f %ݤO$pcfO$ i f E%`Y i@, f EO$k%K( ( @C` mHk + =@  y(A !D`=@ y(Alm-( a( cEn)o o;H H kB(U " ( "(c "Y3ul(a %V!@#H Cn)o o;H (U H " ( "C!, Yuo!#nkS(S (A " o!, Yo!!o( !hg#nmOh`k @%K( e( i!Y( C3ĠIh(  @ m!(i ")!C` Yo<( k36C@%KE( c( gC`m@`mn)C#Km!!Yr!!cmĠC` oC` m7!H m!r ")Bc C om7(U H " (g ")!kU, YܔwN6Il l@ m!(k ")Y@(c %VOh(, @H ( "YDl@ha#kg( mC`- H #!(a H H!Yr!!lakg!(B C;} v" !n1kB!f( v"!!n( ln14!nH H H ( "5#n1@` Bc 5#K0cC( "), xm!C` !(i ")o!o!Yr(e Woo5H mo#C:rC;r( a(a !` _ y01(` 1( !(a L!.($ (a LLQ`_`_ܿݦVd_K d_@y@#݋V!0\cr`) yyO{y`_K `_ݭVVz `mK `mUV m (a LGycmO$`1MuCr!~!5݃@d_d_@@h#{{ܜ{(K2{(K2{-"z0&3{`_ܰ{5d_ܣ{5`_{l{yC@z (a LHLQLHLQ`0m@dmK dmK dmK #KC}r0&y m (a LG{yO{crrC:r  L4M!L6,cd5(q "` 31C` ,37H (a  E + Cr( lL (A YEB300@(A !`_M|#MM`1M`_L|#@Y#MMM`(M`6c``u(Xs` D u |-( o|#`mD@#`nC`n@#"q(+ o6dm!!C;`  Cd n }p}cm6 m ''Cݴ6C( !,6C:6K;HK;6!`mDܦݒ6(aqC<6|-dm(qa~k VH (a (Vq|\Y i m cuCC6''ܿݼ6` |-|O$` |YH (a (sq|\O$`u(Zs}E`_c5zLO{`_53Jz&J{"XT.3f  4 S 3o (bLk,kEo2qE]qd :SeMI$=e7vo%1p #$9'-T-)())P)")@,-+ *+<*+K+//////22l22p3-233! KOO5C5O$899 P:DL:L:d;x>b;><,<C C ©RIGHT (C) 1981,1982 MICRO FOCUS LTDO6 c`c\Ct`  E(    $  cH DH% `H   (5c`# 3 e ` c+5c.=(L(C:+ ( @rnY=+ U6h6Ct@tHr`e`,`$`'`%[`!r`#a`'h`thhh`@(A`R HCETrCt,3 -1 nE C HTc'6oCE6s C!Y׌BTM1׍BTM2׍](g ( &@%`h<, 7XY5hHl (  @U7p47` @U7@ 7LpؠIDEBUG-SUB-/ 7@UHq7Lp7`  !&( !Y%K( m( %K( o( ELSTART PROGRAM@ ( ^7fKFALL THROUGH@ ( \7fKPERFORM LOOP@ ( R7fLUSE PROCEDURE@ ( T7fISORT INPUT@ ( V7fJSORT OUTPUT@ ( X7fKMERGE OUTPUT@ ( Z7f` @( `7f!Yؠ*=@  y( Lp( Lp( ( Lp7IDEBUG-ITEM/h7( @HU( iH7(  IDEBUG-LINE/7@%7Lp7( IDEBUG-NAME/7@=7Lp7( @17@27@37( MDEBUG-CONTENTS/7( kH7ؠ(=@  yhC`#h``"(?(Al&: :h)( WX@VXX V(i nn nn6rn( h*( + S:+ U6Gh*( rp( ( Ocb91( Y( c$( 6P iYXVXHVh*( Ycb8 ( @9h+`:+ M; ( ( hl&L4( H WKB( : :C;C<Y;H` (h L ( W` ( L! CL4Yl( `#ar")Ch !( f`e( j4EKKae( ` !!&,lj(j !deE4ce<M4cc( LW;!;`( (f L H `k  BŠ@ `  (C L (A `h  ( H (h `h ( ( ` ;( H(!(f L H cd`, L `- (f ;cc`, L `l נC cbĠC` ;C, (f !C` cb`+ (f  L C` H!`+ (f !L!C- (f !` ( H , Y`Yk;(;:8H (; k=(=:8H (= Y7$h@Ch,( f"q+ SN+ UNK.J( h+ f ("N>(h ("{$Cd>Yh-C.Rs( whu$")Ycb8#hc5 XƠC OF =@5?5( M?5C:@C :@g( W(l (:* V(A !H  D !EC?Yld $ Yrn i`c??. Z@@#+ ?Z(( ( ( + C\( Z@?( @U( #4PW?`V@6\4(?j( r@6( H@c4nZLnX@Uh.h``: X(  KV A A A A A C\ A A A A \E @@@@?`?`b#K?bL 4 ?A?`bC;?+; bbC\?L 4L4 C?uAD rW?u( :L4  4?ud04L4  |A  bEBR?`^"?KZh((: :YA ?`fk-fKf( -A ?( ((l : :YA C]rZc   D4  E@Z(L/@UA ?`^#K(=?\E 4=WA c?`?+  + (   Cj(BG(DIH@CjC`` O` A1A~׌1׌A1O`` O׍(WCceؠI(, =@  ykkrk( h({ WL( (} W)l ( ,   m (  ,  @*Ykk( rk( hWM(, (@( !Ykk( rk( hWZ(h(,+=@ yH "0I( ,=@  y"AB( ( !`"gL(l=@  yrL !B( (A !!l- +(`kŠO@" yH "0D;H ( ""N`"gE, =@ yYأ` %(q rW!Y%%9#` %!Yh/kc: 3 e `H $=  |kc1:h[1`@.`3׌cĠ3(`I` ׍׌`D` ׍ } > } >c#GUc#G]c#GeCc#G}`erc'L@ ( kc:k( ( G( ( (  cccecca4Htkc$(Y @9+ H+ C:HNccHN 4C+ HtWM44+ H HW$+ H  + HG=+ }HGIKHIDCH@H`aH( b   dbcbGe`bG}GGU Ge@`brtI'I'HGI+ IG=+ }IsDCII'+ I  + IG=KIIDCI b  Ge  @`bIIM@IH( I'( I( I'@I`aH(HI'@%b ( IG}cbGu`b b   dbGGmGu`bJrrtؠ FGGIJrKJJJrK  J    b   Gu@`bKJJ( J@%b ( KG}K7Jؠ`ȠHc'CsrD rX77KcGGIMGeG}JG}JCh2cc$%A([rHN"YDQFskKJ"+ ( c,C_ #`c`CK\@   ~  ~ GcK( XFG` |@IFh<v`AbCt:k[k[$+ ( c)` `)` = `)!Hծ!YDQFshceKcK@tc,D c)c(c*YGdgcecg.`g gcg g E  gdfcecf`f fcfcf f E  f`e  `fMce.`MceAO䠠A]A頠OA]ce..`gce`fMG  CMG  ` >@Ctce gfMG DN MC M@ MDNMG  MG  MG  M M MNr |d?@^NCz d |(b(a laOk+ ([NC;`MK..[N@HOC+ , !YOk+ (Cc}c`` 5C;C;C OF =@5.ؠG SECTION=@5nc`( -5  n6( ----1-31-/3 b ,c'`,kd,c*cel'  Yc*cel,/3,31,1,,+ ( Gc,C_crv`r( 5c$(Y hakc(c O(Y @9(aP`rHC:C:C:QccQ+ +ak(aQC+ + O C; ( ]@^*_*(L(C;Q bR=ce C;K..(C O P QR  # % D D | |  | ` d5cdŠC OF =@55R( 3 nN_Nr NN(O8 O C   OS3׌BISR׍G( (5( !cJ"( `KK ecJ"`K\K(5 , c'L@ ( -ceJ" RڀIK\KdcdTN(`RڀIK7@tS!c dcdT)c,D @tS^N_YO8O  c, !KSc$RTiPNcT`RCODE OUTPUT TO FILEM A8!T`$REF HASH SZ TY NAME MOTH DSCP...M T@9C:( ۠## (4M4 ۠## (( ( (`* L ۠## -0:A[a{C@ E`*ؠ=' `.(K.ĠC----#%. ۠##%@C7U$C@D @* V׌1BDSV=׍1c(H׀  Ge  H @Vx׌1BD00=׍1GU( H @~HVx>GeGe>GeGec,CG}` 6AO GREVISION(! : ( c :Ơ "*cd:Ơ!"*""*k``I* CompilerO 3(C) 1982 Micro Focus, Ltd. 1983 Apple Computer, Inc.CTF* ERRORS= DATA= CODE= DICT= : / GSA FLAGS =O ($$(-1,3$$($$)(-($$4( -,$$:($$@c%($$QD OFF$Q`c`0c^ծؠKURN / /-H!!L(##O!!T5ծ3Jz&J{"XT.3f  4 S 3o (bLk,kEo2qE]qd :SeMI$=e7vo%1p #$9'-T-)())P)")@,-+ *+<*+K+//////22l22p3-233! K755I5sLK:N:;>FzA FW ?SAT;8>5;;>3@K@u@@nAABkBAyABC9B+BLBCGeGVDEFFFsFFNrI'HNHrHtHQURTLVDSS^MMMMuMNMMNNNO>OO^OtOOOOOP PPPrPQQQRRRRRORS3S]SVSTT=TTVBUUUUUXCBL/XOBOL DICT= : / GSA FLAGS CBL/XOBOL DICT= : / CBL/XOBOL 6pAAAA$., |YC C C cc`I`cG\OFݤ`5#``׌1` A1BDXP=׍u1FF𱠠AuA`5#c0vv(@ 4 6@PO\𸠠O6(((@  4  6@P𹠠O\𹠠O6(+ l66l( , 6  , #   |@  , 6 6 6e66dcc 71cc@ |`71C 7<7Q  %   \   6 71`7)c@  67)cl  , c77cl7)  , 77 76  7)  6E......O  ( 6` .d`݁ V``c7z8I(  6(6`( 6="+-0:A[a{7< V(A[a{5`` CcIcicNcncOcocFcf6 7< 86 97QC)7m97Q 49 = 497m9`6 5堠G\O 4,;C kF57 c8 F5:@\ \ 95``9F5`6c`7)c6c,:lc;:lm`( 77 c7c# |78ec:h@ |@ ( 7C :7 :fc6c:fc,;C;;CC :;&78e5c; h@ C=@"(),.;=; E=;(),.;= ; E ;= <;< 4e =@;@ ;53Jz&J{"XT.3f  4 S 3o (bLk,kEo2qE]qd :SeMI$=e7vo%1p #$9'-T-)())P)")@,-+ *+<*+K+//////22l22p3-233! 55#5c5w5*5b5H7z58<89:a66O668888998;|9|99u:Y9::9::C:l::::;;{;^;u;;;;;<3<77>77     8H @8$6c0ŠAC8( H @~H8$8>88>8c-c2@H@tc(7H`9׀ 𮠠ACCtc-8Y@t@A頀8٠F* BuiltO䠠C` A` A@*6e ?ACĠECONSOL@7^6Cc-7@*O` AĠA-A@נ C``vACc0Š` A]׌]A]` Ġ)A]  $ ׍]A7^vc0`0` AĠECONSOL6c#@AC׌]c0`0` AĠA1Ac^@נ C``` @ ACc0c,c0@N@ MP ;`Ct8`ߠJ* CompilingOcĠACLconsole inputC``6CH\\ 4 @ Ct`$=``3c#vؠJOpen fail :+ծ@ >@h@&GCOPYLISTCFLAGDRESEQFERRLISTBINTCECHOCLISTDPRINTCFORMBREFCDATEESYSOUTDSYSINBTABGFORMFEEDGCRTWIDTHESYSDEVEDICDEVBIBMCANIMCRNIMCZOOMDBRIEFHFILESHAREGRESTRICTIDERESTRICTECOMMITGROLLBACKCCOMPDALTERCQUAL@+@* ?;cKc9FINTLISTDSPOOLCSAVEBISRGWORKDATADPAGEDEPAGINGIOSNAMESIZEGIXKEYLENGIXALTLIMHFILELIMITHPAGETHROWEESCAPEGFLAGNAMEFHEADINGBDICBTAGFVERSIONBREVDOSEXTCGEARDSPEED@=BSYS@;;    CCC##3`-#  `%`CBLOW`%BL-I`%BH-I`%CHIGH`%#3`%BIBM`%ؠCFLAG$`( %8c8e887`)c%7`(C :C)D  "C` 0 #C`,AC`c`G-CONSOLEĠC:CO:cĠAcĠ` A` 4 $  ( ) * + 'C Cc.  m00K K( ;KS =ChCK( C@@ CĠ` נ CKK(( ? !CK  C @ >C ?  C=.Cؠ` )C`1# @.   D   `1C2@2 L }c@c2C 2C`6 686`;6e;`hCh?`"`(`'`,` `7`8 5@@@@c5NLINE-SEQUENTIAL@ISEQUENTIAL@FINDEXED@GRELATIVE@   7 8`d;ؠO ؠO\ ,.$-.c-`+?C(?Cc``"` `!@PDMP    ؠ` O @@cĠK* Accepted -O@cĠK* Rejected -O@T* Invalid qualifier -O ~  ~ CPDd# 4F@kNOH  4DHؠ` @ F}c 4C ()C"FC`C{E @ @ ؠ` @" ( F"  CFFFm) G``EF CPD | 4@D | ؠ` A]׌]` A]BANMO׍E]BACPO׍]` Vc0ŠAEC;hW` Vc0ŠAC;+   + ( 8  GH@GH*8@t@`(A`R e dr``vc0Š` A]׌1]A]` ĠBINTA]׍1]v ,Cc-E5k(?E5E? -Cc,E5E?c-E5 3CE?FؠAE?CE5G?KE:(  E?CE5G?KE:K E:  d0 `  %  E?@@aCOPY,ALL,LOW-VALUE,LOW-VALUES.SPACE,SPACES.QUOTE,QUOTES.ZERO,ZEROES.ZEROS.HIGH-VALUE,HIGH-VALUES.$a@FIN,OF.$a@ @DCOMMUNICATION,CD,SYMBOLIC,QUEUE,SUB-QUEUE-1,SUB-QUEUE-2,SUB-QUEUE-3,$a(MESSAGE,SOURCE,TEXT,LENGTH,,DESTINATION,$a,TERMINAL,NO,ESI,EMI,EGI,EXCLUSIVE,AUTOMATIC,$a=MANUAL,KEPT,REFERENCES,SEGMENT-LIMIT,REVERSED,REWIND,REMOVAL,$a@ @\DISABLE,ENABLE,RECEIVE,SEND,$a%RELEASE,RETURN,SORT,SORT-MERGE.MERGE,$aWCOMMIT,ROLLBACK,UNLOCK,$a@@ $WHEN,SEARCH,COMPUTE,STRING,UNSTRING,$a@^MOVE,SET,ADD,SUBTRACT,MULTIPLY,DIVIDE,IF,GO,PERFORM,ALTER,EXIT,STOP,CALL,CANCEL,ENTER,INSPECT,$a@MOPEN,CLOSE,READ,WRITE,REWRITE,DELETE,START,USE,END,,ACCEPT,DISPLAY,NEXT,ELSE,$a@2@'SYSOUT,SYSIN,TAB,FORMFEED,COMMAND-LINE,$a@@2EDELIMITED,DELIMITER,POINTER,IS,NUMERIC,ALPHABETIC,LESS,EQUAL,GREATER,$a@>!NOT,COUNT,MULTIPLE,TAPE,POSITION,$a@E*COMP-3,COMPUTATIONAL-3.COMP,COMPUTATIONAL.$aF,INDEX,USAGE,REDEFINES,PICTURE,PIC.SIGN,LEADING,TRAILING,SYNCHRONIZED,$a'SYNC.JUSTIFIED,JUST.BLANK,OCCURS,VALUE,$a@T[DATA,CODE-SET,BLOCK,LABEL,RECORD,RELATIVE,STATUS,FILE,ACCESS,ORGANIZATION,ASSIGN,ALTERNATE,$a@`&RESERVE,CURSOR,CURRENCY,DECIMAL-POINT,$a@d$ALSO,RENAMES,INSTALLATION,ADVANCING,$aXAND,ARE,AREA,AREAS.LINAGE,CHARACTER,CHARACTERS,CLOCK-UNITS,COBOL,CONTAINS,DATE-COMPILED,$a\DECLARATIVES,DOWN,ERROR,EVERY,EXCEPTION,FIRST,FOR,I-O-CONTROL,INITIAL,DUPLICATES,LEFT,LIMIT,$a@~YLIMITS,OPTIONAL,BY,FD,LINES,LINKAGE,LOCK,TO,MODULES,CRT,CONSOLE,I-O,KEY,NEGATIVE,OFF,RUN,$a@`DEPENDING,ON,USING,OMITTED,OR,POSITIVE,PROCEDURES,FROM,MODE,PROCEED,RANDOM,RD,PAGE,RECORDS,REEL,$a_THEN,THRU,THROUGH.UPON,SOURCE-COMPUTER,AFTER,REPLACING,COMMA,INPUT,WORKING-STORAGE,UNTIL,RERUN,$a[WORDS,RIGHT,SAME,SEGMENT,SEPARATE,AUTHOR,BEFORE,SIZE,PROGRAM,COLLATING,SEQUENCE,STANDARD-1,$aKNATIVE,EXCESS-3,OVERFLOW,EXTEND,STANDARD,FILLER,GIVING,MEMORY,TABLE,OUTPUT,$a@_TALLYING,SELECT,THAN,SWITCH,TIMES,DYNAMIC,INDEXED,INVALID,CORRESPONDING,CORR.TYPE,UNIT,ROUNDED,$a[SECTION,DIVISION,UP,SECURITY,SENTENCE,VALUES,CRT-UNDER,DEBUGGING,OBJECT-COMPUTER,PROCEDURE,$aRVARYING,REMAINDER,SD,SPECIAL-NAMES,AT,WITH,ASCENDING,DESCENDING,LINE,INTO,FOOTING,$a@චZPROGRAM-ID,SEQUENTIAL,ENVIRONMENT,IDENTIFICATION,TOP,BOTTOM,END-OF-PAGE,EOP.CONFIGURATION,$a5DAY,DATE,TIME,DATE-WRITTEN,FILE-CONTROL,INPUT-OUTPUT,$a( @@@D | 4.Sf$.,SwDCSf S_ؠAID=@( `2@UC4453Jz&J{"XT.3f  4 S 3o (bLk,kEo2qE]qd :SeMI$=e7vo%1p #$9'-T-)())P)")@,-+ *+<*+K+//////22l22p3-233! 8S5@6=6*EFm89Q;H+IgS;;E9H;;;Go;%;EFFK??@-A3A .  }'C$$c  $e&ack kLkC'His  LkC^D^^E  C@C?)*@^+,,?@^ X-.,z)* dC;/`y( } i(0`C:1C:1l{+{({ 2#H2+ }/Lc((}  d@K_3 c3_c( ( ckL k( c.( ( ( Lk@ؠ c (L(c$a9 `yC:@m4Cm@/.]*@mi@D^5Cm@/.]@]/.Cm@m CK 6E }  3cbkL | }kkL }c.L } } *3k  L4E7 | L4  L4E7 c( L` >@  |  E7 (@7@^( m  L  L  ML ChKK`    T  LDT  LDT4 4  L4  L4LR  CULN  MNCU@U/wH@TNPTRCC@K$ >H@H`@_ewk( ( W( HN@T@U@4    L rM   Cc.*@. * 6E 7 #* |8-09:A9[a9{7   |  4\ 5DD : |\ 4;D#* |@CD CD 4 3D`D D z< zD^>E  M  (  ?"T"Q@@A( 3 c`BCCCD E "T"QAF[Ga@{E E XH@ I CHX`]J?KLM@K_ c@BN( ==n$cLc$=n=( @`kMkLO`PCBD]KXzL KXQ(b@M@  Lk CR@S C`@@` T 8U`"U 9U@ `0@"V@C`@ (##''//??ʠ??0W:X>;Y;( 3 .Z,Z"['\-]+](^)^*_/^@5`C`i@@@ ^#* |a@ECCD @E#* |b@.Y 4  c@EC@C.d@@eWCY C'"bDIMe | @*Dȹ iCfg@( 3 ( 3 ( 3  h Ai[jah{hE E @Xk C.@.@l@ m "h?.h(h+n, /n n0@:?; <>deؠ==P$@=P=$'@C].zC6@#C@CC@@$$+$+$ؠ ( =4Iؠ = (I49M@3M9Cv@,/ w CCCEE DC@ECCCCD@y}E}C@}E@}@@C }E }E y@ v@v`CE@C@E@@C E @~C}oE} } ~D ~}CpCC   } D qCCD@{L{}E~C~r~@~s}~~}~  DH  CE D 4y4{ {`}CtCtCtCD}C D~CPD  4{aC@PC}@C~@ @y4HCE@CEC@C@uC@uC`uCuCCvC 4{CEC<51C:C :C;C<HwCC;xC@CLC@vE @ vy{MyD {@3C3V       8( (@:yHCDC C-E D@ CzC H @?oC{H o  C@@`o.oC@|}}~  }}}~ XMˠ$XC\E\(@`@@C LY .}@} G  ؠ # y@ @ G 47 0427 ؠ`"OcRDC .    DC .  DC .H!!!!&K K@L!` !`( `+ `, `` `h `k `l `m ` ` ` ` ` ` ` ` ` ` ` ` ` !^ !~ !!!!r"!!( "( "H ( "H ( "ؠC "["[rC:rC :r"zC:r"zC:rC:C:rC:rC]rCrC"khC<L404( cd"#rrCrC#"zC;K;r"q"zC;r#!rCD@C~r#CrC#l#K"zC;r"zC;K;r(C M# |C6"q "#r(Q |``Kc:#  # `##$9!`s!ercs^cr>dr%r%r`s $V$$vYHc!5`$ttLt$!$r$!k[:([ rWh[` (_ !Y5( [( _` (] @ U%$@$U%$@!U%$@%U%$` %7r W# $ # $ @%`   C%%` G    C%@%%@%C  !@a &!&@c &,!& &,(   &  n`C !("  c ( ` H &OK LE& c H &($ M( &(, ( &` ` ` dR`eR     D   ''D     _ ''-/ E'''@CE n+ /+ E'cD !'l's'l  '@CEE  'c'Hnc '&'4E%C'=  @c @'@''  $ C(d V( H( J, J+HJ@(H ( H( D( ( F + F(D ( D(N.((@ `'<( F - D(a(( Bؠ`'<: 64r#K(}()!CEM4( @)!M4( >)! rc0rcrd0C;)!.(C:( <)!()!cc v.k$)))K@H2 ) 2 2 %2 ) > 7)> 64 > D)D= )C`*2(@ M( : , 8"qC:rK;E7#x 1*2*K;KZ( 8(M(+ @Z``-K;@CZ  !C-ML#l 1d*2C-H H*`C*2*)(: !;)*O+K(> )H c1L ({ ( 3+L(5>+35+3>+u+R+k@+R( 5Zh8h3++Z)cz+^`c1d (8 !;)!~(< !cO(B ` y w &OkF` (F &\` kD` (D &\` ` &,)c0&kB+,c0( ( !c0&)   ,c'MD,'MDCD,ؠ:" (+ؠ+ (":  |`.@@ . . @ /ؠ)O䠠)v)O)vؠ-O䠠-Π-O---1     ؠ))v`)-m 0,-T | |  % -` /-`cr  c',' /-$ $ C*Bd d}` @--`Oc` @--`O. c-`  )&  'C - D?''(, L'k`c.3hck,``h,  @@''cc  @`''c.3c.?.),f  % &)kB.k>ek@e./ke&A+ O+ YK.(M#K/-~`'<://@ )k<,f,.(&A/أ`>/( yz+` ( ,( r& CC@  -    %  ,`0`1`0`1/a/0!`0!`.e.q0.0!'00G,0N0N00G0c#! 0G,`00q`00q"qK;``#!0 0G` #K0Nؠ--Π)-  r(     c  r(   >  0!0-b1,`` )/-0  -m-)-Tc c  )>   G  1T'1'-11-101T'-~``0@1/h,10-b& /L(<  M(M4WC;H2@$1C]C]fCf"C;+ ]c8 b2>( (]@)U%$c8fk]ffC;@ 1( ( @ C"( %7CMCcf(c M%%AP"C;n2 (( C4W23-31CCCC   3>3>  D2  3Jz&J{"XT.3f  4 S 3o (bLk,kEo2qE]qd :SeMI$=e7vo%1p #$9'-T-)())P)")@,-+ *+<*+K+//////22l22p3-233! OVERLARpAAAA$., |485$455585;53545!55;5;585554535OVERLAY- DICT= : / GSA FLAGS = OVERLAY- DICT= OVERLAY- DICT= ,pAAAA$., |5DhPASLIB STDUNIT XBLKIOINTfBLOCKIO gPASHEAP hD0(H Qz$M8tb&KUb(N$N$8N$N$9N$N$7N$N$N$*N$*N$N$*N$NN$N$N$+ N$N$N$N$+>N$3N$5N$4N$4lN$3RN$2\N$ON$:N$CJN$7N$B.N$;N$0N$0N$;ZN$2N$2N$O^N$0N$3N$6@N$5N$.N$NN$DZN$IN$1N$3 N$7FN$N$+N$MN$PN$vN$N$KN$\N$*N& N& lN& N& 4N& ,N&N& N& :N& N& pN& N&N&pN&N&XN& LN&N&N&0N&^N&N&N&#N&B>N&N&PN&?BN&N&!N&?N&!XN&AN&fN&XN&"N&&N&DN(NN("N($N(#N("N(#0N($lN("xN("N( N(N(N(N(hN(CN(N(N(BN(N(N( jN(DN(8N( N(TN(UN(0N(|N(N(jN(PN(N(N(PN(|N((N(,N(0vN('N($N(-N((XN(5 N(%N(*8N((N(N(.N(NN(N(N(6dN(>NN(=HN(?vN(N(N(@N(PN(N(N(xN(hN(EN( |N(N(N(4N(N(:N(TN(Tv"X/Nњ<PASLIB1 PASIOLIB`SULib cMainProg H $QrͤTOME ԝ͞߈ TNDMESSA "That's all folks ...^Cs00+00g'g:Jmo0Fp͞߈~X* N -м+@TASCAL_IDATA SEGMENT CREATIONRROR DATA_SEG0&}000U000UTASCAL_T  mg[f0&}0&ᄤ}TOST_TIDpg@$۔B͞ה0y\ה1˔EJ@fg$T! EAD?ARG "Compiler directive - @^CVs^C@^C.s;|~`^B8_eo0^+H0^+H^Cp@a0^+Hg.Rm~W@knH0; NJn4"Fj>`̀0_0^+H0_70^+H*0\_0^+H0h8_0^+H͢0_0^+H0_60^+H*0_0^+Hh0h_0^+HD͢0_0^+H 0`_60^+H*0<_0^+H0h_0^+H͢0_0^+H0_60^+H*`l0l_0^T+H`J0_0^+H`(0j_0Q^+HgqLTET_DIRE)NOREFGARBAGE COBOL.INT@F.4gΫh͞߈'fw͞߈  *ͻ^c0yԷb -y\P^c^cEkj000?:|JmlBmJmB`d0&R^cƥ ͞~Xb͞߈0͞ `BgΫFWg*0ԝ4*TOT_SRC `, ---> error g.@TEXTCOBOL`ouDrce file [.TEXT] - NOVEMBER 21, 1983Lisa COBOL Compilerg*0&^0+m2AC؁0k00'g:Jm>f 0&T0'`.V͞߈~X* 4*0&8 -+Э+@@TOADED_S1*failure to load source segment with error CBL_SRC|TFEXIT&^c0V&H0~XZTO;|g~`^B0_Eoͼg("ͫZg&BZ;_HbdTTOMPILE RBmB g.|g͛{͞^c0yV -gyh -yg|0I00(JmgfB0&^Tcƥ ^͞߈~X}8͞߈0͞߈ (0Q .^C;|X~`^B_ o0W^+H0Q^+Hq͞^c0yo\ -gyf`\0hg ^c0R^+H;|ܛgΫ8~`^B0_EovTUN XRYun time directive - GARBAGE,@ ---> error .INTRun wha t COBOL program? - Rg͛{F͞߈ ͻ߈ ͞߈ 'gy`,^ 0gf͞`|͞_oΈ w 0w͞͠h.2yv͞߈HDzgͻ^ 0gfg͞`w͞hg ^ 0gf ^B0` ^g_o|x >͞߈ ~͞߈ ͻ߈ 'gy`,_^ 0gf͞`t͞ߙ_oΈ  .͞ -gfr͞߈ `?͞߈ ͻ͠hg^ -'gfg爔h͞ -gfJr͞߈ `?*͞߈ mCTWITCHESOFF ON  DUpdated ANSI Debug is switched $DO YOU WISHO @CHANGEHE`ETTI(NG ? OFF O N  Current ANSI Debug is switched OFF O N  .SW-0 `W-B1 `W-2 `W-3 `W-4 `W-5 `W-6 $`W-7-----------------------Updated`witch settings OFFFLIP ? ON FLIP ?  = SWITCH %DO YOU WISHO CH ANGEHE`ETTINGS ? OFF ON  .SW-0 `W-1 !`W-2 `W-3 `W-I4 `W-5 `W-6 `W-7-----------------------Current`witch settingsTgΫ|.^͞߈ ͞߈ ~ w͞߈0|Ϳ߈ z_g`.:͞߈ ~`͞ {gW><~Pl~(ͺ߈HDz*x͞߈   *͞͠h؞GBF uJͿkJDYJ@Dg$Q@gW@g$@gQ@GW@g`6zg{`4gzf`, L͞߈ ~``  ` ͻ -gzfJ͞^|c0ybE0|kۛ}^|pasvͻ^|c0yԷZb^|c(0|<0|U(Ք͞0|{Τ0|U؀g0|k^|pas򈔞 J6͞kJDYJ@LgNU@ gB[@M@g@U@g4[@`bJ-zf ž ͞߈ ʐ{`@g{`8J-z f  F͞߈ ~{ {V ]vTET_5PRIN9Print size not programmable with a letter qualityrinter9Print size not programmable with a letter qualityrinter;What print size: Small=132 Normal=80Large=40colu!mns ? -RS232BRS232A1Must beounted on either 'RS232A' OR 'RS232B' : RS232BRS232ARS232A [RS232A] - SLOT2CHAN [SLOT2CHAN2] #Where is the printer now mounted ? %No other model is currently supported6What printer model:Letterquality,Dotmatrix, Other 'Do you want to accept these settings ?  columnser@agePrint size is set to,Theodel is an Applefetter-quality printer(Theodel is an Apple dotatrix printer"Your printer should be mounted on "----------------------------------"CURRENT`ETTINGS FOR YOURnRINTER:=mв>-д4YXH@J@J@fYXdH@J@J@Gggx<\ybop> 1mO#g&RDRnRnbRnRnpRn>RnRn RnRnDl|:Go|Y"p@:Dl|4 "@:Dbl|Y"@9:Dl|Yb"@:Dpl|Y"@9:`|D>l|Yp"@:`fDla|Y>"@:`PD l| Y"s@:`:Dl| Y "@:`$Dl| Y"@:`| Y"@:FЦEЧvTET_xTE0Р0в иX+@мзX+@жϦX+@ЧX+@iЦX+@~вX+@~дX+@R^м+HТ-mТ*TFTIME#*NT!OABORT a,_NUl$+Ot+Np`+_l^CZpasBm`~G^B0Rm m*og\^CƁ.mt,mp -lʈu͞0D ~@Cg, @ gHg4g$g&@$g@ g0g`((^`*`$`gΠ}``$gv^.mt,mp -lN]ެTҬISA_INT;LEVEL II COBOL:Co@mpile, Run, Set Switches, Printer, Quit OsErrs.Err8COPYRIGHT 1982 MICRO FOCUS LTD. 1983 APPLE COMPUTER INC.bА-iR$i #BG-G$i$ BG-G$i( BG-G..S-Gbl$R..RޮbS(G*..ޮb&` *..Rޮb..RޮZS(G..&QSm`v TА-iR$iG BG-G$i@$BG-G$i@(BG-G..@RޮU..U&..RޮރU(GSm$HS.$LS&W`v THx:X7TRB*THx-XwTHxg*XTЄ$i>(B-GR&i$$i BG*~ή*H.)ޅ(G`.(G Fή*H-L(K.RDPv!T$iBG.Hx0`$W <-RR. ..R XHxPTRB)THxg*XTЀ$iB-G(i .Hx0$W <-RR..RܒFή*G&L(H K.cױDPvTДB(i B *l$LB g,ㆌ*RR`$i.v)@TRЌ$iB(.) ^&GBR *RlF΄]*$K.SRR`v1TREzJf./)HxDP0|gTRJ)zPB)p#@B)އއNpNN8N1NN}NN1N gj |gB iB)"T~,ީ$GBJFlBGJ) gf 4 h4`HxgX``Мp.ީ#G H.\W )f gBv9T)iHH-G./ HxDP  f&.8ȫ -GR RFlBG&<ȋ)HH 䶺g2.K\`&z g.).^. \.)5n#i  fJo.Ra(Jl.ރm./ HxDP&`.)ξn..lBv9XTЄ./ HxDP*އއNpN@N:N"N6N@NZNNm )4 f f")```r ) f`./ HxDP~J)ىv!TRМBRJRfN0&)HH*. n6އއNpNNNNNNN(N..Rv9TJ\d )-gf&)HHǶf:..)lpNRn$i.. Jg($i`$i HHf`2HxgeX, gnT.)2lXpNRJH)DJoHxX0.)opNRJg`HxgXL)Jo>.)o^pNRJ8\N~ީ(.Hx**o().)؇n.J.L.)f )4(),J".U.)o pNRJoƫApNRЄ*.$i HHgFEE-JRB l0E&JL.$G < (RHHHHƾfJf.l.v!PTR`Rf$n#RRR.$W`RЀ i&i. ީ(GSe,$HB-GR$i@ RHHgS$L..R`!Se$L~0`vTR.z/ Hx"DP.)n ) f jT`J)f )f B#i#i`6)އއNpNNN"NNNjNN \v!ZT*)o1Bc,ㆾo8:. D.VTJp`@fj`:`ЌJ;.)ީ-GRBR-GJMg.)*o*.v1TJ)f )HHĊ&i ..dSm. H$KB(R$i HHGx J)G.E JRg$nRRIR.)HHƎ`Rp#@$HR#JE#iJ)g.@#G aBBT/#i.)* )۩۩BR*TRS{.)f./ HxDP`W$#iTМ iB*. j2 f Fv9T~΅~l~&)F΅P|`4~΅g| ~΅و~l~G`| ~΅FlBG8B(*@.B,܇(R#D~@΅g~ ΅g"B)$HBG`| f T|gS#H.v9T/*))J )f  *TB `8SjX)T/*.*۩۩ J)۩*T .)*.)R(l.l.vTЌ*)g8#E()./$#W./*#W J)./)Hxg&Pv1T/*.*۩'.)mp#@۩*TЌ*.*).(n@.(m.@B.v1TИ*.g.V( gmo v.vT~hބ./)0&X( gmиn~ބևo`И˸*$HB( l~`4.Hx0` &Eg$JB"($i HHf ~vT.ބ5`И i.)R&.Hx$($H.R.Hx*($H3.R.)R&.Hx$(f$H.R.Hx*($H. vTHx&XT*)JgJo$.)ީ(GjS@nJ)gHx&`X|`v BT*)JgJo$.)ީ(GSnJ)Hx&XB)M`v TRJ٫J)GB&TRBz&THx&XT*( f8` lR$H.vTИ˔$HoB(R$HB&./Hxg&PvTИ˾*(.Sm&$HB& b$i HHMvT$H~^R `.)lTR./)0 #G TИ i./)0(v Sm`vTp(iBBRB~ީ-GHxgXB&B..HվlHH fRJ.Hx&X jf$-nb-nRp..߮VR..RևJ%olNJ.^``D \b..߮R&)Hx&X.bpHxqg&PHx&cX`.RHxrg&PB`SmHx X`~΅gJf&Hx&dXpN`JHx&XB.F RR..R)m.)R&) R~ީ.~ީHxg&hPBv)TpЀBp&iOE'$JB-G߱E'$J.. $KBG-Gb..bH#nbF`>~ήGpbNp$HB-G Cg EM fJpf FvTE-6$JBG,P-FR,.Re~/ީ $GBG,.RdB`JgE'$J..F`E$JB%-GE}$JB,.ռbFJpHFvTwJF`B`R,#i.Hx0$W < Hx*/)ʫjOJIf .\p#@T#i./ HxDP./ Hx"DP#i~+ީ$G.)@.P$iZ$J#G8:;.`dBR-iR$iLX$J..R#iP. TЀ.>*Hx0.މ&GJf .@\(k#L<#lt #lx`#l|\FvTR. iPEZ$JBG./ HxDP. / HxDP#i~+ީ$GB#Gp#@TR.&./ "HxDP2./ DHxDP#i~+ީ$GB#Gp#@TR..*.T-i gf$i$B ./) /)*@P`./) $i$B/)Ov!TИ}*$nB(.. $ vdlv ] ge*./6F./<(.Hx6&0`FvTИ*$nB-G(6<'H ge*./6./<(%.Hx6&`FvTЈ}$i,B(./)$$i(B/) O$iBJf.)$ބS$vTЀ}*$-LBR..Rel$nRJBRR`SJIGJe2vT.ޮS&G~@ HHΆP ᘡ$nS.S$KSHH|.HĤ$We@$KSRde6$KSR..eF$nS.HH|.dHĤ`` ..e $nS~.dHHΆvT`Ќ$iBG*$i BG(./0($i #D8:;v1@TМ$iBG*$i BG(./6@&$i #C8:;v9TR/)z (B\TR.G&G$KBG(GRE$JBG"E BBBBB*JBRB.B \*.` g.J .*\} g\@ g. .@RR`_ .*~fzRR`En@gv??TЂ&i$i BGS$i(B$i$BG$G|SBJo SFg$i,vAT$n*Hi;*i NBv?Jl HxO;TTRJfJTJRPBR'T#i@#iP #i./ HxDP2.2/ DHxDPp&#@E$J#H8:;E$JB8:;E$J#iP8:;E$JB.H.//)ʫ 8PJf.HxX.L/ @HxDPTR#i./ HxDP./ !2HxDP2Bp#@RTRЀ$e$n{*Bއއ1NpNNNN$HBGީ&G$KB-GR$L@..RvT$HjBGީ&G$LB-GR$K..RH`$HBGީ &G$KB-GR$L.. R`.\Q`R gf6` f1` .\QBTvД\)HHG #i^#if.h)HHDz/)f/)^\Oio#ih~`)HHΆ `2#iVBVB)4vE|#J~B|g.އ"އNpN`NN@)NNNJVgDB)Br#ib#i(iJ). gV\Y$ibBG#|[n.DGv.vHH./ /)~PB`B)`#I~~|g f*.~ / X~)HHކ./)~X$i~JfHxgbXJM$i@#Ev)T#i6E#JE*@~jv gVf2$ibBG#|[n`X|BnSbp#@ZSS^`NJVf.|)HH)HHƞ#GnJnl .)nߩBn.)ڈߩb.)fߩ^p#@Zgygz4x4w4{* gP.އއNpNxNNNdNNNJN:NNN}NNN&NN*J).*v)Tu``)HH*Zrz0 `z/`z J)f`)HHJ.zg`4zHZ* g4y`J)P*p`zCRJ.x zDB`졩gxJ.vf.HHSd)HHJrf*Jvg$LJ)H*R&Sg4$LB*.g6J.wgR)HHǺgF.HH`N:NNm \:J.2`J$P"\ goר ИB$#HBRpNBBJo>&$n*B(R*$i !HHg6`R..վeo<.*\`0J\RBR`pTS`)HHǸfpN`JgR` -M Df Bf "JRfSR` C2 Rg +fJRfRR`H#HJRl@n(#nvTdЄ#|KJ$o6E$Rig$ .iBgkjה$OEj-J$nDB mf.1^-G.-G$.$הX*m4.Hx0.މ(G&l#K<HHg#l ` X*Jlf#ktވ#kx`#k|\pNdHxgXeE+HH#Gn +HH#GJ*l#ipJ..Hx0.މ#(G.$הd-GR.Z$nR#R<.)<#G @$nRX./)@X(.6.)@ބ&Gkb~ ީ@HxF*DOEb$JSBG FlB-GpJpgDSE$JBGީ@#GE$JBGީ@#G\E$JBGީ@#G#K#K~ީ (G, g i)p.HxXHH#GpX(G,2#iT``"*)TP.Hx<کP#E`Jp.RfvX.)<`N,*HH g,.ה*P$nRXG./)X(f .RqX.)p|%^YIx{f0&^Uc0lg-FevT!?SEEK *0y\TIGET ǹ͍;_0&ר*0'Jmg mP mGp+@-meT!?FREAD*p@<a͞P'gԈkͻ߈ T߬OWRLNq*p@]<akͿTOWRITE ͍;_0&ה*0'lJmop+@-meT!?FWRITE *0z0,UJ_f$0kT^Wp@a00^k?:kSJmo0&PAcƥ F͞0͞߈ ߈~Xߛgw͞߈kͿ߈ Be#ggV080Acƥ ͞߈k͞ N700v.-20$0'-Ge0٤8T!?XLOAD>---> error 1130, , ---> error Unable to open g.INT.*nĽ -,*8vTRuABMEM -m*TEMTOP˔B*p T! TDINIT *͞TRTWRITEk{D*pnNTRTREAD |:<(/)(/)lD`|BE"(/)lDF&/@lBDFBrBՀeRQJEl l JDv>R/@,_J=Mf0*X$_1N0X$_NTA.SWITCH0/* ?@*0/o*0/ Boѯj|z|gB(/)&/@BrBՀeRQJl l v>Q/@䬹??m#M #N 3n $nG ><QRB#G #n- H#n" L#n Bi PJi G3n$ Pה*CZ,i> .NvT!@$#nt#n*pT!*.*_/Hx-EvTЀ*gSMnBvTЀ8$n&J*pRJ. *fSavT!P,_]*i / vTQGRABMEM,_*i +vTQMEMP ,_д|,O/// *i īDvTQEXL;OAD ,_*i, HiHivTQSTDINIT,_kvTQTIM;E /B*#E#Hڅ*TИ*Bo(D)~΄&R)Cw)H^B~ ΄rOvTRИ*B&~ ΃-GR.($~@΃G$~@ή4G@~@΄g ~ ΄gpNRw*`^.PB&6<"H.臈 Rm"~ޮR|G̃ކ-GR~΃!Gw`RR~I΃RGw)nR~@h΄g(~΄g"~΄.R>X-GRFήMv`..R)H`"BB/ ~ ΄O)T..R߬D)vT}*B@B(. f9D`V~@"΄f?B؇9D`<~ ΄f9D@BG 9G`B2ބ9G@BG9GvTА*eJ. g$LBG&`. g>$LB&`:BG& f0.)@+HHކ$GBG&pN$`B&֩L@Fή$f4֫e~ή$f(Be~ή$$f.)@+HHކ$G#C8:;d֩@.j&&v TД*.*.)@ޅ&d. e.v)TB(iH-iSBm$LBG&d&$nRT$J(BGE^B.ޅ`X`-LR-C@f`&ޅdeB (iH#i S m$LBFd$ $i TBGE^B.ރ`X`#L #F f`B&C )PBЇ ٠R`B*-܅. $FB@$G%@|@w|~@΃g~ ΃P$В%@B~ ΃.*FBC f"`*HHޅB(GC|` B֩LFΆf$֪e~Ά"fBe*HHޅ(G.GgGdօ$/ .H$_$В%@B0Fp eb0 eH.F܆.)`oܩTܩ <$FBF e6.ކީ\$GBBFe.)`l 0mܩ 4.)PކR.p./  / xQP.*/ / $xPTЈ*.(.c/ xHPvTЈ*.[(.c/ PBvTRJP *.*/ / %PTЄ-iF΁g&i$KBGH*`*~)HHΆg:~)HHΆg,.P`S.ױ*8~΁.۩D~)HHΆf.jJg8-&i$KB*~)HHΆfN.gD-HHxk/)3/)O$JHf o^E$JBG*T@~)HHΆ./)>Xދ(GUe0$LBG*Se$LBJg.\۩v!TЀ*.(e@o .\RvT} i(i&)ضo&)JMJ*fR,`J.)&oB~`)HHΆ `f6 go,J*g& i.SJرf i`S`vT)HHǒ.SJg.`p i(i&)ضo&)Sm `.)&)HHSm.`vATBJ i(i&)ضo&).SJg0HHHHƾgJd\p HH$HHƾlt~` )HHΆ `@.~`)HHΆ `..)؞ &l.D& L)HH(GpNJ HH$GdR.HH$H H$FdR.HHƾlt`t`.HH.HH"o tvTRhR.)&~`)HHΆ `\.D&-idd-ig)HH(G.SJgrHHǾgJdf HHǾl HH$GdR.HH$HH$FdR.HPHƾm.HH .HHƾnqRBR`tvT Lh-idd-iЅpNJJo.SJgHHHHƾgJdf HH$HHƾlf`@f@d` HH$GdR.HH$HH$FdR.@HHƾlJJGtt` .HFH.HHƾoJJtltvTRR`Иq i&)Jg($HB( g"$i HHgf`Fl~vTSkR`RИJ*g4)HH~΃f&~΃-GR~΃gB* iJRg4 iR`* i()Jg:$HB&J*g<@JRfN gf.`D2$HB& +g -gFl~vTSR`$i HHf`F`B*`)И*(&(7بe.)@ރ$G#D8:;.)@(HHކ$G#D8:;BevTЀ#Hp#E@#KtAHid~@HHΆg.*`BvT`Є#Hp#E@#Kt./)X *Jm$.HxZ`.މ(GHHPv!T..1 Q X`RЀ˙BRAC$HitdJg$.(侮*f"(H`. g&. g,)kBB`DVRP`.f&H`. &*`&P)n`R. *!n` .\vTЀ*.ޮ.cXXvTRЌ&iH*).SJgE$J@#i8:;X`.)Xl()X.)-GR()0BRBl.$G <./*XR`JRg. /eXSRRL`v1T$iBG&GT() iH.SJo2$HBGf6E..*$J#G8:;E^B$` .\Rv TX`R<.)|dd .\.*XTЀ i(JG.vtTА <) B) .*n *E$JBGީ@(G$MB&Eg$JB 9fXE$$JBGJG.ީP(GRL B'L'H *- HHf.Eg$JB*i tX$i@ $i@Rv0 TRl#Hp#E@#Kt*E BX#G8#G <#G@EB B#BGޅ#GT&GB#AD#HL$HB$i(@-GR 8hH 8f.RהczP@O$nB( BH.\$nRB#GHއއNpNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN~NzNvNrNnNjNfNbN^NZNVNRNNNJNFNBN>N:N6N2N.N*N&N"NNNNNN NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN~NzNvNrNnNjNfNbN^NZNVNRNNNJNFNBN>N:N6N2N.N*N&N"NNNNNN NNNN$NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN~NzNvNrNnNjNfNbN^NZNVNRNNNJNFNBN>N:N6N2N.N*N&N"NNNN@NN NNNNNNNNNNNNNNNNNNqNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNJNFNBN>N:N6NNNNNNN-N"NTNjNN NU.\F iUp*)@&itv6T.H4`.H `Hxg X1`$i@BG. `$i@BG. `Hx X`Hx X0`Hx X~LHx XpHx&g Xb.R.)H|TXHB@X80:(V .*/)H.Xf6*m諝ૻ)ثЬR.* T\~/4`n`a *.j *\|#EK$J..*E f*E*T|g# 8\.*4`2 . )M )P )f`i P. (g n| P g\n.E RWG,.J( \*FpBQR.,&*Z(G/*i ī~v?J4l HxO/*i īĢv?Jl Hx aOkic&PkiX,Sn.HxgX.ekidHxPJg gaJ*g.IHxgX.&)kiHxP3Jg$g` g*g.HxghXh @$g J.afJ.`f.Hxg>X>kiX-Gb E$J..b..*އއNpNNNN\N.\E$J..*E*J.aG*)`Ji ."J8\jJfH\ 8FhEh/ *i *ٌv?Jl Hx gO"m (g n H. Hn2E RW@I BJH.lHW@v $J( \L H.@,<,BQR//+*i ī4v?Jl HxO*%LRU@v J( \>&/+u*i īv?J4l HxOL$$.:A$i BSIi VRJGlJ\B>) P#i H$i LJ"gJ#J L* \J~ވ$GB f~ވ$G.<$H^$J..*@ BHxgX1J.`P*)B(g(*i īJv?J4l HxgO.Fhkhh*i īv?J4l HxgO"Lm (g n H. HnE RW@I BJH .lW@v $J( \L H.@,<BQR//+*i2 ī@v?Jl HxO*%LRU@2v J( \>/+*i īv?Jl HxO0$$.* \BHxgtXtJ8f.HxgZdXZFhEhЂ/ +*i :,v?Jl Hx gO"m (g n H. Hn2E RW@I BJH.lHW@v $J( \L H.@,<,BQR//+*i īv?Jl HxO*%LRU@v J( \>&/+u*i ī׊v?J4l HxOL$$.* \&FhGkh*i ī\ģv?Jl HxgaO"m (g n H.X HnEF RW@I BJH.lW@v $J( \L H.@,<B%QR//+*i īךv?Jl HxO0*%LRU@v J( \>/+*i īPv?Jl HxO)$$.* f`BHxgXLB.g"i P.@ (g n| P g\n.E RWG,.J( \*FBQ3R.,*(G/*i īֈĦv?Jl HxaO/*i v?Jl Hx O f.Hxg dXFhEhЂ/ +*i :v?Jl Hx gO"m (g n H. Hn2E RW@I BJH.lHW@v $J( \L H.@,<,BQR//+*i ītv?Jl HxO*%LRU@v J( \>&/+u*i ī*v?J4l HxOL$$.* \BHxg XFhEh/ +*iu īzv?Jl HxgO"m& (g n H. HenE RW@I BJH.lW@v $J( \L H.@Y,<BQRb//+*i "v?Jl Hx O*s%LRU@v J( \>L/+*i īv?hJl HxO$$.* fBHxg XXXbR|# 2RHx( DX.*FbTR|#..*m Jf SQ. Hx *XTI =\6K]BgF(LSQRa|g]BHi]B*i īҼv?F (g n (g\~qE R.W*R *F(L, ܇ mQRJo@*@Р// +*i2 īҀv?Jl HxOS&QR$Fz/+g*i =Bv?Jl Hx OTЄ. ނS(G g8\ \K]B.(KSQRB]BHi]B*i īѦv?. (g n (g\~E R.W*R *.(K , ܇mQRJo@*@// +*i ījv?Jl HxO0SQR$.}/W/*i+ ī0v?Jl HxO侂BHxgXv!LTe Sc`e. R*\K]B.(KSQRE]BHi]B*i ī0v?P.E R.W*R *.R (K, ܇mFBQRЩ// +*i2 ī`v?Jl HxO.&QR $..*BHxgX1 *.*lmHx .*.XvTBlHxXR`R|a#.)8GGG NpNRNjNF NLN>$HX$JBJHxg8X4"\K]B1.(KSQRB]BHi]B*i ī,v?. (g \ (g\sE R.W*R *.(K, ܇mQRJoH*@Р// +*i2 īv?Jl HxO n>SQR$.  .g6 . g.`ԫG)g`2E f6BX1`J.fBdXv Tp#@bz`Ji .xi P\p(i H$i L*K.lXJg $$\JBFF QZJ  WϱRmeQJ#LT H.$ g\S`BE R.W(R*j䀻nF(MР/+*i: ī\v?Jl HxOJo&p%L*ߪ*.*K $\JBFF QJ֔  .*QϧRRm-Jf (j QJj .S$.NqJfB|X0" \ByHxgbX$K& w\.WFfX@ **** WARNING :AB@ IN COLUMN 1, LINE NOT COMPILED %sk*הOkg+o(P.<(TR*E*$JB(i P.1/+g*i īǎv?Jl Hx O.) H9-GRBi P.< (g n (gn.E RWG,&Bl#jR DR..RvT *E*$JB (i P.p/ה*i īv?Jl Hx O-$i L9(io(JJ#L H(i P.H (g no gnV.E RWG \@.**\2$f$ D^,.J( \*FBQR.L,*(G/*i ī\v?iJl HxOvPTR..*އއNpNjN:NNe$iQL~1$HR$J~0B(#T$iL~2 $HR$J..`$iL~9J$HR0$J..`$HR$J.) `/J0.B/ ]B*i īƄv?B()]B*.RW/ (]BRDO.6J2J"n.`$iRHHf*R .) m p#@~ *T$i#RB `.`.) $G#Rz `Ѐ˸*E $JBG EcE (J`E $JBGީ@(G.HxPvTЀ*I Jg .cHxPJM.,lBvTP`йk*i īTNv?Jl HxOTGkW*ih ī v?*SmBX`v`TI#FX .Z n 4Sg&BGieς,( ޅ(`BGie\,8( ޅ($R .Ji .HGGNpN NNN NNNNNNNNNNN NNNNNNNNNNNNNNNNNN (N~NzNvNrNnNjNfNbN^NZNVNRNNNJNFNBN>N:N6N2N.N*N&N"NNNNNN NNN"N0N>NDNRN 8NvNNNNNNNNNNN4NnNNNNN NNNNNNNN N~NNvNrN NjNfNbN^NZNVNRNNNJNFNNN0N6NN. NNN$NPN *N ZNN NN N g\H le} m l  (mF!FNlNtNNNNNNTN(N:N@NFNTNZN`NfNlNrNNN N2NDNZNpNNNNNNNNzNNNNNNNN NNN&N,N2N8N>NRNXNlNN6NB@$i$(i SL| `$$i$i$B$i  ީS$G *i *i )#Kt*i X&it*i @H*i L*i )F*i 謥*i v(iB$i BGSL*i|$i$BGSMBF$i(QR(iB$i  BGSL*i|$i$BGSMBF$i(`QR*iB$i BGSM(i|$i$BGSLBF$i(Q0R(i y$i$$i(i y$i$$i(i*i y$i$\*i(i y$i$싂$iB*iB  O/)2*i  O/)d*i 8O*i *i J*i *iR R$i B G/)*i :P*i *i *i  /) /)*i 2P*i I*i /) )/)*i "P*i *i 4/)*i BO*i *i *i .*i ($iRB*i HO*i $iB*i OB@BABFy$i,*i0S(i4 am n @N:N6N2N.N*N&N"NNNNNN NNN NNN NNBN|NN NNNRNNN@NNNNNNNNNNNNNNNNNNNzNvNNNDNvNN NZNVN4NNN NVN>N:N6N2N.N*N&N"NNNNNN NNNbNNN"NNNN6NZN~NNNNNNN4NjNNNNN8N^NxNNNN(NVNbNnNzNNzNNN:NRNjN&ZN~NNNRNNN8NHN\NNNNNbNxNNNNNNN NNN.N8NXNpNNNNNNNNNN6NZNpNNN rN N!N".NN":N4N"`N"|N"N#8N#N#N$RN~NNvNrNnNjNfNbN^NZNVNRNNNJNFNBN$pN:N6N$N.N$NNNPN-N$N$N$N$N N.P*i \QJ\y*iL JiPBie . ~*Gy(iLǙJiPBie . P(G..VyT*iLǛJiP@Bie . *Gy(i,LǙJiP Bie . @(GŻ dtfttH.y*iLǛJiPBie . *Gy(iLǙJiPBie . r(GdN.vyT*iLǛJiP@Bie . 8*Gy(i,LǙJiP Bie . @(GF.y*iLǛJiPBie . *Gy(iLǙJiPBie . (Gd$MB.$LB&$L.fA.y*iLǛJiPBie . P*Gy(iLǙJiPBie . "(Gd$LB.$MBJ&$L.A.y*iLǛJiPBie . *Gy(iLǙJiPBie . (Gd~.yT*iLǛJiP@Bie . h*Gy(i,LǙJiP Bie . :@(GGCCdtf tt."Ry*iLǛJiPBie . *Gy(iLǙJiPBie . (GGFFGG.y*i+LǛJiP Bie . j@*Gy(iLǙJiPBie . <(G GFGFF`..y*iLǛJiPBie . *Gy(iLǙJiPBie . (GdG.G&CC.y*iL JiPBie . n*Gy(iLǙJiPBie . @(GG.Gh&CC. GJiPiBiieޅ*GBGJiPi Biieޅ(G.QGJiPi Biieޅ*GBGJiPiBiietޅ(G dtNftFDt@.HG JiPiBiie2ޅ*G4BGJiPi@Biie @ޅ(GC.GJiPiBiieޅ*GBGJiPiBiieޅh(G.(GJiPiBiie~ޅ*GBGJiPiBiieVޅ(G$MB .$LBJ`&$L.."PGJiPi Biie ޅ*GBGJiPiBiieޅ(G$LB.$MB &$L..GJiPi@Biie@ޅ*GBGJiPiBiierޅ(G4N.VGJiPiBiie@ޅh*GBGJiPiBiieޅ(GGCCdt@ftt.GJiPi@Biie@ޅ*GBGJiPiBiieޅ(G4GFFGGl.t,GJiPiBiie^ޅ*GBGJiPiBiie6ޅ(GG FGFF.G JiPiBiieޅ*G4BGJiPi@Biie@ޅ(GG.G&CC.,GJiPiBiie~ޅ*GBGJiPiBiieVޅ(GG .G~`&CC.@*HRy(iLJiPBie . (G.*H)Ry(iLǙJiPBie . (Gd dtftt.*HRy(iLǙJiPBie . t(G2P.x*HRy(iLǙJiPBie . 6(G.:*HRyE(iLǙJiP@Bie . (G$MB .$LB&0$L..*H(Ry(iLǙJiPBie . (Gd$LB.$MB&$L.fA.~*HTy(iLǙJiPBie . L(G (.@*HTy(iLJiPBie . (GGCCdtftt.*HTy(iLǙJiPBie . (G2GFFGG~.*HTy(iLǙJiPBie . d(G2GFGFF..F*HTy(iLǙJiPBie . (G2G.G&CC`.*HTy(iLǙJiPBie . (G G.G&C C~.*HRGJiPi Biielޅ(GJ.bQ*HRGJiPiBiie8ޅ(G dtft t.*HRGJiPiBiieޅ(G4.*HRGJiPi Biieޅ(G.*HRGJiPiBiieޅ(G$MB .$LBz`&$L.J.bP*HRGJiPiBiie8ޅ(G$LB.$MB`&0$L..*H(TGJiPi@Biie@ޅ(GC.*HTGJiPiBiieޅ(GGCCdtftztt.|*HTGJiPiBiiebޅ(G4GFFGG,.4*H,TGJiPi@Biie@ޅ(GGFGFF.*HTGJiPiBiieޅ(G4G.G&CC.*HTGJiPiBiieޅ(G4G.G&CCD*i Hx@/ ̫8PB/ 쫨(XJbbB *i Hx @/ ̫P(B/ 쫧X(J*.F.쫭@Q./ xD X$)*i! B/ ̫PXB/ 쫧PXJd*i, B/ ̫nPXB/ 쫧^PXJl*i, BHxHxg/ (̫OBHx%Hxg/ 쫥OJT(i4$iBG&.$LBG&$L#C8:;*i BHxHxg/ ̫nROBHxHxg/ R쫨TOJJ(i$LBG&.$iBG&$L#C 8:;X*i .̫|J(.̫p0*i .쫧TJd.2쫭H*i* B/ ̫PXB/ 쫥PXJ(B$ELBpN.L.dQ.쫫$./ xQXp#@J.h.LB Bl*i B / ̫bXB/ 쫥RXJB$EBpN.̫rS.d.쫪.E/ x X$)~΂.Z.J*i B / ̫XB/ 쫤XJB$EBpN.̫S.d.쫩.E/ xX*i B/ @ZXB/ AJXJB1$EBpN.1̫j.Ed.쫩Q./ xD/ PR*i Hx@/ ̫PB/ 쫣XJbB$EB*i Hx@/ ̫PPB/ 쫣PXJB$ELB:*i Hx@/ ̫dPB/ 쫣TXBҊ$EBJX*i Hx@/ @*PB/ AXJTB1$EB*i B / ̫XJ,.̫ *i Hx@/ ̫PJي.̫Q*i B/ 쫢XJb.쫧BҔr*i Hx@/ 쫢fPJ.쫧B(@*i B/ 쫢6XJpB*i B/ 쫢X(JJHxgfX*i J0&)#i#C*i Ja./ xDXB*i1 v./ ̫X.̫PJʫVvV*i vA./ @jX.̫J㘫$D*i v./ ̫8X.BVJfY*i vA./ ̫X.̫$J4*i J (*i J*i J4*i JE̫E"쫤J\(i*i>)ھio >)QR6)&io<~`)f$ igo(i$xSCܹʉ(iQj)SCQR E̫E#쫣J\V*i E̫xEE쫣pJ\4*i$ ī0*i J .*i J.*i J.0E*̫*i JB$hE$̫*i JᠫD$J*i B/ ̫@X(JzHxgffX$*i BG#GBG#GJF.̫*i BG#GBG#GJ`.쫪T*i JXv *i JaB$EB*i B./ ̫~PXE쫡*i J.~@)HHΆg~ )HHΆ$i@BG| )l./ "XBh*i v@tB*i B./ @X.쫡J*i v@`E̫6*i B/ @XJ|1*v.)ؾc.)؞ߩ#CBzp*i .쫝Jߤ`2E̫*i .쫜J߂eh*i .AJfLY*i .쫜PJJ.hF/)/)|O!Hx/)h/) pO$"<R޾E̫8E*i B/ 쫠XJHx/)/)pAO$Bx\tSD.n޶ Dg.eeަJ\ޞBDLxޒIvJ\ވJ\*Ƃ\0RvvJ\lJ\*Ƃ\RZvJ\PJ\*Ƃ\R,>vJ\4J1\*Ƃ\R"KvJ\J\*Ƃ\RvJ\J\*Ƃ\ݤR\ݚTJ.ݐRJ2f J.|S)ݼ gf J3fB\Jfx pNݘRݐR݈\8J,.|SJ\p g\fBE̫J\RH*i ī*i J6Yp#@ .L(G*LJ@oB~#Gl.`o@ .*+*i \ܠ#M *i O*i RM B'M'H Lt+*i \F.n(G*G%J@oB~#Gl.`o@.*+*i \&Q#M *i O!*i RMB'M!'H L+*i \.\(GJ@o~#Gl.`o.$*i O LBۮ.hBB$EJomSއ(G,܆܆(HpJ@o~#Gl.`o.$*ir O LBDBFFۄE B&C)HPB)Ї R`(B*-܅. $FB@$G%@|w|~@΃g~ ΃P$В%@B~ ΃.*B!C f"*0HHޅB(GC|` B֩LFΆf$֪e~ΆfBe*HHޅ(G.GgGdօ$/ .\$_$$В%@B*H.އJ\xˌ$*i JdE$%|gBg*H3.އJ\6JP⫝̸V#G JfR .) \`ٖ.B.E(G$iLBd٦J@o:~#Gl.`o@.+*i \vQ*i O LIB`.xB(G$iLBeDJ@o:~#Gl.`o@.+*i \*i O LB.Bj(G$iLB\J@o:~#Gl.`o@.+*i \Gز*i O% LB؜.شB)(G$iLB.؀J@o:~#Gl.`o@ .+*i \P*i JO LB:.RRB(G$iLBcJ@o:~#Gl.`o@@.+*i \*i O LB.BD(G$iLBb׼J@o:~#Gl.`o@.+*i< \׌*i *O LBvI*i B#G|BG#GJע`..W#GtD*i `*i `J\NB#G|G(G$L~0.Y#Gt.*i īHXJH.*i īD*i .AJ.&)*i ־.櫙.UְB jlBGGNpN:NjNNNN:NNNNNNN0NڸJ\քB$GieZ@ޅ(G$L#i8:;*J\PBGie&ޅ(G$L#i 8:;@J\BGieޅ*G4$MBG#GJ\BGieޅh*G$MBG#GՒJ\՘*HTB Gie@ޅ(GBG.G|&0CCJJ\P*HTBGieBޅ(G4$LBG.$MBGZ&$E#C8:;BG.G<&CC`J\BGieޅ*G4BGieޅ(GBG.G`&CCxJ0\~BGietޅ*GBGieZ@ޅ(G$LBG.$MBGr&$E#C8:;BG.GT&C CJ\B&Gie@ޅ(G*EJ\BGieޅh*G(EӚBGieޅ(G$L.J.t g\ӶBdJ\ӊBGie`ޅh*G$MB(8J \>,#@lBGie*@ޅ(G lc\ Bl$L.)lPEg$J#F8:;J\HBGieޅ(GBƎ*i LX$LBGީPBҎ o./*L. ZMainProgRTS2 K(UZ/*.*J$i HHǜ$i@ HH*TЌ n *eo .@B-nBk:$etO.:HHgpN.ek:RX..eGldR-G.eHx@*-WE:Ce-JE&JB..l~ޮ-G$nBG6R`JS@$nB6R..e$G -RJ.kbkHx*OB&BJ\BB..l..@$Gkb>.Hx$0$W ,.ƞ-GR..R,.$Fkb߾RcRz`P.R$Gk~0n!n-DS!LJg:.R$Gk~0ޮpNNB..$Gkb4R&@R wao pNBkkbHx*OpN-nI.Eފ-G~ޮޮ*-G$nS. g$nS.$nS(W`..*e$nS`Jg ..E¾e$nS gpNJME*@JFlBv1T˾$(.e..߮*US*$n*HH. l~΃  $@hSo6So2S*$nB*HH~΃So.`So <`vTИ*()H[H~΃f.vT((~΃g$./ .ldRR[O4.\~΃M$D <() . $ބ!G$D" <HH@FlBv]TdА*~()HHΆ.KX&(P~()HHΆg($LBgk/RROEd(JB)R.K/ |Ov TЈ*~o()HHΆB`H"&P~()HHΆ(~()HHΆJDRR` JIfSJg$KB -fFv T$KB@F`B`Ro*(P-hRSyRm`~(wHAHƞ(GS. G`. !G|w!K vT*Io(h)))hvT}*I l))!lvTwj$gd'gB@o;T HvԥNr @zZ~o#]Exc5MS7)eࠠ (((   IAAABBBgCopyright(c) 1981,1982 Microtocus Ltdmdebu?.ISR-printer-PRINTERmixsio/usr/lib/cobol/cblerrs:CI: :CO: /usr/lib/cobol/debug5.INTmdebu.IXSI$O.INT$ixsioa4/cobol/term_lisaI/OLoadExCecutionMiscellaneous%s error: file '%s'R@TS error code: %d,c=%x, call=%d, seg=%d %d error codeot f ound%s Consult the COBOL User's Guide 0123 456789ABCDEFbcup khkdkukrklsesocmclTsgcoliTEURMTERM:cd=\EY:ce=\ET:cl=2\E*:ma=^K^P^R^L_ :kl=^H:ku=^K:kr=^L:kd=^J:kh=^^:up=^K:am:bs:cm=\E=%+ %+ :co#80:ho=^^:li#24:E^^\\::n r t bf @OOPS0123456789ABCDEFmodsav() $IBZHi eB)|g@p#@| | || B) | |g | | | | p#@p#@p#@p#@ү#@p#@p#@B) #I  |g |g | |I |N |L E"E#JE#JE#J*E#J$E #JeE #J)E#J@E#JE#JmE#JE!#J}E#JE%#J1E:#J EV#J E~#J E#J E #J E#J E!#J A E E E E BA E9 gE6 gBBE#J E#J E#J E#J E#J $E#J (E#J ,E#J 0E#J 4E #J 8E#J <E#J @E #J DE#J HE#J LE#J PE#J TE#J XE#J \E#J `E#J dE#J hE#J lE#J pE#J tE#J xE#J |E#J E#J E#J E#J E(#J E4#J E.#J E=#J E$#J B 4.<Ȁ#G 0#G 8vTR#n*JME$JBB` E$JF$nZR..*@ E$J#G8:;E$JB8:;p#@../)/)PJf.Hx fX"EBB.L/ HxdPBTR|.TR$i BGީ./)@XTR#i@*)$i BGީ./)X#i@ *)TR.*הXTRА$iB-GR$i BG&$i(BG./)$..R菲"P4$i0BG./),~ήRpP(G.SJ` (v TpЄBp$iB -G$i(BG*-E$i0BG./),..菲P(G$i8BG./)4~ήՀP&G-Lb.GSJg.HH-GR..RHH-FBg..Rc8p)Np$i ..p..#, b$i$#G 8:;Nv!TpNp`R..*އއ5NpN>NlNhNdN`N\NXNTN}NDN"NNjNN N..ޮ$STJf xp#@.$T..l$TT#i@#i#iH#i#i#iT#i@#i#iH#i#i#i T#i@#i#iH#i#i#iT#i@#i#iH#i#i#i TJxPBTR#Hp#E@#KtJME$JBB` E$JF@||.)| @E$J#G8:;E$JB8:;p#@../)/)PJf.@Hx\XE$BB.L/ HxPB i p*)@&itTpNRpNRpmNRpNRpNRpNRpNRpNRp NRTpNRpNRpNRpNRpNRpmNRpNRpNRp NRTp~NRpNRpNRpNRpNRpNRpNRpNRp mNRT˔$R*S*HH fB`J HHǾg`FvT}*xHHÎ CR`.vGT˔߆$R*S*g+HHÎ t`B. vTc*g MHHǾRa`.!Tc*R`.*!T*.*$Jg>HHHHƾ2Jf"B`JMH HHHƞlBv TSRR`R.*HxPTo*&Hf. vTЀ}*.cN@NB+#|d467`Z(i`8(ie`2(i)`,I(i@`&(i` (i`(i)< PgB`(XS(oc/`OvTTBRE ..RJg4E ..R.׈*HxPJg E ..RX.T..*TTR`Hxg . V\* gk*i HOv?TkRX-G..* Q." .d &.THxʔEe/UOHxהTE:$/OHxהXEN/OTHxהE*/OHxҔT$nX/pIOHxהX$n:/XOHxה\DO`HxהEe\/OHxהTE@/SRO`Ј˔(.$E[$J#n*8:;kkP*../P(vTRЀ}(i i .-G R R2$L~9=`$i$R0gX$L~0vTR(i i $i$JZgZZ.cX-GR FR2$L~9$L~0vTRМ$i BG(.)ބ-GR~*@ޮR&G"fz$i.v9@TB`R3THxgoXT/*.**T|g ^T/) HH.*T*) HHJB) vT..*T{ЀA. .k)XJo J. ,#G fp#@. |,#G fpP#@./)0#W2. x,#G./) t-X#G.B./) p-nX#G../) l-ZX!#G./) h-JX #G#i d./) `-4X#G.o.a/) \- X#G../) X- X#G.p./) T,BX#G.\./) P,X#GgH#i L#i H./) D,X#G~g*./) @,X#G.)  c.Bb.X`()HxgHxHx/)Ϋ-O0vT@TЀ*J=(~ީ$H.~ީ$L.vTJJh#id.)ީh#GT/*.*J) PJB) J) BgB) gf JhFlBG8 *TЀ|J) gD i el$idS.)h/ *i Tv?B.)hhgH.`.(AldRR-G.KRO?~΃g:. ޮ$GAS`*~΃.KX-G.KRO?$nv T..Rb$nRRR@`r~΃f~΃H~΃ g(P`Jg~΃g$P@`JG-`+`m@@`ЀE JN.הX.*X.*cǫXvT*&hE[( Hxk/qWO$E$JSBG(J*G.D(.v Tc*~Ψf FΨB*pZ!@p!@*p!@&!TЀ*.(**gJ*FlB)G<*.cX` . cXvTRЄ$n.$n'*. WE$*(R~ޮE$*,Ee*ކ&GE$c$KS .$LS W`BRE*e:$LS HHHHކޮR* mpNRBR$K]S`JRg,~ޮe"HHޮR* m pNR`JRg$n&gBR$K]S`. BE0$RJf E*BE*JR$nXp$`$E$RJf $nXp$` $nXp $$n.v!TЀ*.(**gJ*FlB)G*.cpX` .cXpvTЄ}$n.$n*. WE$*.|ܮ*-GRE$.T|ܮ-G..Ro..R..-GE*.|*ܮ*-GER.|ܮ-Gb..վbl..Պ..b-Gp..pR-G~ޮ*ޮp(G~ޮޮp&GJ(gHHHHf BRS`J MHHHHlB-G~ޮ*ޮ(G~ޮޮ&GB$nS. TgJo<HHHHƞ*`:. JJoNE*.E** WR `hHHHH*JlpNB$K]SS~Jl"HE*.E*JJFlB W ` E*BE*J$nXp*$`$E$RJ(f $nXp$` $nXp$$n.v!T˾*x(Ee&J.SJ B`E'!J$!hA$B*Bp!@v TЄ}$n.$n* W $nX.$n*X W E*.E*J* W z(~ޮ*(GA~ޮ&GSm`E.~ޮE*,EeJ*ކ W E$A.~ޮE$Q*,Ee*ކ) W v!TГ/+*i: xv?Jl Hx0O$$.* fBHxgX1r/+*i v?Jl Hx O0-G`.`d$-W\E\ gXЪ/*i v?Jl Hx OE*J` \6J*.P *\"@FhEh/ +Ԑ*i rv?iJl Hxg,O"m (g n0 H. HnE RW@I BJ@H.lW@v $J( \L Hf.@,<BQR//+e*i ~v?J4l HxO*%LReU@v J( \>0/+*i xģv?Jl Hx8aO$$ .* \F8hkh*i lv?Jl Hx gO"m (g n H. Hn2E RW@I BJH.lHW@v $J( \L H.@,<,BQR//+*i ~v?Jl HxTO*%LRU@v J( \>&/+u*i xv?J4l HxOL$$.* fBHxgcX`:/*i fv?Jl Hx ޲O fBHxgXv!TFhEhІ/ +*i :rv?Jl Hx gbO"m (g n H. Hn2E RW@I BJH.lHW@v $J( \L H.@,<,BQR//+*i ~v?Jl HxO*%LRU@v J( \>&/+u*i xv?J4l HxnOL$$.* \NBHxgX.$G <"BE$JB..*.$G <"p$`RЌ|#.)'D$G <" -RR.)R(.)D $G <" f BX3`bRR/)D,/)T/*i xĠv?Jl Hx܈aO*2 J2ff&.R .)0D$G <" $Rv1T.`RJ*f B-X`( *fBHxgX1`.HxgdXTЌ >g8GJ8f. HxgX`@|*#E+JZgZZ=R.)uR(.R J1fHx3HxP0v1T~ޮR.M/0-W/)Dױ*i v?Jl Hx TO/)YD/)T/*i x@v?Jl Hx&O*H.|NJHxJ3HxPbL.)D$G <"@$Rv1TЄ.)R*|# Jv #B`4*ȃgHHHHfRR`f  |H :Jf FvTJM :-H |R`JG :B`R`c*H :?R` :fR.!TЌ&i?v.&GJ~L`6HH$n*H HƾfJgHH$n*RHHƾf @f ~v1T #fRx f@xB$i HHHHg.0/0.HHކ5*`.`Ѐ iv. CB`:HH$n*HHƾf܃gHH$n*R HHƾfƒG :0f FvT @6fB`Ѐ i8v.Bt`6HH$n*H Hƾf܃gHH$n*RHHƾf @f BvT =fR.c X`˹*$n(RHHg :g. \.8 ^.Bx$n R$n$.vTHH&`-i R@HH$nRRRH(HǾf$nRRRPHH`RR$nRJPf$i HHgpNHH5Sg$i HHHHfpИ-n:*RA B&.$JRf.) `8B) $nRRRHHĎ %g$`. cX.   vT$nRRRHH. moz El%އއNpN"N\NXNTNPNLNzNDNN@N8N4N0N.NN$N NNNNN NNNNNNNNNN co sld@އއNpN`NNNNNbNNNNNNNNN4 ` `$JG....$& m< dm .Hxd$.YHxd*&.Hx$.YHx*fF-G``+$nRRRHHǶ o$nRRRHHև RR$n2RRRHHևJg g w̎ fFl`J-fJ~g6JJG.).) $.)~./  AXR gaNpNrRR$Rt*n.Hx$.1.Hx*ޗ&N..Hx$*a,㆞&6(P.И*B.2vT$il HHHHg6.Hx0.HHކ5($i HHHHf.0Hx0( .f*R$i HHHHg$~HHކ؇` *f.R.ה0(`$i HHHHgR`⃌MHH.$n$NA`JJio ijmvT>)4H$G 6H.ldR؇./$(Jo) HH.$n$NS``R..*<FF. ,TTЄʫn./) /)PH&G#S|.)|@#Gx(k. | gm.<#GJgc.)|ީ(G.WdXv!TR.HxX. HxX|| |*I|T UZ 7  0002102122232499 99)9+9/99999999뜝 d &( )-/8 T   % % % 7 7o o   O O        # # . . DIVISIO DIVISIO DIVISIO \(C) 1981,1982 Micro Focus LtdTTVTTXT TVXT*VTT,  1   <       -, ,~@z((~  c(+)(c(d(c((+T`}(R c(()(~`(`( `T `(0T(+d((()@J*K K K@G*H Hc(+)(0C5'0C5ic(+)(0C5'0C5i@{K{ {yy (  y&y}&C k" +  (}m"-  , @Hy} {}}C}@}yCz@zC0 ,Z .CzCzD@y(0C0@@Z , .@C@EE , .CyEyyy} C<Y(@z@,{K{{y (Cy<Y!{K{{yyYD}YCyDyk&+ (m&- ,(k(((KD(DKD(D(DKD(DHDk(h(h(h(hKh(hC7 N&@\C7@\>R:T D0=. +T? C@@( F@( J0A@(TUT,T. C $@CB+TGEG HHUT,TC+TJEJ KKUT,T   F h0=C $DCCGDCJDC5iCCG . EG HH CJ . EJ KK  lG0 JD  j j j jj 0!Hj @wE PBEC FECFE@FC\E77 @Fm@77U;F0G qZH o,ICtJ@,KYm Cz 0L Zo Z Z(C5<0G PBMCtL; qZF0GTT(C5<0GL Z Zq Zq(C5<0G PBLCsV0Kj!m@ oKqqT ZqT ZTT T Zq Z(C5( hT,T`VhP T(TZC\lZKP@7(V\-\ 0 ^ R0@yQ@KP@y(C5<0XXUT,XT P:a+T 0 V  0 0C5'0i0 0  0 nkZ@0H,H.#b#a ]> \?C7< #_#^#`; :e`#`; @0+aģET+Z+Z @, V-@ W(Z. .(e>C7< +^+\: :m\+\:+w({C0 [ Z(ZC4+0 C40  C7:]RKPs> 0 C0hVhT,:T,:T`ZUV^UT[] T V C\DU@7 R#]V#\W#[U  P:a[ _R ^S PL :LlVlT.hT,ThV,VVUTX],\ T C\LT@7 R+VX+\V+ZT  P:a ^R : PLL,VT+TTV 0HN YCc[bK&(k$b+ b(&m$- ,&*HD *K( (c_(aH_&v(s(&s(|cYC!hsHC!hsH#4C4E4(z(Y123C3E3H8(]@(zT(K TT&vBIDXUvC1@7BSX0Uv$xT&vT :;ځ@7E;< L 8L<@5@6C!@5@64 0 C40H]@g`?T @F @ F0@#'Jb}cYC! [C#U` ""##@$E#@$E$@$@$C#@ $ YC(sc[H &K&&&KH&@4& & $ ? C$# "(D!c  (D"(#2$o((D,w#]+&(#(@$N@w01C!C!C!h(  + (+ ,-  t tMH-@ tdt?@e@tdtؠ`?t  t  ?@e@M -@LM@@ttCdt@@k@t,t L&otT,HHt--TlL & M-+  %8!c  (D0$q"(#2$o0$q((D0,w#]+&(#@$80$q(,hh` (h,,T(z,|(|(|(k, (,@!c@!,k-((k(+(C LCMCM C, H( hecK-((-kC!c((C!` D0C!e,(, T,|(|(zc  (D0"(#2$o0("@$#2#] \`YH# #,0(&`C!#]+&(#@4`?T@$"K230$qC!$qe,(, T,|(|c  (D0$q"(#2$o0$q((C!kc  (D"(#2$oh+(+c*],C!kc  (D"(#2$oh+(+c)a+( N+N`C!cc((C! D+(C!k#]+&(#"@ $ h+0*C!+cck#]+&(#"@ $ h+0*+( (C!@!@!c(tcD!)-@!(C9M/h@!K ( - ($&(,"K"'-!#2$oծ-Hn'imc<(YS]= ] : P L < + d  Q b D  @ h !  ^. Us~j 6QnM`F1(G 28$o7S=#-^zNl$R3  M= \$Y!0"""##,#]$`######$+$$$$%**%%'&%%&^%&W%&6&:&&&&''l''W())a))**]**+p++%+3++,",I,,,-%-rAAAA$.,'."ObjIOLibdSlmxIUMAN OBJIO FILEIO UTILITY REFS TREES PARTS GRAPHS LISTS MEMMAN PASDEFS ^IntrinSgObjIOLibSlmpI'.ǒmlmpmX$mdmXIm`mhmtǒ 5D,$kEI*V;vǒ D$Iǒp*LT$KLI <ǒ(0r$$ZI 2;ǒ $=6LI><D|H ǒFH~G$DTGIG\HR= ǒ>mT$m&3I Jǒ $'BI!#,ǒ(*$&mJI6m2 ǒvh8$[2Im>Bǒ $ I(d4\Cǒ"0$1.I002Jǒ/Z1N?J6IHJIǒJIJt$>f?hI-*+ǒT+R,$QD bI! :ǒ3DE$D;IDPǒ@$%2I<-ZǒMD 43v$XNI5D QǒB.$'j8LINVgpǒL6O$W gI7RǒWHg N$#|I@RZ@ǒh~!J$),?IS8Zhǒ,"4)d$SZIiPd#)U$eiI"ǒ$$)U$fRkPIB"ǒ&:* U$fI&LǒVXMkJ9JoHgv͞߈YJX*.͞*B@/6fTILL7EXEC1% killing OS exec, Errorumber ]wԝ_TNITPASDCONSOLE:TAkSHALT OX둛ԯb͞ߵ ^ g*OX͞߈ TUMERRORm Errors detected. Errors detected.YB*lhh*TIN YB*ohh*TAX 6A*\6Z*_uY*|A|a/h*T!PLOW 6a*\6*_uY*|a|A/h*T!OWTOUP ɵEB*o*cg*k!pasT!RUNCLSTF*EGm<˛*0EƓ^}*0AE A+]uٙ`*|g`TATBLANKaR*ɷE/RF` 4AE?2*UDRo}vTTRUPTOLRv*E/RF` 4AE?v2UDRovT׬TRLOWq*p<a2D͞ߵzk͞ߵԽ͞ߵ _TARNING " ****** Warning - P*p<a2ԫL͞ߵk^͞ߵ*ͯߵ R e *** ***rror - *p^<a2W͞ߵk͞ߵz͞ߵ Rl g2͞߈k͞߈d~͞߈ 6͞߈*B@/6f4TATALERRLType to continue. ******tat@alrror -  ******tatalrrHor - *p<a2r:UJg$ߵ˔0Xg k͞ T! MERROR  in! array with MemMan Error<.*JForkJ*pJkd X*,a*)nd8] /y`&frAg4BHIAp8)Do-nJ`gԓΫvT!NITMEM $Negative memRange. (uninitialized?) R*0/R>,`Lf0@50ggf0~frAg4B'HAp8) =G`|DRoԝvTլMALLOCAj Mem!ory Full. >.*0@0ggf$rAg4BHA$p8)`&W8HDzg WHvT!ESERVE .,RESERVE request, element already allocated: >.*frAg4BHIAp8)ll9GvT!REEIY*Agg@jT!SFREER$0n/Ry`*f0o@0gJ@f<|A* nNwDRovT!?ACHALLOJה*ľgRJ^ ]ugPd+o:Vgԯ͞ߵd^*<ח$]`Rgl͞ߵהg<͞*g} 0vUT!?EAPALLOv items of size: Attempt to allocate Can only allocate 32 K. onlyIave: 'Not enough space available, requested: *K\K*\*[\T! DDITEM Rи:.*8.W?`K\V>Gf W?W|`K\H`[\<oG_ug}<W`K\>`_fNX͞ߵH=/gԮ͞ߵH/g WN`WW|`K[`K*[W|`K*[vT! ELETEITB$Attempt to delete item not onfist.  item:  Badfist, Head: R͏$K[>_g&͏|K[<|A* nN>;`vT!?jACHITEM*nKZ=_jT!IRSTITE*n[ZzT!NITLIST$*p$(P(7)n*T!?NITLSJ<.n*͏KY>_f`|͏|K$Yߏ`XB8͏|KY>_z`͜|K$Ygʏ|K*Y?K*Y|vT! NSERTIT*nKY6 _@jT!ISTEMPTRBF͏ۍ*KX>?_gRF͏|KX>`=FjvT!IST=SIZEJ|͏*KX>_g(͏|KX:|K*X~<>`ҏ*[X`vT!EVERSEL>.*kRepR(|ϫ)_kYXp)n*kHDzp)nkHDzp)n$-nfRvTNwITGREPJ`K>`II`I$A~VJ89n*C*|~C*|p=G$vT! DxRC*[|~>Q*|vQ|l=GvTDDVERTER>.n*`II<:,C*|0C?|$`K|`vT!ELETEAR*|ضn[* )T!ELE=TEVEm#Attempt to delete vertex with arcs.*fnIY20l*f9nT!HECKARCaהh$T! INDARC ~>.*z˔nIYIT2=l$`\lf=T&$`PHk͞HkYXgHknͣHkHDzgHk @ѫfvT! P SITEF.Argument to OppositeVertex isot an endpoint. vertex: *** arc: nIY*=pjT!NITVERTnIY*=pjT!ERMVERTK*_jT!SSOURCEK**_jT!SSINKǹ**@jT!SISOLAT$n[A$/ / T!?ACHVERT$nKA$/ / T!?ACHARC ˟K$A$/ / OT!?jACHINAR˟K*$A$/ / ?T!?jA}CHOUTA˟K$A$/ / ˟K*$A$/ / OT!?jACHINCI* inIY?0*A* nNT!I{SITINIן$T!?jACH>PRED* inIY?0*A* ]nNT!ISITTERן$T!?jA}CHSUCCן$A$/ / ?Fן$A$/ / T!?jACHADJAazt*kRpR(Cص*CR-nRvTNITGRAPR˔-hRRI*Y1*T! FARCIN aR-hRRI*Y*=pjT!FARCIN R˔-hRRI$Y1*T! NARCIN aR-hRRI$Y*=pjT!NARCIN R˔-hRRI*Y1*T! FARCOUTaR-hRRI*Y*=pjT!FARCOUTR˔-hRRI$Y1*T! NARCOUTaR-hRRI$Y*=pjT!NARCOUT)ztHkepy(k(P)H&)H*)H3HkRep(k=R()H2)H*b)HvTNITGLIS*r*I*K&*K*eT!XPLORE1>.$*QRgg|j*A$ nNu`ZQR>_g|j*A) nNufK*4΍*A{* nNv]T!?XPLORE nn=P荱J=RT!?FSDIRK*T!EWC=LASSnI*Y 1*˔K*RT! DDMEMBE˔K*z˔nI*Y 1T! ELETEMEK*b_jT!SEMPTYC˟K$A$/ / RT!?jACH>MEMBnI*Y* =pjT!L~ASSOF K*hT!EVMEMBEkRpR8j9nkYXp)n*J*fB` *)h*-nR$T! NITPREP)J*gj*[n&_`j㍔Z&_kRϛ*pR(KRW{-nR$vT! NITPARTaR˔-hRRIY 1*T! FME?MBERR-hRRIY* =pjT!FMEMBERR˔-hRRI*Y 1*T! NMEMBERR6*2j` -hRRI*Y* =pjT!NMEMBER)zHkRepy(kR()H&L)H*~)H3vTNITPLISRkRY*Xpo-nRT!N~ITNREP>.kR"pRkHDzp<(9G n*$#*|x)_?-nRvTݬNITTREEY*I8勐T!NITNODER@ k f>W)Hk A* nNW)?+ CH/?+ =k1 >+ _.W)|C*HH0g,PgnW)|A$ nNw=G~`I Tf6W)A* nNwW)?CH>w/?=T~l>`T`I l\f>W)A* nNW)CG/=l~>,vZT!?)NTERNODRv>+ B ggF_|`:`νIW*|C*GrH0GH|>_>,`=G$veT! LOOKUP >.?_g<* i$nI?*׫5|*A* _nN*vT!RAVERSE$r T!?NOTRAVEdvFBz ggh˹0PE8jIY*@"@0E/nl^ D%n~lB|`$no6%nB*l~| E*lRE)l|`GvT!?OMPNAMEjIY*@AT!?TORENAMR؏*ͫ)H*)H-LT!N~ITNAME/]>Q$||~f*1*=Go$vT! D{DREF˟K$$A$/ / T!?jACHREF K$*NT!EWR=EFLI>.*kep|>(>kRYXpP)nRkRHyp:)nR*kRHDzp$k)nR$|KRױ-nvTNITREFSR˔-hRRIY1*T! FREF qR-hRRIY*=pjT!FREF R˔-hRRIY1*T! NREF qR-hRRIY*=pjT!NREF R(hf*Y"l**A40qN_@$T! REF˔K$*˔K$T! OPYREFL)z|HkRep(kRx(3)H)H* )H:)H$vTNITRLISkԫ͞*kwB@0k:M*S kk͞(jTEADCH -keyboard*p<a2*$*˻$cdgW$pas˔B`,$pg0AE Afˊ$B˔gT!?EADLNS p˔p]<a2*\wp<a2e$k e׫ܢ$ k\e,2UJAug*ecek\k!pasT!?$EAD?FNЮjkHH`f8*``O`^BT#E/tF`F6pE|q?%ZIx{fp 6pAE@|8Do=vT!?E}ADLNW V͞kt~66g6f **gޔ TSER;WAIT%Type  to continue, to exit.@)JN_BkY|E%AHIx{fig?g`RY|uE%AIx{fig`6 2HB6g .b vT!?JEADBOOL ͻ*>T>͟Y*X,><<=TR0gg$g0V`:#RHɕ@j`*#Rɕ@j`^YRHɕ@jYRɕ@jvoT!EEKN .;*͍=<YX,ޛ=>g=TR0g g0ZgB`RHARH`P`HARPՁP8RveT! OKEN d<.;*g<>?<<=TRJGf#RE/j#ɿE/jvT!EEKB qd>.|g<<|=T3RJF2nwRnuw8RvT! OKEB >.n*gg.W,0@RW,0@hRj(K=TjvT!EEK=W >.gg2h*RW,#RE,W,#E,(K8*vbT! OKEW >.*ggVͽ,:0@R͏,&0?@͏T@,0@͏V@x,0@-nRj&L-SjvcT!EEKL j>.gg^-n=*R,#RE,,#E,T@,#E,ڏV@,#E,&L/&*vT!?OKEL qbACr* ?hbF`6*Ѐ$jvHRA6 BERnjDboT!?OHEX $01c23456789ABCDEFה*kT$k͞T!?RITEHEXwT!ETLENGTR>.;*_lJFILEd*O^X.8 :੐l^< l^/d>,^fRB03Ddo l_^^g`QZvTEROFILEvF#*,`g> QHOXXmQRXZ"0lXgP8Ӽ.*g(~͞(vT!LOSEFILm#I/O error, can't write last buffer.˔ZX+˔^XПˮ* T! ETF=ILEPЬ)jp<a2*&hkj͞YXg͞ߵk͞x͞ߵZXg͞XXg ԝիvT!?ET0IOER I/O! error. for at block:  while Error type *(knj `gZJlXoJQRXZ"U7_lXg*R>JGf\XP*`:|*`QW` QHObbvTLUS:HCHEwriting IORes writing blks Rt>.<.jlb:ov .9GZQRVXZ9_XJlXfVZQRngZ9_X lgXJFugj#*XgQgan|0<X\lZKF^OXlZbObGU.*JFu.uOXlZlb2,\RAl^ugL`OXlVf$0aOVlZZgX\]^`OXXO\|\gQ`gX\9GZ]^ObbjgQ۫JGm9GZ P9lqVX`VObXG,9_XQRXZU9_XOXlV]2,XlZSAlb]urR8k0<X\9F0^bOXlZ,̎9_b|vT!?ET0Dsetting blocktr rereadingextendingew f ilesettingas@t EOF*+~*+},OZX^)2,XlZSAH]M|'g`OZX"/+ П^vT! EzTFILEPRהkR*ѮRהRH~T! KIPBYTE*haTILEEOF и,.*J@#. $O\l:^X*&lR^O\l^X(O^XЬRNʸo.l.o:W $O^XІ^O^XІ^g`jQB`zW| $O^XЇ]^O^l\mׅ$OXlZ,O^XЇ]^g`QO^l\mהOXplZ,'gV|J@LvT!?OPYSEQ и$,.*JgpO\Fl^X.O^XЬR(o/W O^XІ^UB`./W| O^XЇ^ǏOXlZ,ͫJ`vT!?ETSEQהAcp<˷*c/ ͫ"0!0T! ETBYTE ה*pT! ETWORD ה*pT! ETLONG и$,.~*J7.O\l^X.O^XЬR( o$W/ O^ZXІ^Bg`eQ`:W/| iO^XЇ^g`QOXklZ,'gF|JtvT!?UTSEQAc͍*BAcpT!UTBYTE A*cpT!UTWORD הA*cpT! U{TLONG h# FI8$9njnT!?TUFFIT ͛e''g'e'v'$'g`'*'J~' ' w4' 'g'ߛ*'g'*''ww$''*' ' ''-'~' j'j-'p''Z~'$)'wD'o'.'ۛ)}'' 'e' '_'*'"'w'W'')*''''-<'jjz'$'T'@q'>'_.''TNITINFOaRhכ*p&PW*|B`,H H"RA F40Fp]"R o ggnB`H"1gR o$尐&(,m.@2$4 60 8:@mBvT!NITOBJFap]<a2jnVcki*ګRJ_%e[XT!?PENOBJF*[TEROOBJE[i*\T!LOSEOBJ˔[*T! EBJ^PT˔*"T! EBJBL˔[*8T! EBJPT/˔!n*T! E̿BJBL[*~T! KIPOBJB..jzhn # AFIc* A"20H/J$P@* A"20HG/!_vjT!?EBJ_IN65SetObjInvar: VarSize isot@ divisible by variant sizej[[Y*XT!?OPYOBJSd..zh*[K[k}9.[K[kJAJcͫ~:AJcͫ~  AFp u @ `Ң gn  AH<0[ LPcH<  AJHƠJYϦA"20H/)_JШ伒!@B` pNJBvT! EBJ^IN*j[ LT=ch#"20H/T!?EBJ_VA˔[*p\T! EBJNAj[Y*X,T!?EBJSE/˔[Acp˷*c/ ͫ0!0T! EBJBY˔[*pT! E̽BJWO[*poT! EBJLO/J..;zh*[K  .  AH><0A"20HQ/H- ПXNRRШ!@ARc  AF??0F[RJ[ LPcHM [p*vT! UBJINj[*Tch#"}20H/T!?UBJVA*<<˔[AcpvT! UBJNAej[Y*XFT!?UBJSEAc͍*8[AcpT!UBJBY[A*cpT!UBJWO˔[A*cpT! U{BJLOdBB՛*RC|ŁsF`0A'B_oF`0AEB_oF`0A?$B_@ovTNIT4IUMA INTRINSIC.LIB127.127.127.127F`,d0AJM|A* nN_oT! A|CHIUSEزF`,d0AKEJM|A* nNw_oT! ACHIUUNaF`,d0/A?J9M|A* nN_@oT! ACHIUFI>.$JGUf ˔S`j˔B*JGoZp" HHAJA|CDE˔ckהkw!zspasX~>`T!?UMTOSTRrar*-PR#R,kD˷ckԨkXw!X7zpas#,k˔cהkk!zp9asJ.J.o.#,k˔cהkk!nzpasJ.gJ#,kV˔cה>kkr!rnzpasT! ERS?ST ...Ekku#EB*%jk*`{jk͞T!?RITEVER˫p<a2BFyBggZt#EGnz`H O6pE|?%TIx{z` O6pAE|@<`=F$vT! TRTOINT*z˔p<a2Hk,>JGf1k,>JGf #E>=G$T! NDOFINT .Щ˔p<a2BXzAzcܫZ>JGo_gokg,kA+z\p<a2A\zcV0;A0gpgg&`.HMFX`"HMFY`HMFZ` HMF[kg|Azc>;RE Eoy*˴* XvT! TRTOVERaJ*g.'[g*g4f͞kהR˔ϵHM`$$ *``Azc$H{T!?EADVERS ] *p<a2d$kl(kvkTTATzc~d[o(kԣ6kAzcܷHT!?VER>IFYVe and 4101 and 4100TVERSIONd*G=SF`TQ'*k<.p0A Hp@p0A Cd qpaDov_TSEGLOCAd]*G=SF`TkQ'wk<.p0AE Hp$py0AE C: qDovTUNITLOC8dˮ*G=S8FuQ'kfQk۫RQ YSAwC?HpRpQYSAC?/0gYSAwC?C qDE<Q *QYSAC>?/0 ,No File Namesŀable.No Segment Table.No Unitable.4000*RhJT!OUNTSEG*RhRT!OUNTUNI*RldYSAvC?C qDEl gRlT!OUNTFIL*dYSACC qp<adKR'*kT!UT1SEG wdYSACEC q<<<<dKR'wkT!UT1UNIT7B dKR'kNT!UT1DUMM<.*d=Fw-kվQR'kQRkQRCի }0A? C2 qE>QR0A? /0|2gQRp AE,ϫLH߫QRvT!UT1FILEdzJk\V'QRVw`7J7R77XHԷpk'"YR@zXhRQRk Vk'pJXVhJoQRkWk'p+ܱ@H/hQRkvQRkի>}4QRիvpXѮc Qk . f$%QRkH..JoQQR|jkV'QRkHkZ͢Hk )vTRkITEIULp-Errors detected: No Output .LIB file written.Output .LIB file written.'No Code Block found in input .LIB file.dYSACEC q$n*CQp VRf *1nRT!F~INDUNIdYSACC q$n*CQp VRf *1nRT!F~INDSEGdYSAC?C qc* ijcH*1nT!FINDFILиzdBF.*jzcͫDRJ_.nx9f l9f(ԭ P͞ߵj͞ߵ 8F`0AEA}B0_oF`0AAB0$_o*[kf*[k#.j.Y@.@w.Y@g.gY@.PEA}gsYRSACECg qJ(f\YACER4qSBEEAC q@YRSACEC q!nYRSACEA}gg`x"V͞ߵYXgԯ͞ߵYRSACEC q;Xgk*͞ RF+`*͞k*͞ RFJAw-n78.-nh8.Hĸ\6B7R9R.YRSAC;C qVbßBgz͞ߵzYX*'g}ßX*'כgWc*͞_ RF`N!nՑe9YP@X@1@)Bh9) X@X@1@-YRSACAGg`*V͞ߵk*͞ WRF`F͞ߵH/gr͞gu RF .\hF0AMEA}0g2sSACE"AAJug\0AEC q;Bf<W͞ߵ0AOEC qcǛ*͞ RF_onF0AAI0g2SAC"AAJugZ0ACd qßBf<| ͞ߵ0ACd qc*͞ RF_opJFfԠ͞ߵ ^b*['gN`2ԧH͞ߵj͞ߵߵ vT!?UINSTAL'. Can't open file: 'Errors during InstallationInstallation completed.$Expected Segment not found intile: !Expected Unitot found in File:  - !Unpacked Code`iz@es don't agree: Can't find Segment: "Segmenttile mbers don't match: Can't find Unit:  - Unit Filember s don't match: Segment Names don'tatch: Segment Number too big: Unit Types don't match: Unit Names don't match: Unit mber too big: $File nameot f ound in Files Table: * ,lQ)kYAoE/RgTEXTCH* Hgg`.*9_`9lՇ`9lՇ9lgTCANCH* Gg`*(y9_g` Ν=lՔTEEKBsadneek* HMg `1zs`*9_=lTEEK2  Bcadneek2*RlOACE2,4SBE*īTUTC=H ** h'H*`*ϫTOPYSTR *d*\׻*TBggDs* h*f.*v _)f*ë&*F**`TOPYp)Ap(Ap}Ap{A@p'A!@p$A@bp*A@BJ@_@pNRŲ+ <R/d4xN#[gG#_geͫTR#geݬRRek׺e&׽ee$\$$( RrB׳ee׺e$۶׾eױeﱫזvT!?eOPYINTE!02A>!020A>!02@> !0F@>p#!"_cNNdNNNN>N mp IDENTIFICATION DIVISION. PROGRAM-ID. PI-CALC. AUTHOR. PF/TR. * ENVIRONMENT DIVISION. CONFIGURATION SECTION. OBJECT-COMPUTER. MDS-800. SPECIAL-NAMES. CONSOLE IS CRT. * DATA DIVISION. WORKING-STORAGE SECTION. * 01 SCREEN PIC X(1920). * 01 DI-1 REDEFINES SCREEN. 02 FILLER PIC X(160). 02 DI-TX1 PIC X(160). 02 DI-TX2 PIC X(13). 02 DI-TERM PIC X(15). 02 FILLER PIC X(136). 02 DI-TX3 PIC X(6). 02 DI-PI PIC X(15). 02 FILLER PIC X(1415). * 01 DI-2 REDEFINES SCREEN. 02 FILLER PIC X(333). 02 DI-TERM2 PIC X(15). 02 FILLER PIC X(142). 02 DI-PI2 PIC X(15). 02 FILLER PIC X(1415). * 01 WORK-AREA. 02 PI PIC S9V9(14). 02 TERM PIC S9V9(14). 02 W PIC S9V9(14). 02 N PIC 9999. 02 N1 PIC 9999. 02 N2 PIC 9999. 02 ED PIC -9.9(12). * 01 CONSTANTS. 02 TX1 PIC X(17) VALUE "CALCULATION OF PI". 02 TX2 PIC X(12) VALUE "NEXT TERM IS". 02 TX3 PIC X(5) VALUE "PI IS". * PROCEDURE DIVISION. LA-START. DISPLAY SPACE. MOVE SPACE TO SCREEN. MOVE TX1 TO DI-TX1. MOVE TX2 TO DI-TX2. MOVE TX3 TO DI-TX3. MOVE 0.5 TO ED. MOVE ED TO DI-TERM. MOVE 3 TO ED. MOVE ED TO DI-PI. DISPLAY DI-1. MOVE 0.5 TO PI. MOVE 0.5 TO TERM. MOVE 3 TO N. LOOP. MOVE N TO N2. SUBTRACT 2 FROM N2. MULTIPLY N2 BY N2. MULTIPLY N2 BY TERM. MOVE N TO N1. SUBTRACT 1 FROM N1. MULTIPLY N BY N1. MULTIPLY 4 BY N1. DIVIDE N1 INTO TERM. IF TERM < 0.0000000000001 THEN GO TO HALT. ADD TERM TO PI. MOVE PI TO W. MULTIPLY 6 BY W. MOVE W TO ED. MOVE ED TO DI-PI2. MOVE TERM TO ED. MOVE ED TO DI-TERM2. DISPLAY DI-2. ADD 2 TO N. IF N < 100 GO TO LOOP. HALT. STOP RUN. 000010 IDENTIFICATION DIVISION. 000020 PROGRAM-ID. STOCK-FILE-SET-UP. 000030 AUTHOR. MICRO FOCUS LTD. 000040 ENVIRONMENT DIVISION. 000050 CONFIGURATION SECTION. 000060 SOURCE-COMPUTER. MDS-800. 000070 OBJECT-COMPUTER. MDS-800. 000075 SPECIAL-NAMES. CONSOLE IS CRT. 000080 INPUT-OUTPUT SECTION. 000090 FILE-CONTROL. 000100 SELECT STOCK-FILE ASSIGN "STOCK.IT" 000110 ORGANIZATION INDEXED 000120 ACCESS DYNAMIC 000130 RECORD KEY STOCK-CODE. 000140 DATA DIVISION. 000150 FILE SECTION. 000160 FD STOCK-FILE; RECORD 32. 000170 01 STOCK-ITEM. 000180 02 STOCK-CODE PIC X(4). 000190 02 PRODUCT-DESC PIC X(24). 000200 02 UNIT-SIZE PIC 9(4). 000210 WORKING-STORAGE SECTION. 000220 01 SCREEN-HEADINGS. 000230 02 ASK-CODE PIC X(21) VALUE "STOCK CODE < >". 000240 02 FILLER PIC X(59). 000250 02 ASK-DESC PIC X(16) VALUE "DESCRIPTION <". 000260 02 SI-DESC PIC X(25) VALUE " >". 000270 02 FILLER PIC X(39). 000280 02 ASK-SIZE PIC X(21) VALUE "UNIT SIZE < >". 000290 01 ENTER-IT REDEFINES SCREEN-HEADINGS. 000300 02 FILLER PIC X(16). 000310 02 CRT-STOCK-CODE PIC X(4). 000320 02 FILLER PIC X(76). 000330 02 CRT-PROD-DESC PIC X(24). 000340 02 FILLER PIC X(56). 000350 02 CRT-UNIT-SIZE PIC 9(4). 000360 02 FILLER PIC X. 000370 PROCEDURE DIVISION. 000380 SR1. 000390 DISPLAY SPACE. 000400 OPEN I-O STOCK-FILE. 000410 DISPLAY SCREEN-HEADINGS. 000420 NORMAL-INPUT. 000430 MOVE SPACE TO ENTER-IT. 000440 DISPLAY ENTER-IT. 000450 CORRECT-ERROR. 000460 ACCEPT ENTER-IT. 000470 IF CRT-STOCK-CODE = SPACE GO TO END-IT. 000480 IF CRT-UNIT-SIZE NOT NUMERIC GO TO CORRECT-ERROR. 000490 MOVE CRT-PROD-DESC TO PRODUCT-DESC. 000500 MOVE CRT-UNIT-SIZE TO UNIT-SIZE. 000510 MOVE CRT-STOCK-CODE TO STOCK-CODE. 000520 WRITE STOCK-ITEM; INVALID GO TO CORRECT-ERROR. 000530 GO TO NORMAL-INPUT. 000540 END-IT. 000550 CLOSE STOCK-FILE. 000560 DISPLAY SPACE. 000570 DISPLAY "END OF PROGRAM". 000580 STOP RUN. 'IDENTIFICATION DIVISION. 'PROGRAM-ID. GOODS-IN. 'AUTHOR. MICRO FOCUS LTD. 'ENVIRONMENT DIVISION. 'CONFIGURATION SECTION. 'SOURCE-COMPUTER. MDS-800. 'OBJECT-COMPUTER. MDS-800. 'SPECIAL-NAMES. CONSOLE IS CRT. 'INPUT-OUTPUT SECTION. 'FILE-CONTROL. +SELECT STOCK-FILE ASSIGN "STOCK.IT" +ORGANIZATION INDEXED +ACCESS DYNAMIC +RECORD KEY STOCK-CODE. +SELECT TRANS-FILE +ASSIGN "STOCK.TRS" +ORGANIZATION SEQUENTIAL. &/ 'DATA DIVISION. 'FILE SECTION. 'FD STOCK-FILE; RECORD 32. '01 STOCK-ITEM. +02 STOCK-CODE PIC X(4). +02 STOCK-DESCRIPT PIC X(24). +02 UNIT-SIZE PIC 9(4). 'FD TRANS-FILE; RECORD 30. '01 TRANS-RECORD. +02 TRAN-NO PIC 9(4). +02 TF-STOCK-CODE PIC X(4). +02 TF-QUANTITY PIC 9(8). +02 TF-ORDER-NO PIC X(6). +02 TF-DATE PIC X(8). 'WORKING-STORAGE SECTION. '01 STOCK-INWARD-FORM. +02 PRG-TITLE PIC X(20) VALUE " GOODS INWARD". +02 FILLER PIC X(140). +02 CODE-HDNG PIC X(23) VALUE "STOCK CODE < >". +02 FILLER PIC X(57). +02 ORDER-NO-HDNG PIC X(23) VALUE "ORDER NO < >". +02 FILLER PIC X(57). +02 DATE-HDNG PIC X(24) VALUE "DELIVERY DATE MM/DD/YY". +02 FILLER PIC X(56). +02 UNITS-HDNG PIC X(23) VALUE "NO OF UNITS < >". '01 STOCK-RECEIPT REDEFINES STOCK-INWARD-FORM. +02 FILLER PIC X(178). +02 SR-STOCK-CODE PIC X(4). +02 FILLER PIC X(74). +02 SR-ORDER-NO PIC X(6). +02 FILLER PIC X(73). +02 SR-DATE. /04 SR-MM PIC 99. /04 FILLER PIC X. /04 SR-DD PIC 99. /04 FILLER PIC X. /04 SR-YY PIC 99. +02 FILLER PIC X(75). +02 SR-NO-OF-UNITS PIC 9(4). '01 CONFIRM-MSG REDEFINES STOCK-INWARD-FORM. +02 FILLER PIC X(184). +02 CM-STOCK-DESCRIPT PIC X(24). +02 FILLER PIC X(352). +02 UNIT-SIZE-HDNG PIC X(18). +02 CM-UNIT-SIZE PIC 9(4). +02 FILLER PIC X(58). +02 QUANTITY-HDNG PIC X(14). +02 CM-QUANTITY PIC 9(8). +02 FILLER PIC X(58). +02 OK-HDNG PIC X(3). +02 CM-Y-OR-N PIC X. &/ 'PROCEDURE DIVISION. 'START-PROC. +OPEN I-O STOCK-FILE. +OPEN OUTPUT TRANS-FILE. +DISPLAY SPACE. +MOVE 0 TO TRAN-NO. +DISPLAY STOCK-INWARD-FORM. 'GET-INPUT. +ACCEPT STOCK-RECEIPT. +IF SR-STOCK-CODE = SPACE GO TO END-IT. +IF SR-NO-OF-UNITS NOT NUMERIC GO TO INVALID-ENTRY. +MOVE SR-STOCK-CODE TO STOCK-CODE. +READ STOCK-FILE; INVALID GO TO INVALID-CODE. &*VALID ENTRY, CALCULATE AND DISPLAY TOTAL QUANTITY IN TO CONFIRM +MOVE STOCK-DESCRIPT TO CM-STOCK-DESCRIPT. +MOVE "UNIT SIZE" TO UNIT-SIZE-HDNG. +MOVE UNIT-SIZE TO CM-UNIT-SIZE. +MOVE "QUANTITY IN" TO QUANTITY-HDNG. +MOVE UNIT-SIZE TO TF-QUANTITY. +MULTIPLY SR-NO-OF-UNITS BY TF-QUANTITY. +MOVE TF-QUANTITY TO CM-QUANTITY. +MOVE "OK?" TO OK-HDNG. +DISPLAY CONFIRM-MSG. +ACCEPT CM-Y-OR-N AT 1004. +IF CM-Y-OR-N = "Y" PERFORM WRITE-TRANS. &*CLEAR INPUT DATA ON SCREEN +MOVE SPACE TO CONFIRM-MSG. +MOVE "MM/DD/YY" TO SR-DATE. +DISPLAY STOCK-RECEIPT. +DISPLAY CONFIRM-MSG. +GO TO GET-INPUT. 'WRITE-TRANS. +ADD 1 TO TRAN-NO. +MOVE STOCK-CODE TO TF-STOCK-CODE. +MOVE SR-ORDER-NO TO TF-ORDER-NO. +MOVE GET-INPUT TO TF-DATE. +WRITE TRANS-RECORD. 'INVALID-ENTRY. +DISPLAY "NON-NUMERIC NO OF UNITS" AT 0325. +GO TO GET-INPUT. 'INVALID-CODE. +DISPLAY "INVALID CODE " AT 0325. +GO TO GET-INPUT. 'END-IT. +CLOSE STOCK-FILE. +CLOSE TRANS-FILE. +DISPLAY SPACE. +DISPLAY "END OF PROGRAM". +STOP RUN. t&NN"2 06$ 2@2(111100p///`/(.....V.B->-2-&-,F,:,.,"+4+(++*))))))))(((((''x'l'^%%%|%j%V#v#D#""""H!!!!!h!B! n 4xXF:&l^J6*B$vfp2^F.|lr\N<dTF2"&@@ "% y """x""%"4>c4>@*Memory to use(assuming 1 megabyte machine)p@  full megabyte@three quarter megabyte @  half megabyte@5 "iz    ","8"[8"B}@ Enable Mouse Scaling?@no2@yes222~<~"~,7"~,"P,"P,Z1~;1~;2$V@  Print Wheel:n@ Gothic 15@ ~Prestige Elite 12@z Courier 10A@ vBoldface/Executive PS@rModern PS plus Italics@ nModern 10/12/PS@j'Modern 10/12 plus Additional Characters22!Setup of Apple Dot Matrix Printer@55a ix~~5heel Printer@ Dot M@ Paper Type:@  Single Sheetm@Fanfold@@a ix~~er2@ j Config driver@fDiskette in Drive 1 (Upper)@bDiskett@ Paper Type:@  Single Sheeta p22llel Connector@Z4Disk Attached to Lower Connector of Expansion Slot 1@V4Disk Attached to Upper Connector of Expansion Slot 1@R4Disk Attached to Lower Connector of Expansion Slot 2@N4Disk Attached to Upper Connector of Expansion Slot 2@J4Disk Attached to Lower Connector of Expansion Slot 3@F4Disk Attached to Upper Connector of Expansion Slot 3@B!AppleNet Card in Expansion Slot 1@>!AppleNet Card in Expansion Slot 2@:!AppleNet Card in Expansion Slot 3@ 6 Internal Disk@2Diskette@.Workshop@F*>.&zrjbZ@@&:6222<P@ "Convenience Settings@Startup@ Device Connections@ s* s @-Set All Convenience Settings to Lisa Defaults@ /"  "~"%$/F%$/$%L/V%L/V%`/j%`/j%t/~%t/~%/%/%/%/%/%/%/%/%/%/%/%/%/ %/ %/%/%(/2%(/2%</F%</F%P/Z%P/Z%d/n%d/n%x/%x/%/%/@  Screen Contrast@  Normal Level@dark2@bright@   c  $ F$ $L VL V` j` jt ~t ~                  ( 2( 2< F< FP ZP Zd nd nx x @ 310mm x 8"@ 8" x 310mm@l> n~ ~_~~(2n(2(~2 (~24>c4>4~>4~>N"~,"~,@ Paper Size2@ Letter (8.5x11")@ (inches):@ Legal (8.5x14")@ Paper SizeL@ A4 (210x297mm)>@ (metric):@ 210mm x 12"@l;ome}~~~<~"~,7"~,"P,"P,Z1~;1~;2$V@  Print Wheel:n@ Gothic 15@ ~Prestige Elite 12@z Courier 10A@ vBoldface/Executive PS@rModern PS plus Italics@ nModern 10/12/PS@j'Modern 10/12 plus Additional Characters@fFanfold@ bMechanical Feed@5^-rsn~~j-$@Z Paper Unit:@VInches@RMetric@aN,bs^~ ~Z22<V~~R22<N"~,"~,J"2,"2,<Pjjj@J Paper Size:@ FLetter (8.5x11")@ BLetter (11x8.5")@ >Legal (8.5x14")@ :Legal (14x8.5")@ 6Computer (14x11")@ 2Computer (11x14")@a.,Bs>~ ~:22<6~~222<"~,"~,"2,"2,<evice You Intend to Co@* Paper Size:@ &A4 (210x297mm)@ "A4 (297x210mm)@ 210mm x 12"@ 12 x 210mm @  Expansion 2 lower@@,&$PPtjj@  Expansion 2 upper@@ $PPPj,t"j,"@  Expansion 3 lower@@j $PPPjjj@  Expansion 3 upper@ PPPPPPPPPP2$V@Device You Intend to Connect@"$F9@"Setup of Apple Daisy Wheel Printere@troFile@ Remote Comp@!Setup of Apple Dot Matrix Printer@55a ix~~5heel Printer@ Dot M@ Paper Type:@  Single Sheetm@Fanfold@@a ix~~~5zAAK 1 (Upper)@bDiskett@ Paper Type:@  Single Sheeta@2@. >.&@B@22A22Pjjtjjtjjtjjtjjt"j,"j,t"j,"j,t"j,"j,t"j,"j,t"j,"j,tnj jjqjjjjjjjjjjjjjjjjjj~""$z'1'1$vT^?T^$rT^T^$nhrhr$j6@6@$fEOEO$b$^$Z2$V2$R2$N""$J'1c'1$F9@ No Device@ Daisy Wheel Printer@ Dot Matrix Printer@ProFile@ Remote Computer@ Non-Lisa Device@AppleNet@ Non-Lisa Device@Laser2@  Config driver@ Nothing Connected@ Daisy Wheel Printer@ Dot Matrix Printer@ProFile@ ~Remote Computer@ zNon-Lisa Device@vAppleNet@ rNon-Lisa Device@nLaser2@ j Config driver@fDiskette in Drive 1 (Upper)@bDiskette in Drive 2 (Lower)@^#Disk Attached to Parallel Connector@Z4Disk Attached to Lower Connector of Expansion Slot 1@V4Disk Attached to Upper Connector of Expansion Slot 1@R4Disk Attached to Lower Connector of Expansion Slot 2@N4Disk Attached to Upper Connector of Expansion Slot 2@J4Disk Attached to Lower Connector of Expansion Slot 3@F4Disk Attached to Upper Connector of Expansion Slot 3@B!AppleNet Card in Expansion Slot 1@>!AppleNet Card in Expansion Slot 2@:!AppleNet Card in Expansion Slot 3@ 6 Internal Disk@2Diskette@.Workshop@F*>.&zrjbZR*" vfF @@&:6222<P@ "Convenience Settings@Startup@ Device Connections@ s* s @-Set All Convenience Settings to Lisa Defaults@ /! "  "~"%$/F%$/$%L/V%L/V%`/j%`/j%t/~%t/~%/%/%/%/%/%/%/%/%/%/%/%/%/ %/ %/%/%(/2%(/2%</F%</F%P/Z%P/Z%d/n%d/n%x/%x/%/%/@  Screen Contrast@  Normal Level@dark2@bright@  p c  $ F$ $L VL V` j` jt ~t ~                  ( 2( 2< F< FP ZP Zd nd nx x   @ Dim Level@dark2@bright@ "  """""""("(2"<2"<F"PF"PZ"dZ"dn"xn"x""@ Speaker Volume@Silent (Flash menu bar)@Soft2@Loud2@a  P  $ I$ .V {V `     A P P Z@Minutes Until Screen Dims@1-22@2-42@5-102@10-202@15-302@30-602@ / } "@"%$/M%$/$%Q/[%Q/[%e/o%e/o%y/%y/%/%/%/%/%/%/%/%/@ Repeating Keys@Delay2@Short2@Long2@w   8 $ D$ $Q [Q [e oe oy y         @Rate2@Fast2@Slow2@a "  "C"Q"[Q"[e"oe"oy"y"""""@Mouse Double Click Delay@Short2@Long2@^  { ~""$z'1'1$j6@6@$fEOEO$vT^?T^$PPPPP@ ~Start Up From:@5z 1ll  k "L"$'1l'1$@v Memory Test@rBrief2@nThorough@j ~@f3 Connectors Devices Currently Connected@@bqH vq$qPP@^ Serial A@@ZnV nq$nPP@V Serial B@@R:fq$PP@N Parallel@@J^$PPP@ F Expansion 1 lower@@BV$PPP@ > Expansion 1 upper@@:.$PP:G>2: :*333 333333"3&3*3.32363:3>3B3F3J3N3R3V3Z3^3b3f3j3n3r3v3z3~33333333333333333333333333333333444 444444"4&4*4.42464:4>4B4F4J4N4R4V4Z4^4b4f4j4n4r4v4z4~44444444444444444444444444444444555 555555"5&5*5.52565:5>5B5F5J5N5R5V5Z5^5b5f5j5n5r5v5z5~55555555555555555555555555555555666 666666"6&6*6.62666:6>6B6F6J6N6R6V6Z6^6b6f6j6n6r6v6z6~66666666666666666666666666666666777 777777"7&7*7.72767:7>7B7F7J7N7R7V7Z7^7b7f7j7n7r7v7z7~77777777777777777777777777777777888 888888"8&8*8.82868:8>8B8F8J8N8R8V8Z8^8b8f8j8n8r8v8z8~88888888888888888888888888888888999 999999"9&9*9.92969:9>9B9F9J9N9R9V9Z9^9b9f9j9n9r9v9z9~99999999999999999999999999999999::: ::::::":&:*:.:2:6:::>:B:F:J:N:R:V:Z:^:b:f:j:n:r:v:z:~::::::>>D===Z=L=;;;^;";:@G@_-w:@,<`:@::@;G_YOOPOO' O O O???O_3?(^R_`@:'@The Lisa is having difficulty accessing the printing information on the startup disk.Refer to the Lisa Owner's Guide, Appendix 6, Office System Error Messages, under Difficulty Accessing Disk.If you report this difficulty, mention the number . @#G_YOL_D_G__d _ _ O> _7@: 'P@3 File/PrintSet Aside Everything Set Aside "Preferences" - Monitor the Printer ... @ToolsSet all of PM to defaults Quit @(42Print PM Me Events Draw the Screen Write PM to memory @G my stringsBefore setting contrast, adjust brightness on back of the Lisa until the edges of this box are sharp. @ my Wordword AGG=G=pG>@HG>G>>A4D!r^X-z2 File/Print Set Aside Everything Set Aside "Preferences" - Monitor the Printer ... 3 Tools Set all of PM to defaults Quit 4 42 Print PM Me Events Draw the Screen Write PM to memory 5 my strings Before setting contrast, adjust brightness on back of the Lisa until the edges of this box are sharp. 6 my Word word      ??          '"MNLOMPNQORPSQTRUS VT WU XV YW X"[\Z][^\_]`^a_b`ca db ec fd ge hfigjhkiljmknlompnqorpsqtr"Gs"vwuxvywzx{y|z}{~| } ~    !"#$%&"     "G"     "            "                            ! " # $ % & ' ( ) * + ," -G" G"                                     ! " # $ % & ' ( ) *  +! ," -#! .$" /%# 0&$ 1'% 2(& 3)' 4*( 5+) 6,* 7-+ 8., 9/- :0. ;1/ <20 =31 >42 ?53 @64 A75 B86 C97 D:8 E;9 F<: G=; H>< I?= J@> KA? LB@ MCA NDB OEC PFD QGE RHF SIG TJH UKI VL" WMK XNL YOM ZPN [QO \RP ]SQ ^TR _US `VT aWU bXV cYW dZX e[Y f\Z g][ h^\ i_] j`^ ka_ lb` mca ndb oec pfd qge rhf sig tjh uki vlj wmk xnl yom zpn {qo |rp }sq ~tr us vt wu xv yw zx {y z"}~|}~     " G"      !"#$%&'()*""" "      !"#"