IMD 1.16: 31/08/2007 11:45:16 fortran revision mid '79  >@>14!;2> 0400 {23>4>048 «400 t{8>] CDOS version . Copyright 1978 CROMEMCO, INC. 1Ĺ͋ͻͯͣ !|2K}2O!;͂1!"]>2\ܦ vBad or missing console processor$CONPROC COMջúçÂͯ!9ͧ͟})1]ͧ}O=! B!ߧyoO ^#V!YƧͧ}jͧƧͧ"ͧ^#V"!͂֨Illegal system call H at H *λs#r#s#r#q#p#s#r*λN#F#N#F#N#F#^#VedinsO򫠨֨knײݲEZQ˭z˯v ,2_;{:Ѹ= *λ sC ͧì àkx ͧx.Oͺ >u{.ú ͧE͐>u ͧE>u!λz¹֨àͧ|ͨͧ1]2ë*λ ~wÜ2ë*λ >w#s#rì*λs#r*λs#r:ë  ͧ}  ͧEIͺ ׫ͬZ*}|ڟ!ß!!} !Ì!###s#r#pǷ!à!###˷^#V# ͱwxğxةͬͺ&)))))=?_O׫͟úI ~#zW >#= z>Z|{I_㫻Â͟.͍~#fo{_{_!t~ɀ@ XwX/w>fX͉!ë/w ͧ2ͬѯ͟X͉Oë.͍6#####6@#6#6#6 ժͺI6#>6#=׫"ͺ!̂~ʐf! ~.͍w#N##~凇. ͍w##~L#p#q#w#\!~ʐI~=ī?6v! 6! 6ï*DMïïɬ |à~ڬùܬ~ڬɬx=2 ͧ͸# ?#Gxܬ< 4?GG:ѸGxO ͧE͛"2͟ܬ *λ wʣ?ʂ~ʂ_ ~?ʛ ʛ_=ï ͧz}Y*Y ͧ}2 ͧ͛͹ۭ 6 ~=ī<2O#~8# ϭ͛!ɬ׭͹׭ # ?:w#3 ͛HGɬ׭yygwU͛͠¨>2 ͧ͸~ʻ 쫸ҭ> x=’Ì 6# w#Ӯa_͛!+ 9# w#w#w#?w#6>#w<! 6SYS DIR>͠ w#6>͠ #2@Ư! ~™6! 4Ư!~=! ƯSҴ> >͞>! 4 > >P! S2>P! SS>͞ѷ>P! ~!#~<! 4>>P6Z>P! 4鮷Pv> 2͟~īO ~7oo&.͍^T~_*DM׫ 2 ç͖Oͺ|/g}/o#! > >C#>O#>M*λ q#pͧͱ 6T]# ~?# 6?*λ s#r+!*ջ}|Oͱ ~#,!>͂-Program too bigͱz s#r*λ6 !ͧ|ıͱ~6*λ͏~ʦ͓6º/ѱ͏ʿ͓̾w͓͑wױ6͑!66! 6; ;nb*>_> A/A͛:]͑ͿG÷ 4Ա Ա ʌʌ ʌ ʌ ʌ {͑~>ͧʓͫ ͑~ղͳʪ {÷͑~ղͿ{÷: {2$^#s#ԱG(Ͷzͧ##~Ͷ#6Ͷ;IͶͧ]_]]’z+xvdz~ dzֳ~ͶԱܳz}+y ©> z6ͧ#r{p#xͶ ij>^@>> >>\߳>/> > ͑> θ֨ÏÓ-15ëS9BGLbgyÛy÷y÷ ͱqy2y2PY à2 ͧEú>i>**+ ͧE ͧOú*Ú*x<!Ѹ#=ʳë"y2x2""L!Ѹx>ҥ͟*.͍^#V".͍~2:>ҥ.͕^*L*U}.͕:D.͕N#FxD<<k& +^& :G.͕^#V́i%Få:x& z&!. ͕^#V*:Oɷʟ%zå>27:A2B2`2!!z2j{2vy2h&)))͂!R͂Ý! Seek Write Read Home Read-After-Write Logical disk error H, Drive , Block H Error: Drive , Track , Sector , Status= Drive not ready ͓_!ҶRȶ!ڶIȶC!<͂Retry Ignore Continue      .͕N#F.͍~¥O:G. ͕^#V ͧ>A2[!F͓͂Remove disk in drive ; press any key to continue .͍ϷϷϷϷϷϷϷ Ϸ"Ϸ$Ϸ0Ϸ2Ϸ4Ϸ@ϷBϷDϷPϷRDM !» _^#Vxw# .> xGyOzW{_- zz/W{/_DM!>ByOxG}o|g=<|W}_`iWjzS0:__~`z{~#Â##v+v##Âͱs#rͱ~#fo*λ !~4w!|θH4........]H4........}H4........H4........(otVMz:2y5=v:)O:::2y(\ʊ=v:O:2x2{2z2͞2"y(l`>@> y y>O2 Rx22=4| |>(>040Ժ>0>@ ͗401 40P048 44002B1Wmƈ_z4{1Wmƨ_z4{048 q4002 oP048x=4:3O:2*###~1: "~:>(>04002(->o>0400@ ͗:O:W:_>*F*::@(:w>=*3O:G7G:g : > 4!͝>24/ >ɯ42Hx2=4}>!͝>+}      ޼׻»Ѹ;֨;'(EMjɽʽӽ&&žǾ˾Ѿ׾߾@>((>ӽ>>E( >=M{(>M>FM>M>Mz ( 2!o0$~>MMEHDCABKJbc][lmiI0PWXT/ >(ʽ(T˿TT>(@>@((0:(*>2~#"~ 2ɗ2?(02͌(;20202! - % :!:!o0$~#fo?>!( - % 0A: B: C: D: Dir Type *.* Stat Edit -BN0P -BI Xfer/v Xfer/c Debug Basic  CONPROC COM@ COMDUMP COM EDIT COM8 2228*U"*S^#V"!"9``ʚF2:`!~5~! w`}`4`cCONPROC version 01.07$Mis-matched CONPROC$INIT COMSTAT COM WRTSYS COMXFER COM`ʚͧʚ  ``2$$$$ CMD`A2ll `Z|ͭ203F' ; A>0, START BATCH ON DRIVE IN 'A' 003F'F1 POP PSW 0040'FE FF CPI -1 0MEMTEST COMCDOSGEN COMW !"#$FOR COM%&'()*+,-./01234FOR COME56789:;<=`>~ ` `o&6~`9_w#~0No` a=_`N\`Nl`<y.x.*Q~.#q#p*Ss#rË* <v*]FORLIB REL>?@ABCDEFGHIJKLMFORLIB REL4NOPQRSTLINK COM:UVWXYZ[\ROOTS FOR]:\8* Copyright 1978 CROMEMCO, INC.1*DM*]}o|g."! +#>{F+N* s#r x!p~~ʲͩʟ#ʎ~# Æ /ͩ>#Æ!N#~/ ~#!p!x6C#6O#6Mo`3``1ͭ̀¬̀̀v! F̀> @ STARTUP $STARTUP CMD1>ROOTS CMD^EXAMPLE FOR _`EXAMPLE CMDa_c* *] ~#œ*w# x¬* !o~6`!Program not found$Load error$! ^#V~/`=j #N#~!`N#.$  $$@ HH I @H$ A $  B $@* ! B   ÚK!htK!6=!htկ!%w##~+w! w#w#w#w! wK!>>!Z Files **** $K $ *****$ $ `d `{>  6#~+ o&#6$!}!A4+++"? _:A:R]BwBw!~! wËATRIBBYEDIRERARENSAVETYPE"W `\>?2h\`File already exists$\!|Fl!\ áCopyright (c) 1978 CROMEMCO, INC. @ (Batch) version 01.03 $ $$$$ CMDRELX CALL RELCD; AND FLAG RELOC. TYPE MOV"@ H B$HB A@@ BBA B@"HIv open error write error close error create error O>ɷ>!%4~#0_` !\>?#2 8`@YDErase all? $ Erase cancelled$\???$!m~ V+|V#|V\*?͸!A5ŽB:B*B parameter error$file error$incompatible witF\`File not found$!m~!HP@ 2VG#'\EW@R US+\` \`!~ ʜ*% x!ͳ~/#Ax@2By2~ #ROG:] !x >>>!%64~ #w+<4~#+wO< ~V``V)!DMF\`Bad disk block overwritten $``V+|‘\`V!0 h this CDOS$w# w# ɷ6 #=)m!y b b b b^m>@űOm!†|?2h!\`~w ~w~#^c!\>CDM=z!x ~#V!x ~#V!'+  '>'#s#r#~#ND+6#'y2*?6#6#6##c j !#N#F#~g>o N)) )O +":1! ]Invalid jump to location H ` xw# FI  $"t¸!&~+4·6¶4~#+>wO< qѷt2:ht O 6#<!%~# # ?6! w#p#q! 3 _bk## 6@w6++6#666w# _!~:#~ ʅ0O͍!¦œwO<  qѷʔ2:͈ʔOS^!)"`*"r2_ɯ>@1G x8 y8!(!"X2{>0 1S>0:{(!`S | !A8% xx xx xx xx xx xx ................ 8*% !\5]ʚ*H}*FDM#"F!Sڅ!›Ãµ#œ6#w#w++¶ÎRDRPUNLSTCONPRTDUM@w#6:#6.#6x !#N#F#~g>o Nʔ_> # _6! w#p#q! S bk## 6@w6++6#666* O 6#< !%~#2h:g " H !NS%7m;x+ H A 2^2d2w2b2g!"Z͂6 !J*HDM"H!]2##e9#E G>.'!] ! 0 T])))_ w#  6# p# !#~͟+:?~͟@##~͟!/ʎ=ʎ,ʎ(ʎ.t*ʂ#B7Ï# w# !~:#~ ʥ0ڥ!»ã#¼6#w#w++îRDRPUNLSTCONPRTDUM wk!>>!v open error write error close error create error >2h*`"m*r"o+)8>2c?E >2V>2Wy!S>2Vy#S>)2V>2Wy#SY:VkÍ>0Í> 2"`i|>-*/|x0 *w#"ɀ :%Copyright (c) 1978 CROMEMCO, INC. G !!!%"!S2z2q2b1!!"k!"i:] h!e !SN #B#>?…B! 6! 6a_ͳ/~ #«~! #ó! ~ ! ~# ~ #/~!#< @w#6:##6.##6x 2w# # 2O>ɷ2^!%4~#>^2>!%6T~,#w+\4~#+8wO<  ~vW:W<2W_]l:_( !S×>2w2v+o82hM >2h×:h +×*Z|ʗ͟ڗM >2^*Z#"ZM ͟#|/g}/oz{! *))))o0 x9yGBx0:w#+w#͍!y ʂ ʂ ʂ ^͍>@h!\!\:\ <22:l(2ͣ&bF#"T!~( #N*T~ #N*T#~ >!Copyright (c) 1978 CROMEMCO, INC. DUMP (Dump File) version 00.06 $ Record ELX CALLxxxx xx xx xx xx xx xx xx xx-xx xx 0×]!S>2g+:_ o0R:|ģ!h͌:h7M8M :h !h"t͟0 %]l!!"k!"i :h2z×]!S*r[`R+ʹ!S×]×>2^*Z#"Z:h *Z#"Z>2v:h 1:h ͟8>2h2hy ( ( ( 8͟8>2h2hy z *`"m*r"o!>- % = :h>2h82h2h7͟ y ]!A—:"r:h*m*`)(8*o>2h͎ 02h:h2h!g>#~ !hw#~O #:h!-S%:c!S>2g×h *Z#"Z:h( ͟ڗ:h ͟8>2h2hy ( ( ( M >2^*Z#"Z:h *Z#"Z>2v:h %:h ͟8>2hr!S!h"t8 " r:h *`z8{0N+"`*r|8}0N#"r7*Z+"Z|:w×:b(*\~ ɯ2bT :8ڗM ]!S>2g+:_ o0Rͣ:G:2x2&>2g×]l͙1r̀a (>ʧʧ_ʧ *Z+"Z1M ͟ڗ:h ͟8>2h2hy ( ( ( M >2w]*Z#"Z!!"k!"iM ͟8,8-:h ͟8>2h|(]!h͌\!h͛0>2wg8O0×!S%!h͌:h7!j ͌!j "eM8e:h2h*Z#"ZM >2d!h:h*r2h͟:h ͟8>2h2hy >2h ! 02hy :h*`>2h͟8" :h ͟8>2h2hy 2hy *Z+"Z%M ͟ڗ:h ͟8>2h2hy M :h *Z#"Z:h( ͟ڗ:h ͟8>2h2hy M :h q(2b> > :h *`z8{0)N+"`*r+"rq*r|8}0N#"r*`#"`q7Sy (u*\ (/(9 (@(_ 8 m!)(S#My^`(^(ʗʗjO yAOڗy  \ 2h͟8:h ͟8>2h2hy >2h2h͟>2h͙ a Ĕ2hy M ×!S%]!S!h(!h~ʗ_S(-~(#> 4!6T>2q !h! 6 ×2q×"t8͟>2hͬ8ڗ2hM *`"m*r"o:h !j "eͬ8͟ %>2w*Z#"Z:h(2M ͟0× :h ͟2h! 02h*kq#"k*i+"i| 7S+6+>w #~#<6r!h"t8Ͳ89Sy(,Ͳ ,:h>!b(×!S!bS !`1G]>2d!h͌*[r)( M8M +:_ 4o8*)R<*r[`R)8m!)(#@O`2b!  + )(&+ >G*\k!)(  # "\` 0r%  *2h͟>2h /\ ɯ2h͟>2hy ( (  pp\ *r2h͟8y (>2h>2h>>2w*Z]ͤ×<(1>:{ʤ=!l!<^#Vz(+s#r#^#VSXY!{5Y:{ !S%!l!<[Zs#r#[Xs#r!{4Y=(8>2h2hy M *Z͟8&:h ͟8>2h2hy z >2h*Z#"ZM *o! ڗ :h ͟8>2h2hy 2h!h"tͲ02h7:h )' [9 :h )Ô [î :h *r+q"r*`#q"`*r+[`)(:g !*`"m*r"o !S%]! ×>2w*Z|(!]ͤ8M ͱ×|:h(͟8y z ͟k6*k~(#"k7O*X~(#"X7*e~(#"e7O*t~(#"t7OS rYyN(n :^( *m"`*o! 8y ( 0<= =/(%F(I(N(R( S !h͌!h͌>> G0 ?:h7 S>2c2g7a O :h2hͲ02h:h>2hͲ02h͙- 2h͙# !"ZÙ 8!T])))O ͙8 0̀xOutput File Write Error Illegal Filename Cannot edit file; rename file BAKCOMREL New File $$$List of all Editor com File not found Room for more characters in buffer Save Buffer Full Use space bar to move across line; set tabs with "T"./ if not equal proceed with command ? print list of all editor commands !S>2|͕mh!?!!H?!?!O!X?!?!Htring O Obliterate text and reopen files +-nP move and Print a number of Pages Q Quit edit with no changes R "Z| 2h7͙8(( ̩Aͱ6> ͱ> w#!~0S#S'd >0B8< r*mands: nA Append lines of text to buffer +-B move pointer to Beginning/Bottom +-nC move pointer over Characters +-nD 1 2 3 4 5 6 7 12345678901234567890123456789012345678901234567890123456?!?O!??P!'͕2x:x(!:S \Read a file into the buffer +-nS Substitute one String for another +-nT Type lines of Text on console +-U set/release Uppr2h͟8y !]>2h! Gz {x)w#o$:z( a{ YS:h:_ =>2h Delete characters from buffer E End edit, close files, and Exit +-nF Find a string in buffer nG Get contents of the78901234567890123456789 Macros nested too deep CROMEMCO Text Editor version 00.10 *?All text now on Output File Cannot f%Copyright (c)1978, CROMEMCO, INC. 1@!.!F _A802!F _Y(UN(>02X>22_>2a@!I=(<2S!<~(ѧ7\P\>2S7Goodbye Rewinding file Type a command line to be executed by the M er case translate V Verify remaining buffer space W Write out text before pointer +-nX eXpunge words of text nY 8-8.O8":h ͟8>2h2hy 2h2h7!S>2_2h7!`:y `=(<2y!_<~(ѧ7:h* Save Buffer H close and reopen files at Head I Insert text before pointer +-nJ Jump the pointer over words +-nK Kind "End of Input File Text Buffer Full "-" not allowed in this command " not legal here Missing ">" No Directory Space !X:a<2a :_<2_M%>X> 2X> 22>2 @!: <2  :<2(%>[ vcommand. !Obliterate Text Buffer and rewind Input File (Y/N)? Discard Text Buffer, restore Input File, and quit EDITOR (Y/N)?Yank lines and put in Save Buffer Z set tab Zones +-n move pointer and type a line = if equal proceed with command r! 02h!:x<q:x<2xր 2xChw ww `2|P(>2yill lines of text +-nL move pointer over Lines of text +-M execute/set Multiple commands nN find Next occurrence of a s !@X3>04802d!*mInit~7#_.R:(!= :4!~͸% ͕͕͕*/|Ҙx0ʹ *w#"ɀí ʽ:®#|/g}/oz{! ))))o0 O҅H#^C!~¤õʾ~:$.:$w ‹*" :!O:$D:%O!Y1x KCopyright (c) 1978 CROMEMCO, INC. WRTSYS (Write System) version 00.10 $*% !~ #Z+/i#~2!lY2:l!\INITIALIZE DISKS version 00.04 Drive Number (A-D)? Mini Disk (Y/N)?  Error: Drive , Track , Sector , Status= ~(7##~# 807!. !04002xyGx0:w#+w#=o&)))))# ^#   OY_: obDMY1 K-bytes User RAM memory Y2:\:ʞ25FF open error$create error$read error$write error$re-read error$verify error$MCopyright (c) 1978 CROMEMCO, INC. STAT (System Status) version 00.06 $!9"41( .23:\x=_*|! mSeek$ K-bytes TOTAL disk space $ K-bytes disk space LEFT $00H not allocated $00H linked cluster $ $null fiSwap disk in drive and press any key $ $Illegal device specification$!"xg®R:S‘ &?0[> 2"`i|p>-͕͕ͮ  :ʟ2ôʫ͜®!5:ں2!"x®!5:!% :3_*4 No files on disk $!2%2$"":$<2$~:%<2%~~|+++~y:$1=:  *! î#yx :7ʮ=îSystem written and verified$~# \F#~ >x>)î*~#x@͕͑!G4O:[>  G:S:N>2N!Ug:H!9~ *JDM!;w x!A~ y!D~ 9  !UgN!g²:YRINo ambiguous files matched$! ͑:2!g!\z ͢ !^~@~w:V\!g:YR6E ;  4~#+ >wO<Q qѷ 2: :: o Q O \ 6#

! ~4Ҋþ:±>:4ҮþG! ^4G"*"͖ *J"J*H#"H:[C; :Qw>2[:Y:NN> aO:Oy:Rk͡!gz͡!Y>2Yp:Z!] ͑!] ~?I#":[K!\>$$$z ~ f!\:R]>$$$z ͢ !"H"J"L2N*E~  Ͱ !6; ; ¢ !. կ!%w##~+w! w#w#w#w! wͰ ! >>! = < d < d v% xI*! G |22|g>o "!\~#~ 22[!~N!+6  !~N6!~ #Àw#Èw# ‘ɷ6 #=Ú¥! 0 T])))_ð>0> 2D "E `i|>-% G    ~R62[:Qp:Rp>2[p:e!͑\\\!l͑!e6$#6$#6$\ICannot erase old #̀ :YI"E\z ͢ :\v!^~@v~w:Vv\> :Oʉ:XG:T x open error write error close error create error T O>ɷw £ !%4~#>£ w >!%6È~/’#~!ҋ̀"E2G2Y2Z!F#^#V#~¥:U!Tw!P!Ow:R!QNwy>2[AOTPCQVRSTFUXSRVIXZW!  *E /| G x00  *E w#"E ɀ8 $ 4 :D % L #|/g}/oz{! o ))))o\ 0 x~ yGfile$:WA*J*H+ej>)!lg#Q:OA*LQ T N failed compare $ length compare error $  x ͑ 9:P(x͑> ͑!G~( \͕!G6*L#"L:TY> ͕Æ:Ujx͕Æx u {͕Æ>^͑ ; ʙ ~q #w+á 4~#+} wO<Q ~ />#~>~ >~!*E\:] 42Z̀~=I#"E! ͑! ~?k#]>2Y} :YO͇ x0:w#+w# ! y ^ >@űO !   o N ͤ > #d  ä 60@WF:FO@pz@~y@> @>.¢{@z҃k>2G!-s!G-:G*N~wn͸ç!O"N2*N#~W~{#** ****  x%@ʌB!H-@!H-K!-P~ʃ{n!-0@!-Ԭ@>.@> @! w#p#q! ˜  bk## 6@w6++6#666w# !~:#~ 0 !$  ~2EW>2F@#~W:E02zͬ2O"N!G?͟!0p#6:#> w#w#&_w#W6 # l6 6 #nE>?@K1A>2AA;;"A"C  ~+ x;3*Co|g*AK1A4!q-!Pk6~!-: ʤs6{#{xs#!M!-ɗ>008>!DͶ Dʀ4>>(>0400Gƈ048W{24 z4>ȗ # 6#w#w++  RDRPUNLSTCONPRTDUMR @w#6:#h 6.#h 6x w w# h  w +Gw|?x€>+Gw|?x˜<À+G|?x¯>+G|?x<ïG|g}|#x >2G~#@.:@TTT!N -> @:!͇x:-:O@-!"."(.#">!Y2" !2"2 "!20"128"9e͸? 6ϗGOgoW_!>>!->EST disk version 00.06 CARDS: BANK: (BANK , CARD ) FAILED M1 TEST. This card appears in banks: **** ERROR HISTORY **x|G0Җ ))))o~# x  ڵ0 @w# x͸# x=&  ^ COPYRIGHT (C) 1978, CROMEMCO INC. __'O*,)Y)))** *****#*+*1*9*A*H*T,1^͜ _Yy f "*:w# 6K>6#####q#p#w ƀwK>4*:|*4(!<[ K8>nf|But####(&("1 (4w#x( 6#x(+ ~ ( #>1 > 1 >1   $[R Ouectory space $G >2  \0  Input file not found $[ = \" 2eCf: \=7(<2Enter "S" for standard function key decoding "N" for no function key decoding "U" for user defined function key de*\! *$ R0S$ *$ "\h : Z GO(!Z gZ oZ 8! Z 8w#Z 7i Wi ؂h 08 880 **** End of job **** $ *0####^#~>.. { :] ! S U CDOSGEN version $ $|}=R ̉ (S >SYSͲ *,:(*.n*0$K n*4K n*8K:n Enter output file name - x~͌ # * [ t of memory $*6[4R" *2[0R%" ͪ*2 [0K * *6[4K * [&K 6*0N#F* DM[(6* [  ! ~7?: ! w: <2 ր 42 :] * #" +:\G\(   Disk write error $: (>͌ :] coding "F" for file defined function key decoding ?  ̉ (S >COM *\"8!<͟8sr##[8R":r  Illegal hex file $*\6#*RDM%    %  =    <  80. B (R ܉ 8?D ܉ 8!@~/w /w#| +" Memory size (3FFF - FFFF) ?  !(R ܉ 8D ܉ 8[:+"* [ [:"!^#V#% ^#V#N#F`i> . > . ~   :  Starting address of CDOS - Last addr[:}($L[*J*0^#V+$!\*0N* [ [: 8 (  yO * #R" [ " [ " CDOS too l\Ʌo$R!\6 66  (u u >^1 @u u > u > u u u u > 1 _s##Enter filename - h 8 ( w# 6# #*\"8!<csr##[8R": a{_. _ R+B?!m 8 ))))o0$= 70:8 _AG?}2̓ &A-(&|2 (_L( Sĉ ' |2% How many disk drives (1-4) ? DRIVE X type (S - smalless of CDOS - Starting address of I/O drivers - CDOS size (max = 1980H) - *4"\" ! *\" "6ͼ >HEX & 8?*arge $N0OG }|+|(#*,?*. q#p*,S*. q*0^V*0$"[ n f "n  Enter decoding for functions $ F1: F2: F3: F4: F5: F6: F7: F8: F9:F10:F11:F12:F13:F14:F15:F16:j % ((*_0ɗ % *** Error, re-enter *** G :] !" :\G2  \\   \No dir, L - large) - DRIVE X = SMALL DISK x$->|2HB% DRIVE X = LARGE DISK ~ _SUF=Nĉ Y!":   (([ R<<<[  w# * [ R<<<[ "\G7ͼ >HEX *\"$ & 8  >@>!4!>0400 {2_{_!9~ɀ@ w/w>+XN!/w lqѯdXNO.R6#####6@#6#6#6 šq e0x lxO>:{ lEU>: lE>:!z~el|’l1"2Åa_`! # ¸w#w#w#ͱ?w#6>#w<! 6SYS DIR>ew#;6> 1978 CROMEMCO, INC. 1͉P̀th !|2}2!G1!"]>2\ vBad or missing console processor$x=¼ l}# ?#Gxʡ< ? G: x lE`"k3>4>048 «400 {8>_>@>14!> 0400 {26#>6#=¶͜"!mG~U+! ~.Rw#N##~凇. Rw##~#p#q#* ~͹wa2* >w#s#rq*s#r*s#r: l} lE͜q e#;ͅ@‹ ! ~^ 6! 4ͮʋ !~=!   y >>c >! 4>> !  CONPROC COM lGt!9dl}1"l}O!!y4O ^#V!Ëd͡ * wh?G~G$ ~?` `$h=t lz}*k l} lý`~ 3>4>048 «400 {8>] 9 w#!!~U~=͉ !   >c ѷ> ! ~! ~<! 4>> 6 > ! 4ͮ ;>d~͉l}/l͋l"fl^#V"n!QGÛIllegal system call H at H *s#r#s#r#q#p#s#r*N#F#N#F#N#F#^#V6 ~=͉<O#~# ¸ͅÔ`!͎œ~ʜ # ?w#ͅ`HG͎ʜ~#fo. R~. ëd *N þ6# p# ~D#~ͨ+:~ͨ@##~ͨ!D/D=D,D.(*6#)))))=?_O͜dͨ ~#zW>#ͨ=z>ZA{_ͨGd.R~#fo{O ~74 o&.R^T~_DM͜  l[ O|/g}/o#! >>C#>O#>M* q#pl* pv).3y _WIN8dEYK_ve0 T X n 3 W  m? ;${:= * sC lyy,wͅ`em> l}~ʀ ͱr>x=WQ6# ;w#˜ CDOS version . Copyright7E# #>?;! 6! 6tDMtt͎ |e͡~ҟ~͡~ʟÎ  v ;6T]# ~?# ¶ 6ͮ?* s#r+!*}| v ~ʹ # ! Gò-Program too bigv? ; press any key to continue .R͔͔͔͔͔͔͔ ͔"͔$͔0͔2͔4͔@͔B͔D͔P͔RDM !.% j:J=& ?&!X. Z^#V*H:JOɷd%?j>2:KA22%2T!çz2/{2;y2Gh&))) zʹ +x; ͌ ~ ܌ ù ͛ ~{ ͙ ġ ¼ zB +> n > ʹ z6l#r{p#x{ ù >^ʹ @ô >ʹ > ʹ >ô >\ä 2 Rx224| |>(>040Ù>0>@ \40140048 4002BW2ƈ_z s#r*6 !l|vv~6*T~k X6 T /– Tʄ X̃wV ͳ ͳͲ_^#Vxw# þ.> xGyOzW{_-zz/W{/_DM!>yOxG}o|g=|W}_G!Gb!Lç Seek Write Read Home Read-After-Write Logical disk error H, Drive , Block H Error: Dr>/ʹ ʹ ʹ > ʹ > ô V >ÓÛTX p  ',y`yÈy| vqy2Ny2PPY e2N l4{W2ƨ_z4{048 64002 o048x4:3O:2*N###~1: "~:>(>04002( XwÜ 6V !T  6 6!U 6 nb>_>    `:T " V ̈́ ͈`iW/zS0:__~%zʹ {ô ~Tʹ #G##;+;##Gvs#rv~#fo* !~4w!|Ó 4ive , Track , Sector , Status= Drive not ready X _!R̍ʳ!I̍„Cb!.>*N*P+ lE lO*N_*Lx<!#=xp"Ny2Jx2K"H"!x>jd*N.->o>0400@ \:O:W:_>*NF::~@(:w>*3O:G7G:g : >  4͙ ͙ Q Q Q Q Q ô {ô V ~>lX pV ~ʚ xo {|V ~ʚ ̈́ʅ {È:........" 4........B 4........b 4........j(49MW\?:|2nore Continue      .ZN#F.R~jO:GG. Z^#V l>A2 ! GXRemove disk in drive H!A $@D ! ! B@H@"B @ @H   !BID"@D@R^#V"L.R~2G:J>j.Z^*U}.Zf:J .ZN#Fx k& +^& :GG.Z^#VF4!b>24/ >ɯ42Hx24B>!b>+}      {2$ʹ ç ^#s#͙ G ͯ ù  { ͯ zʹ l##~{ # ù  { ̓ù  { ͯ ló " _" " Wyʨ=;:|)O:|::}2y(\O=;:}O:}2x2{2z2c2"y(l%>@> y y>O  "D@"A A" "D @ $@@A" @H !"A@$@ !@@ B ESLAF.EURTITCNUF=RRE=DNE=CERNIAM$TINI$FOLine:ADD (HLADDAND ģAND ŦAND (HLANDCALL/CP?CCƸCP ¾CP (HLCPADD HL,D #RETUE VREALAREWIG >BSTOP SUBRIObWRITO #GSPACKDATOINUNSIOLEPRECISIODEILVALENCRNAATIOGECARAͨRNOUTIN@>J(>>>g( >=o{(>o>Fo>o>oz (  KEEPPNISBADNGISDELBDPXEDGOLD01GOLDNISDSI  $ " $@ $" $A"@@@I !I!$$!BA$HHB ! H $I$DD! B "D$ B$!A !)ADD HL,H+DEC H=DEC ooEHDCABKJbc][lmiI0PWXT/ >((T˿TT>(@>@(OCDTRQSDNATAD2NATADDOMD0I$ 1I$ 2I$ 3I$ 1XAMD1NIMD0NIMA 1NIMADA$! ""I BB@@B!$"""""""" H@" "@OR OR ijOR ORzLD A,{LD A,}LD A,~LD A,(HL|LD A,xLD A,GLD B,DLD B,MLD C,TLD D,]LD E,gLD H,`LD H,eLD H,fLD H,(HL#"*"x!#w x""2<2<2U.'>Tb>Obt'>B / *}"~G:€/O! O 3 ʼJR:(*>2~#"~ 2ɗ2a(R2ͮ(;2R2R2! - % :!:!(o0$~#foa>! 0NIM1NIM1XAM0XAM1XAMA 0XAMA ASSI 7BACK >BBYTEABLOCI CALL COMM  CONT ? DATA BHA@    B@" @@ $A @PA: B: C:iLD L,oLD L,kLD L,lLD L,wLD (HL),rLD (HL),sLD (HL),>LD A.LD LOR ȵOR ̶OR (HLJP (HLPOP HPUSH HRLRRRERLC*~/O "*͒ _"p:2a2go"]W: :=*+~G:€#O:=y_y_:  J - % RUUUU@ A @B$H $   DIMEyDOUBAENCO# ENDF& >BEQUI)jEXTE0DECO# FORM4 FUNC6TbGOTO IF( INTE:ALOGI=APAUS@ PROGARREADD D: Dir Type *.* Stat Edit -BN0P -BI Xfer/v Xfer/c Debug Basic IJ2go !) HHSBC SBC ȞSBCSUB (HLSUB"LD2LDSUB EX DE,H̯XOR XOR (HLXOR  ;@:* ͒ :*:5:P(5 *#3 :/ @ Oɯ2o<2b2R!2"Y!g -"8n ":' !  "*"z'"ͼbz'"y*":P,z'*"{äbA*8@:*8@:QIT 22QI*"8@>DÁ]>sOD*K> d::*|*ʢ *"*"::=*|ʿ ::*"|}2: Q> 2:283B!9B*6+"6|*"*~^o~^~^++++:G~^~^++V+^*͒ ^###*]":2!"*"*]"_: ʿ:OB:P,B *|}!""""> !w#¯ /& 2o>2>2>2U"tʹ:a : < :P(_b*t">Q*"####"]2;# #:=u**]*####͒ ~_2Z*">*"2Z:=:*"͹! ͹*d];! ͹ -- Bytes: Created: 28-Feb-79 ͏V͏V*!"[͟:<: bCMC[2͛282W !]l6#͒ ͒ b> ͠W͵#:a|*<2og'>=b͂ͱìbA*8@QI:*{8@2>D*y8@=„>>B:4C>B>>B:4C>:8!:d=~d:85~s :/!ͤD!6B*;+"=ʫ2:ښ0 0**""0:҄*8@*"*8@:====(=5*B"U"**!"*p++V+^"]s#r>2aW:P, /B >/b: !~w Ú'AC >2>oB>B>B>gB>S>C>KOC >:һ:2*####*]" ʉ҉*####~@wډ ҡ!~#>2Ï*Vu""`i"**͒ u~ *"}!x~# x *"""!@"f!X"!"h! "!("X!2"j!J"!"!c""w""!"`FBì>BQI:T >B>{B>B>zB>B>*"]>2a=2!&J*w*]DM!"w*"xw# x"!" *;| :P,, *!9͒ *E>/b_^2:P B ,ʾ 2oþ !9*+͒ lV+^+8@b~++V+^*]"]""6DM*B"*+"|**]**P*"|*"!" *|!:mY2b!"4#!"?#*͒ :º :aʪ ʲ !"]|2a*]|º >2Wj*!"6+9""E#:a= :b  5*`:P( :P,'++V+^V&|<*.|&~w>++++|<͒ &*͒ &*`i͒ & *]ڟ~7++V+^8@:*l:aORTRAN-80 v. 03.21 Copyright 1978 (C) By MicrosofCromemco FORTRAN 1978 v. 03.2~# ʹ :P( !"-MB !">,y8@:=*{8@>25>D>B*y8@:<4C>î:=a>D>GB*y8@>2QI>B>xBì:=<*y8@J>B*{8@>2:2:*] :a=ͧ] b^:'͊VͶ@cV:ab>2a*"]"WzBq|G||qqɯO_yWʹ_:ʨ&:ʞ!ʞ@3 "?*"*]*?]"A*4|*͒ *A|:P,v͝U:B j*"4:a2C:a== >/b' &:! @/3 >2!";͘ Zw Xw !6' 2o:=s : :s *";|2 k's *]b+DM*p:a=ȯgoɯ!8@:ʯ7:aʚ*]:bo&Ê*":o*͒ V: ;@=:ʿ!~+~wUmY !6$+p+q>2>2:*U}P28@:S *, F+N *$Bo ** F+N DM*"B*( F+N :b=D>î*]|ʜ:>2W> Q**w"]DM! "*"+w+x#"wÁ]>Q*"w#w*#s#r#" *A*]"]:C}2aW*4++++F+N*ps#r`i"pW*?*]"E*p"G**4͒ :C=i>2C*4"8@!"A*]’͊VͶͧ;!͹4C*G+V+^+8@:'¾͊VͶͧ;!͹2e!:]h>2>2g"-]"+a":!2o:!Q!.!> 22>2*|*!*}#"">2=2U5*"*_^[BþQ*"[BU~::P gv /2[ E E2[E:b<2Ø':=@Q G'&y:=#Q'#y Eѯ{~0_:lk<͂#n!~wMA*E]"]|*A*E]"Eb*]*G+~+DM~+ngʬ͒ `ir+s*G*p"G"p>2aW"p"Gw~#d<2">2>2U2>2aW!N#F ͨ ! Cw+.:'X͊VͶͧ;> eV!+~4C]PʬØ'!ͨ fP{͎>.b͎>U>2>:<7>'AC<2o{AC:<$x'AC$<{{GgoACOT]))!*|!":0-*B":ʱ 2o͎Bô  ڐ">2:!<2o:PNʩ!>s!3 "!3 !>22>2=2*|+:_^go"w*+"|Z:`=2͝U^:¾͝Uþ+mY:+*|+mYf:Pڊ7U>'b͑':=m>!l6 #=¤ɯ2Q<Ý';iU:ɯ222og"0"2͘ 2 OG: 22<2>2y͏V>? >%eV!͹:%*[;+!͹> eV!7=d!M4:eV!k#~ T~ heV#[͏V2ک*#"**ww+{:P b*"Mʹ"]##>2a2*"pW:P,ʛ"͝U2K:o:P a{ 2PA[ 0)0_jyf:'ª*"*_^>Ý'%!"-M͵#:*"""Ø'K2B :-MgW>ͽD t'<2ñ .!!xe!yH!2>2=2*|*!*}!*|!":0-´ mô !14!!3~!!!w:P0(ʗ,ʾ)ʾþ:ҩdR2þ>2!4:P(![454:=E!":E Ex*"#"2[Eʹ.ʯ!:"y' 2=2>2:0 :8 y+ʼ -ʼ xڱ yZH Xz 'w K*|*!*"2<2<2ñ 2o!6y"*"G2o2x<͟:P `Û*d#"d!\C~#eVɯ>Q*#|+*͒ ;@G:Z*w:+w*+r+s+":<7=:PG!o~6xQ!^4!~ 32P:>//ͨUC<!6  6> /:k*&>2>2:2-M>B>2.:P,.:ʘ'B -M2.go9"G>(b͵#:.N`*$:P,6͝U:.ͼbg'QI:vT 2GC :'!!wg":1!3~ʙ"/22:"!25Z#͂#ø"!3~#"5`#3B`#`#o#!2>wҸ"!4`#3B`#o Æ *p8@*]|*|8@,]!"]͊*>2:L:'W>2'ͻD*"]Wb:'u* b^:PACfIڋ Oҋ 5>2!yʸ w+Җ $ʖ >2[B:u20:02P2oñ !6:!24͑#ͪ :P02o#`#>2x]+~2G+~*####͒ 2oɷ222[go"ʵ=´:ʴ:ʨ* b^:WwACk!:H"*a2*("**"*,"*""W8@>2W;@>,!5:<2xa5-MgW͵#*"ͼb͵#*"ͼb͵#*" #3B>͠#o#=#`#`#`#ø"ͪ >2o#9#>2!24!! :0-?:o:2g"Ü!͘ Ü!!~w+f#!w#x'==':==z'ʍ'>2Q2^-2'2'2'2'2'2'2'2'<2'-ů2'|/#(_/( >.>2'!'S/> 2(2 (2(y,2'h.:'2'|/)(:'u.&(_/(:(2%s:P=4&q&:P,-%*;#|D& %:P()&:a#&@:G:.#&O!&*:*"" &>2*$%y%%") &")#!~w#ˆ#3B͂#͂#o#Â#!~w+¨# ¢#.':ʹ#:aoz'2)J*h"=";""!:P,0$%$.RELCRFPRN' 2'’.:'@2'!'S/y=7|/ 7_/(. 7!'S/:'!'3/!':'.'&(> =.3/:'.:'.:'2y*&%%*"2=Ê&!=6Ô%bÑ%dR!=6Î%*;#|A&t͂*"DM*;*]++Vp+^q";>͝U!=6Ô%:=&:2=*'͊-$:P="$23Bgo)JB$:'*)J:P,Œ$>s!̈́$X$!4.'"=5$!̈́$n$!4.'";5$!̈́$$%!4͑'"'2ͥ1ͻ1*'##:'2'G!{ 7( ~M/M/w# C/ #C/ w#V/:'! (~ z/w#p/ͷ0"8%Ͳ&2=>8@>!x&*8͒ ʚ&x&:=*!6$+6I+0w>2>2U>2=8@*2>(b:a2!(:  ':P5$3 :ʨ$*=&J*;&J*&J*DMxRʸ$W$2:$5$:$!HO 2!|2="8";͝U:P,$$ (%|:7>Ÿ/x|/W1G/Ox=/y@2(Է0x ڭ/ ( 0W1ô/T/W1T7W1Y7ß/L/W1S7W1T7>ß/R7W1D7R 'z' '͓s#r#:<2'':P,&͝U8@͘ Q'01'!w+U'A'n2>2>2Uz':=͑'j';=ʆ?Command error?FILE NOT FOUND?CAN'T ENTER FILE~n1#÷-!--!--!-ͷ--"(*+++"'*(:'2'*'0:4- % %*;#|%t-MDN B s>2o;y%>(b**]xY%~w++++ E%*;"**]";> >2=-%ʆ%= 7>ß/> 06 #=0y.2'̷0 (x20?0W130y/yW1LX02'W1O@0Nc02'Q0On02'Q0Ry02'Q0C‡02QuantitIllegal Hollerith ConstuctioBackwards DO referencIllegal Statement Function NamIllegal Character for SyntaStatement r MisspelleIllegal Statement CompletioIllegal DO NestinIllegal Data ConstanMissing NamIllegal Procedure NamInvalid DATA CoverfloDivision by ZerArray Name ExpecteIllegal Argument to ENCODE/DECODcV:'ˆ;|c;}c;G:'Ÿ;xz;xz;0:)0)'20)'O2:'K/:'X2>]3*,(.('2.('O2|}2ƀ)`i-3> 2> 2> 2:'K/:List for Unformatted WRITNon-Integer ExpressioOperand Mode Not Compatible with OperatoMixing of Operand Modes Not AlloweMiss'2'Q0M’02'Q0I02'Q0Z©02'Q0P7:'<2'Q0W1[000A0:0ú0O!~6G1#~ 003-x+#1~is out of SequencMissing Integer QuantitInvalid Logical OperatoIllegal Item in Type DeclaratioPremature End Of File on inputnstant or Repeat FactoIncorrect Number of DATA ConstantIncorrect Integer ConstanInvalid Statement NumbeNot a Variable NamIleVeVÓ;)))z; Ž;`Ñ;*O;>'eV*O;>"ò;<>N#F# ;<33;O=;;y;7yz;;'!4 =-3!.(>!'-3:'K/:'m1*,(|=R3#",(-(ing Integer VariablMissing Statement Number on FORMAZero Repeat FactoZero Format ValuFormat Nest Too DeeStatement Number no02'=1 vers. 03.21$2':'011 ͛1>*n1 2-> n1:3-!4-"-o>g6 #> w~# W1 W1 •1#"-_ devicIllegal Mixed Mode OperatioFunction Call with No ParameterStack OverfloIllegal Statement Following Logical IƀDuplicatlegal Logical Form OperatoData Pool Overflow; Out of MemorLiteral String is too largInvalid Data List Element in I/UnbalanceO;> eV>(eV;>)eVcV:*[<**]*8@<*]]|>+L<>-eVBO;8@:>/eV=•<>[eV:O/_!w:'<ʀ14*0+|̥3#"0+1+Ó12+>'=3!=ª3!>3_!' 3 3<3~=w4{ 4> 2~t FORMAT AssociateInvalid Statement Number UsagNo Path to this StatemenMissing Do TerminatioCode Output in BLOCK DATUndefin*-+~ #0#"-+~7ȷ> n1> n10)!".)!':'1.(!",(!':'1~1!2<-!2<-e Statement LabeIllegal DO TerminatioBlock Name = Procedure NamArray Name MisusCOMMON Name UsagWrong Number of SubscriptArd DO NesIdentifier Too LonIllegal OperatoMismatched ParenthesiConsecutive OperatorImproper Subscript SyntaIllegal Integer cV~c;# }<>]eVü/eV>LeV:O!~eV+ <:XHҏV n1!G4ͷ-͛1DISK FULLIllegal Statement NumbeStatement Unrecognizable oed Labels Have OccurreRETURN in a Main PrograSTATUS Error on REAInvalid Operand UsagFunction with no ParameteHex Constant O!"0+2+!'~11 w#*2w'X22+:'K/:' 2> 2>2*.ray Multiply EQUIVALENCEd Within a GrouMultiple EQUIVALENCE of COMMOCOMMON Base LowereNon-COMMON Variable in BLOCK DATEmpty  bC*w!c͒ =:b*=*|==*|9=:QL=:F=VL=XE 2G͚b===œ=:*]| :w=bC:'CBMCy :GW>͢C!FMC+—CW>ʲC_x¬CGxGL²C*|*͒ C*͒ C"">/B>&J*͒ )"{^#V#>!>!>&2E*A/B0G:E=AAx=ʋA=ʔA/BxʑAʎA/B2o:2>s!3 B>sNO*͒ B2>}B;H~@!FpOC *" =H;HJ:0OTàI7:aNHKKZHK>wB>BK>sB>#B>rBO>ʂH >ʂH Area Length Bytes Subroutines Referenced: Variables: COMMON Length Labels: Warning(s) Issued Fatal Erro*F:=Fx=>=B>!F>B:4CT 2xG: ;FE>)]E!^F:ȷo =r l 2**f͒ ʩF*×F:=ʇFʇF=͊VͶͧ;cV*:äD͠bS===<2G:a͟!l:Gw#¶=:a*]|:=bC͊V!]?͹* &J>&J**͒ C*͒ ^D**͒ HD*>&J>&J**͒ "C**͒ yD*>&J*CD>&J*:EVb͍U2P2o!B"ʹ:E2W:P(_Æ ! z'D:OBT !N#F B :P.ʎB*B!~B+nB2ÊB)>G:=H:!ʟHx@JBʩHT 2>BWI:ʿHT H>|BDB>gB>}BoB:!x!F~H:x!FT 2>|r(s) Detected :a=*]¼;<2A**p8@"<8@>+eVO;"*#|+*͒ ~2G~2+~O2~82~2a+V+^"]+V+^=T F **j͒ ʩF*͒ xF=Fx==QI==F*8@QIJ2FJx=AF=MF=SF=DFE:9!T͹͚b*>$>:a$>*]|$><"<͠b >͊V!?͹2A͚ba>G>[>:*[><"͊V:Aʑ>!?͹͚bڑ>‹><*͒ “D*>&J*͒ kD*>&J/O ~4C=#­D>!c~#*r+sxB4C4C>B>B>oB>B>B>gBQI~2#~2>s !3 ʾB+++™B*:]>_:P.~B.~BïB*~B2o~B`iɯog2GBB:4C>gB>}BB:4C>oB* *͒ II+" 2>TB>]B>B~I:2* *͒ " ~I:a:yI>B=I:+"p͘ !w+‹@y°@*]"+~2+V+^"]:<@>2b:*]*p*2.:* "V+^+8@:a*@*7.GBF>{B>B>oB>zB>B>gB:pG!jGx=eGjG>>×HT 2:¡G:ʍG"<*] <͏V͠bt>͊V:G>!?͹͚b>><"<:a>cV*]:'>ͬ;>:̬;ļ;͠bҤ>>2*d|>͏V>%eV;!?͹*|GG:=IG:=tFIF:=ʿFʿF=}E2xvE*B|LE͒ kEM>#]E###|+++kE}/+B ]E>JG=*6E!:'BC:'BC!x# C~#CC͊VͶͧ;cV͹BCG:'BCxc;G*#"LxGL PC*****LA>͢CyډC>͢CCMŽIK2:ҬIJL:0O*  " :=I::aIKK>~BKK>~B>#B>fB>oB:J:>B>>B:4 s#r#=@:!.=EA=~&AG*AGEA!%x;ATADA++TA78@"p"]V+^%s#r*ͅA"̈́A"̈́A"̈́A"ÿ́AͬIT 2F*I:GT 2G!:GµGGF~FWIFO~2y@OC FqH:!~HG6T GH:H?͏V>?eV;!?͹2* bC:b@?:C?* 8@bCbC*Y|ʿ LM? Program Unit Length Bytes Data ~E=²Ex²E+²E:©E>eB>.B4C2>gÝE:GT 2G+~Ex==QI==*¹F*IF=Ex=:0Fx=F C>!*B:'O;EBCBC:aKK"DKB*#|RJ;@RJ:'RJ͂J"<̝J*]:a K=KJ:=J=J:'J:=J:P=’PKP=ʽP=N*8@:aʰP>)JýPK>DB>MBK8@:2:aP**͒ P>>B:4C>)JQ>B*e )M*͒ ҚN~*"m6M:a»N*#"e>!D>BK>B}PO>BL*:'̼;EMCMC*##"ýP*"ͱ6M*"4(%">2PU">2PU8@*b%">2PU*gB%">2PU8@>T!"**͒ iU{U2*͒ ){U2)8@¯L>`B>iBL>"&J*|ʫL8@*"]W8@>>B4CL>!&JTA ×L*M"]##"M>2=2a!*]| :!M:'M*:bÂR͝U:8@@jT*b"I!"K*I!g N#FB*K"K!( N#FBs#r!\ ^#V*h͒ ʕS%"*!\ ^#V">2J:O!J~ʔJ#‰J>(eV>)eV:2!Jʹ"!Jù2":*,,HJ** ͒ J*|222U>2a*"]W>)J! >22U>)J*|8@:'pQ:*"]W8@!N!O:D=BN U= >/B>)JÿO:!O>/B>}B>/B>oB>=‹U:>ȯ:222oß>)b[B!6*[#"[!> 2 :U͊V̈́3U U UUV*[;cVV̈́3V> 2M###_^M *b^bC*_^:)MbC*!**͒ ^M*""!"T"U8@2G2+V+^+++""xPU#|ʕS+">2PUy!MʵS!  N#F*IB"I#S8@*K|>T:aS*%"*#|S*"S>2PU8@2KT*"*Kͧ]J*"]!:vVwWx)KBCBCzJJAMC*##"MC;@!4~bK*=O! s#r~K***8@~K8@":ax2 :'<ʭQ:O!~n1+ šQ> n1> n1y2bC:bC*8@O* *͒ *""qO!ml y:W! ͛|B>/B>gB!O:2I=ʘI=IØI:ʷOT 2>BK:OT 2>B>O2:a!OKK;@D2.*"w V eV9V̈́3U eV+VV U U TV> w#xPCVUw ™VʨU2P> :qVæV:'ʆVͦV:'N;N ON O&ONʎOcOgWN ¾M>B>?B=M>=B>B>4C=M>B>4C=M>B=M>=B>B>4C>BK*]">*2>2>2:a*pU2a=1T*"p"]WU2*#|eT>2*":2PU*"2:ʨT*`"*,%"ʓK:'ʩKKÖKK>"B*##"J* b^RJ*"*_^*8@:aK>)JKK>B*8@:aK>!>*>:>2>")J !w#Rr>s (R͒ BR+͒ >R <.RHR}QSR2͌Q>2Q:P B YR*:2M>2!""+"B~^6M~ʐ^ʐ^ 'Pڐ^xoP<*]:G:.xHP:>D:.fP2>2aW*]*++r+sÐ^*<†Vn1:X> eV> eV#>OU> _V!X V4~²V5> 42 V6ýV ڽVüV:VVØ': V* "-M>B>4C>B>2O)J**͒ /N6M*m"8@ÚN;@zN!~tN**͒ ~+FtNtNxtNw! 5QI6M*>2PU*k%">2PU*$">2PU**^"**%">2PU#|T+">2PU*i%">2PU*"">2PU**\"*!:-MgW)J7LxLx!Y~w#47L:Y]3!"Y:*c"]2go"cL:KG:b*L>"&JʗL>BL>"&J=ʗL*h!\ s#r!( s#r!g s#rz':=R:R*!( s#rg'*!\ s#r:P+R-R2o͓*+!g s#ry!MSͼ !N:*w:aG:!+w+*]r+s+*pr+s+w+ 9W:<LW>2b:*r+s*]++r+s:==‚W:}W>**͡]*͠]*͠]*y͠]*{s#r#*r*p͒ *"r8@bC8@*:G:w#:w*s#r}o|g͍U>s*| `"*Z2Ó[!:wñZ@]ñZ**][~ [[!O F~wúZ@]:2:\*">22ñZ*####~wúZ:22*"02͍U,B ]ûa]:<2o:>*ʻab>2 >:iY>22ʹqb2 >2aW*"y*++++~_!~!!w:Y*++++"o]!2x vY…Y!~w*w*͒ …Y2ͻ\:Z 7Z:Y@]\]ͻ\:!P6(͊PL>=b!6 ,!6-M8@:!f`@`a`:O`O`T f`:@OC f`>}B!c"bA*8@*"]:2aB>}B>B>B>B>4C>BW!~µW4Q}Q*"2!0w W5-M*͒ ~!iY*|W:0 W:W:QW"!C~ ^M^# ^N#~#^#V" F^!3 <=[^#5^͠W*3͒ ^e x>k^2v*""bC"24:=#\:c\:]-]]!44*####"*++++͒ I\ͻ\:!2\*0":4\\ͻ\WZ24<\***͒ v\>#\͒ #\ ͌QbC: ”b:͊B *}8@*:/O "*͒ ?;@>,b>(!P~:bo&:@:/!"^#V#<w*|ʺZ55ͻ\:!ʦY:Z[WZ [:=V[ڈ[ڱZʓ[=ʱZڱZʙ[:ʌZ::{2:|2*y"pW *"*w͒ l`!c"w"*R#"R>BB !9*͒ !"! 6%ma(a.':a`*"*͒ +X:+X*!"-M"gW>ͽD:0ڤX:ҙX͚bVXPX*]bC͠b>X͚b|XvXvX**p͒ X5͠bYX9L*"*"ã^***]++++*#͒ ^++~¡^+~¢^###*]"ѯ*Q*#s#r"**]͒ -M:P \o]x2y2*~22##^#V*"͒ 8@=:<2*####"̓\"*":2:2:2Ã\*"> 2)\**B_!~2:!2W:0±XͻD*28@:02*c|ʤX:¤X-M*c"]2go"cLäX:avX*"!"E2O*E*]]|Y_f*|`*w"c͒ `bA**͒ =_DM_:H_-M:s_*c|s_"]22go"cL2Q2x€_4_##s#rû\*####~w]**#####:w#s#r*":2:2**""!Fwp!FwpG*>রw*>G#N!X~*":-]*"\2*"*kb  *͒ %[*:G*~w#:w#s#rZ:b[>2:ʱZ!>w=ʱZ**͒ ڱ!"aEND/> ͠W<͍U:G2)b(b,b/]=¶a]͍U:P,ʹ:P=a:Œ_> ͠W:GY"Eb]:O*Y*C]|2Y2Y>2O"CX*E*"E*C">2a*]*E]"]WKYvX> e]2:2`i"́]g*:aʠ_ʠ_}>2W>͠W*"]!a6W:! "ʹ*"*]"*a":2{:2|*p"yͤ:P,_!_"2 ѐhzR >a1~JaIZX]eXNWN rS (BB `&s3S(syMZ;qDhtZ1sTfBm(8$MFMbDDc%8$MU3@:gٰ+4 ڔ 4eW0@+4 k4hC@`f!u2 P5 V2͢@rå@ |>N0Z~&r~&ZH~$$} vc0QTRTBDd$MMFBD38x$DSQR2RDDX$MAF$DPPFRE5T$iQQӡTE4tt)5Y c tH2 Qc 5YI2 P̣"MpPDD%98t" )iNg z@ҮР^iD LFBHT8@@ 2fi[!l4 uUUz@h!T@43@h!RDEhh$DFLRRDEɰ$NURDDDhx$DF42E5X$SAFBDDc($DPLX2DYU`2DU( FDBLEXPGG"*t"GC"T #2`%X3Iӑc/A!38Ṣ4A%<32I#2AA3TQ92 L,@563Uc)93Dc3BDD( $DIVF2DXɀ$DPLXbDD3(ɰ$SUbDED$cP$MUbDDs(ʘ$ERR2D49QRSaTDԔXt&@0@Ɍ2DX$MFMUSdDD)@h,r 4z*4zh-*^!6<_Ta!T3hx BY4f4f3k̀3@"`04} 03l Qc- 5V3( P.@A!2I+ 2Ic,QT!TE5%I0t)*3@C@}> |z@h4 Dz¢3B!0" 562 P%520*8Y4a`+68Y4 B2hʬ@W!U8Y` ! @+$ATRfH wdT)" 9e E1""zjdt"$#FO!""Ld"($FH1"" r e,")F@!"j2le& #M"rd)F1"  9V2 /A1b2 0A1f3c153"I6`=93<Uc4 ME3NUT5I3r Q7i30IU6I#`A!2<IU$ AA2HIQ$2TUc&AA2 T(52vITS!DDIpt"&5Y2h bDd$x$MFMBE4hh$NUbDED$dʠ$DTBF8BDhɸ$MFARDDd(H$DCMP0bDDu#$MURD$s(`$ERRRDDX`d"($FA" d(")@@!"j2lSbDE4QM%:ki)0 Hb 4f 3@h!4zpfbDd$x $DAC0RD$s($ATIBDdȈ$SAFbDD4 T bDD4U =5BjtĈi H` inʦ@ 6'e<- @2" qQUSTDDQ9P5#5> Bm>p> `V>EiQ8c>Ӑ?*iFc1L? RT?@5U12IQ7=YpDDyxt"&'@UR\ B3@h!h6j4 B3@.3@3@3@h BDd0$MVARGBE4h`$DPHFRDEȐ$DIVF2DX$DFLRRDE$MULFBDhHDLOGbDDUˀ$ZAC2DȠ$CC2D4ȸ$XARACBDh$ARGV bDDUQaBk:  HbU/N z{m醢tB r@q `V"`CK6,:*(fQ0H*Hq H8h(3`bDDDc%Y$DRadD$Ditp+' أZuD5[4|hN"3z® H0D3k(63j:YXݕe 8FFf A5Ut(|ܠ@LD d*ݠH{djӰ,HĈ*(ـ*HyĈiɑp,HĈ*(qP*HĈIȈ1p*HdjQ&Hd*Q&Ht!B@"\tX!GG"t!M"Tt)#GA""b,tl$*3@ f`"B`Vdh3h4axFV`6P$9I522T QI RDEŘY 1A1fjx P H"4Pmf 0D4(8\/!Ѡhr@m aـ'+68YTC@v,ͧ@mfذ&rieCf@u2IP# P2| P̣-P 3 P#74I3p T2Q 2"*H1"""Jtd"$#G@""t8"(Y3@rh3@Ut DŽqOfFh!$!@ 4Fi4W¶ :v!,Og` ? "]f]@hI@f D@@YY5d\Cf@=Y @*dâċ*H(q` H-ɱ0H:(HFQԐ HaN 1@ He 1ְ H|j( Hdݐ HY1H( qHa5IȑH (qpH%ɳPSRS!TԔ Ht3@h# Q&2RS # 1Rp$2D $DPHFBE5hȀ$DPPARDTh$MMFBDdɐ$MU2DYU`RDE$H MV$DNRMLUPQ RDDDhM!2$DSHFCc)I3N Qc5@51Z3:M!I63 Q#0IJ2VIQc.@Pi3nIṬ4L03d4L .3\ T7@4M!JpS@A<@\BCRn§j§ 0"c&Q 2c+`I92IՑ/IJ2:UT& 51Z2 T+R!8܃| Ff P'{E9 O{E9 P @DPL,ʧ 'r2 ;"͢ :@+vUH4xfrұ/QՆbeĈj*Fq0HgĈ )Q HmȱpH-dqH;Q԰HiCĈJ 1ְHecĈfQ0He[ĈRS bDԔQ5%8j)0 H``hfLd $A1"j d('#NPSPV !T Ht3@h# Q&2 UPQRDU58I9$SUBFԠ2E5 J$AQTPbDd$x56$MMF PQBDd9J$DNGR0I`RDEhAA$DPPF QBEDh TDEit"&"+F@8`V d@)" 9d FB1""1IbDE4$(M!I6DSHRG@)""Bt"))!GB1"2 P̣.@ 2#)UN2~IUT-@M!2Z Qc$`I2RIṬ 02" 2  PQ"aIpIdD$d'@:d\$+@z@h<<Hq*2c"@ 2 T#M!J28c$ 2f  *0fр&; ! x#: vd p w=*xk<a(3kW vU 1ݥVwh?0k 2\tfp X0$ABBE($DB00BD)T!E5%It)*3@C꜀Q.G#՚5X4`Yf =aQ0#hKFHWdhSSS!DI0t 3@PVh~   4`Y RDdC( $SAFBE`$DB02D&,NPUSTD)@X=_4eTpfVŵJ 4fT< w ä :PQ H;@uH"@e<_@F@@!"jle|)FL!"B d\#&)FG@!"2d&FM@)"bz9d&FO@)"*‚e V!"j ep"N$MRABD3H8$UPK0BE4(ɘ$NGR1QU!TdI8t&'fc{ BDdIV RDUMaBjh 0 Hb#Dvf$LOG20RD#)S!4It3@͐|ZU/d@@)"J d<"E!"r:$PaU$U t"yQ0EjBDdHx$AC3BE$DB01RD# $FR22D(P$PPABD($ERRRSaDԔ`t&@h`d $A1" jJr(Ș$FLRBD#$XARRE4# PSRS`bDԔU5%8j))10 Hh# Q&2 SPV! pPSPV `bD4(fQ HFPHg)FH*Q H# )QHEdhQ`HPH(q e8USbDDIVDU)t"(!!MƆ/f `YT3@D%0Q,h`, q1݈4:! 02 U#!@52IVSa4D٨t$@h4<,X`d# FA!"B d#!FB!"j d4(( D)"|ZTT2@ CGR å@H(Yb# `2  #%` 2>P'`A=N2J P̣%A=L d& B1"J2J PV aD`t&@h`d $A1" j d& B1"J2J PV bD5`MAX0G@"j 5a AMAX1G@* j t  A1" j 4Wh 3@ a$ATIBD3p$RATBD(Ȉ$SAFBDd5 A%<$FONEUS"Ĉ*)1 HeȬC@9@  DTCTA'p͢` !Vh!` f c  2 c" 1J28 T#M2J c%52j PT'M2v P'=YpI̠bDs#1=LOG2G@)"bz9454HCOSING@z4 C# M%:: x&[Th"#Ef 3@Śj4z 3iՀmx*2d Tc&52|P)`aJ2I gQѠRDTti@,B d@@!" t'"FA"rP2DX$NB P BDT#XUIt &GA1"j 4Whrh@t,2 Uc  2 U#"@% Bp Dd%%aINTQV&@H(+` HRS bDCQ%9Rj$))ʑ0 HbW/ #! 9 2 U#! 1J2  QP4%98t)@ɌBDdH $CXͤ50P0 .@b!0yTP) P1HZFH3 1H>*Q`HbDs# fP$LOG21 @!  t0Z,0w%JQ}LǷ(8Q( NPqHJQHg0+Cɔ9`h#CKT3lIAC@!"2 d($FR" d\")FH@)"jd($ I!"2bd(( K)"d)FS!"*eH(IaBjdQ@HUHUhTf  ՚8Ohhp9YC`t"{&:BX!t * U7iQPh#٠4fCB >L$.lRYxɌ2D8 $FATBDU%(Ȱ$MRM1bDCEB4SL!ds xt '3@h ) BDdH $LOG20RD#)SDyxt '@h! BDdH   1H ɊPHa8  BEŘQA=1fjr hf ͢ GE!"b˭@g稍L$.| 1H*FHi f H'IȆ1l*feP%2I*0ͨ :ZXHѕ HcdĈHq Hk5ĈH H&ĉ QHRdj0 H4M)u$z¡ QREX %9BOUTf`^L(POKEf6Lt((@l?cH B#@ =UPF0  @ @I>ҩ $POSBDӓʘ$D90`2DD($DB0I RDD#Q%Zkd,B@#  GB@)""(d |T1HIHa8 U!4DIt" 3@xFV wd@@!" d  FC!"r:$RTQӡT4tXt3Ȱ$PHABD$Ȑ$MB0BDX$MB01BD$ɘ$AB0P`2D($AB0`2E4(M$SB0Q&Ht$: PHg3I !4d5 ht#!,B9Y /d@qͣ`K$F~\0gV~]0i6ɌBE4h0$SAF1BD3)`BDdHIIĊ)꓀P`2D(5$MB0IP RD#Q5U2jd,B@# 5 GB@)"j(BD#hFL$MB00fp FA)"J d TREUYU9A .j* bFwREUn'̘$AC2 `BEYAMA1j* "BDD#hFL$DB00W"gFW٠4G(I=Q hh^hkp\rꎀQ$iTpmn3QU.S@YTl$IAT2BDtIPPD%9`t$)fcyn~Ld '#NQU`BDtH9J$NGR1IԌ%Qy=&_<~t$ 2`$AB0 vPiQx?-*fwT$SaåpH *FH(pHI@7Lt((( \b* q&2$P! p P!45 t$O*|:'ԙ4G[&pԓRSBEu$I$I0L`2D( $T< { Ar.GBIH h(ё@HO q He#F`Hfd(qHe:(fqH/SEsdɌBD3H$NGDBDu($NGR0RDu# T5)Ht, 3@hhc A!2IPT'QSaDD٨xt$u:Й:IЌ T|: ЌI=C#,`I"2 Tc-M2 P" 5J24 T$`UA.2R % 2 #(=Y2I*<eQizڢȬ#3&0R# Z!`BDCIDIVG@"!ˬeR00$D99=-O#@ Vh[(#&H8 Qa4DYt "@TT`evhwV#  2IP#"`UA.26 Ց#ip RDd#M1Jjt$IOERR 2DX H$W52Es()I$MJARG`2DT I$ND `bE4I@h2\.=G&z:*XtT> 4fIȑHra8 2E MRP5rfdJ!*@  ڂ*h*`S. !L ¦7HS4`D$@+4pRfhɌRDC(($ICPIU DdC)@t# 5YF@!"j ld&&N`BDӓQ%5U2j6d'ū!|Z#c+9J2 'NaTU t"K6UL>U@=Z2`n>V|ϡxuPf2uN@b^ä@? 葑H$JSQӡE4t騘t)3@~[g.;$FAT2BD38Ȉ$SAF U!5$It) 3@4 "t"TD*3n 3m K3@ʽ> ^2 aQa`xʰu|+U^2 Y?!@#[ 8).3*o^AtZ QeTY\,uXYuwFV elmfаvf۰G@Dæk Vn?xʔX(ʠhX;Z¦ ɂwXw$~zfؠ7ʈ+6'T aXǃj(0 bo+0 E\UpV"@ūF­;*$Bh YVUPgԉ0ڶ ?@iXFHôӂ3lP#*?L 0 XTXuzǬ=a^PA([K%^2&sxKUl'M eRpO4`(t)"C+ Gk U) iVU *E"ȤXtp(UTBVk #jeWzT>' *|Z BC`G l༮}b4\&HW?x ͺc: w@? [W njh8@-T 3j@ YT p.#0- / 1CFA3o+uvA\f0vhͼ@bͼê !'ux#;XWl@D7(uqvf۰GH#6  [2#6wFa^AeZU> yF";^>` T}B:*x :*x :x:@s i"Xe|٠u°@V dl Px? ̅2BAͲAV dB ᣸&a[f` a^qU;  YT %'eZpA{‡V(eRAXw)|[T MٷIQ[ͪ|!iaE}U`00W@xeSٵT uV`f)0#jCٵT!]'oY\,uz@:hcv &#??쫄Z ??Grj@W!#aXW!#??øC=yQ @ aP a\@UIjʸB8"":4a^/cYV-k‡:Ͷ!}Y Uڪ0ʽGUaZ@k‡+::ڪ͵L;H!![p·@,-[` L"VB#H23*+x >+ ͷ`*bõb^~[(8#;ìc?uY*eT`Á-V,CFAOꦂVCDA@qUBgฌ 0+ `(@oPU*΂^xĂV4k5<0u[G =e\Vm$MS6ʄ @@ GV!n¬#aV@Ueul*V" :#*2V uPBV*!BU|%B P*; H VX$|-Y ;H: Rm r "+]H耑 EuEW* m 0DWý#(r>&-*rGWn§B""C36\ UXt,|f֠qU*Rp%YK2#dڮՠd jµV \Յkٶt `˭! v0n"n;r:@"x w[H-3o@(¾`㫸 [6 8QeUBT,V"l;ͩh" PA$b9SKMh5\Qpk6YA,XEw W;uW$*aA0XF0pBV,UBH(sSSU bD@Ըt-bl(tH^wXTd+@&2P$M-J2: %=1:S(4-TvtZɅYl*2e0!]a a@"ŻĀ\} ρs8]@@D1Hq5Ċi F1 HcFLGРbDuDdxQ $DSKERQST`dE4E%h=A:P5=K% qO)B P.<K% r$]*M( XP H.dћHdѐH]dјH dq@Ht dH}dHad&1Hed&q8H d)` f @m 63h6@&: U$@M!)02RT")I2$S #$ pQBDEi@/#E^vVU a؀ ?-U1xVyulǬ=ePXH;`؅*/+L#9#+7jZVmP @yQ0 L1FUP0Bm[6܃Sc1%9 2&#1U9Q 2V'SSbDTD)@TPpP D@#! IX:S"`M-IZ2dF1HgIp HaQPH(fqH8TQ bE4CM!)H$SHJR4MF<[quA,@*&ɎbC@@X_ "L:rX/̗eXFJ WuJ ` FP@gē Rl"Wf`P|ZRO`2wHĉ))1PHc dFQЖHgdFHk dF񝀶HqlĉʈQHĉH*HvH QHOd豚 H5 dQzA-*4'|+B\n3CLt$+NBE4(M!H$SHR1MI!Ce8à@ `I^-dC|{;G@!"Bm`]F40#MCpF{GfHl¢*>!`AFaV P 2G&j\зXDU0RJ3kX0UD„V1qa6 `EhV pPU RDC)@,#3gd@)"J 2EC5I$MRM1 PS`2D5I6$MAR0 U BD)@ͤ#8 :pͦVmE4C$SHJR1bE4#H$J1ՑBDdh=Y$RND0  RE$C@#F@&B<hhH3'(0 °JVm!f@Ƌ Ԁ(xʡ L* գ*Gc@ ¹`wՉnJ=3VnfѠDuWzGU,pdxvKeH' d QHndFQHk dHq vHHqЀH dhёPH Ċi)0HcĊi JF10,Hi djHdt))GE)"BT2DHQ&$ATRMZfI8FF"3=aP0H`4xdZF4!`eS& j P󅹁qQ H c$CXD1Co` 63m8ͰL;b (1иHHњxHHL&1HHeE(fH*HPHgpY"fHdUHIxFVdan<$T1BD$$MRM1BDx$L1BD$$MAR0BDdH8$ACBD3($MA#=Y:IՑ#"` 2  T I9:" #$ 5J:FI g֐PRE3iP5 p"1PH(fQ HaWHeU Xͤ`2y_2 ͷ@L۬p/ՇO@"d@ʅ lm I)q3lĀL.~ V$| fp?ٶ\=aذ+/(d#,ͦ $BF2D$P$CLSFLbDU%($OPNFLdqBE8x$SKz2ET$AC0}2D8$AC2~BD38$AC4rRE3( $$AA2D8P$BE2D4H$CT2DD88$DD2DDXP$DL22\71сܭVm!f`pU 69gv^wd@  Sǁ. D&{W4 ~T$euڬVhͣ@ wl`i0 ;a*  2DTh $FL TBBDT B$FWѠBBD$$IM`2D( ($J4Q2E( A2$PRRDTdx M$SG2ED8 QN$DTBFCHy^p;i08 ͤ VhhAݒͣ@b*m5s3ƒr@ á%;tp  3@m&YPݐ7djgqUl(,! T &K ĈihɑH)* H8VU DUH b$EXITѓ%@Q` ph@U#k4,2cDE%iQRDE%c9@T D(p K Wh?L.QP0*/M"`k @64 +#bd H>@Vʯ DEh$$DR_2DEh$DWu2E$8H$DFeBE$T8$OPTa2DTh $FCb2Dd8$$ERdBBDTh$FPg2Dex$GFhBBD$$I2j2Dgp+ X,/@gKͥ4 hY# //̘$BFD$X$CLSFLbDE4U(Ƞ$ERRbDd%Th$FLCNTbDdd4(AIbDED$cQ $DTBF5bDED$c$DAC0IT BD$xI$ARG3`2Dh ($J8Iѥ2 p \.K%IAeEPݐ*m5W-QUBq{ fpO[*?,+$>3k?S2^SDcUz hm`c na%R:V#a%R<ѓ#"QQe=R0SPRSbEEEQQe=R$LNPTRPbDĔ$iBrA"4 xZ,KUS2 ڞï S6Uy U| fp?ٵ=aװȈ$IOERR2D$@$BFBDU%($TTYINbEEEH$DRV3TBDU%)@$J1k2D($J3l2DH$MFp2E($PLs2E(H$PSaRDTdxh$SFw2E4x$SWy2ED8$TSbDED$dp$DTBFbDED$c$FLFLGbDuDd4($GTFLGbDU%(π$IOINIbDTD($MEMRYE$T8x#$UNdE4E%h OPENdDE%h=A92P5` pxD\J.&K%  qX\\./K%Ơ` q].aK%ؠp vH,].hK@%`P v\].mK%ۀz݅vVms, FX Œ7Oi*2 Hڣ o*EWLu`ew W eQ3ڽ`L$dݐ+vH ,dZPG3@/Ȍl LwuX,p@ *` x$TTYINbEEEH$LNPTRbD5$h$LINBFԑU 2D $A3P8~Vw<  IxFVu 1(F6¡F6¡#8 b #aS`<T Q$UeTu%ݙi@ݐ*Q5e v|].qK@% wX].xK%`@ w].~K@% p \.2D$A22D80$AD2D$hh$BLX_ ʎwd2/c P++UHAf@,|hG nrD8LuJd~Z1C(b|G!' %`c6pn6Q 2D$h 2$POS2ET $AC P̠BD38 $POS2 P`2D8 $CD 2DD8 $DE 2DEJ$DV2E$8 $REC #""":0GO0 ک)))ʽ)o>gÕy +%Overlaying areaDataProgram!! ~#f>g6 LINK version 03.21$$7 —2;<!` :—͍GOH:H/""""**"}:0( )0{)  0{ |- }G8 x0:C {͵! ~#foy  y/ õRQUESTx r *: of memory!mÔ!|Ú!2*,>222,28 ڗ,R R/—MG@RSUE ʹSG~#͈#~@#+^+VAs#r y** K8A~w#~w//:f/ f|͛>]{͵>2*o!  @/ @ Q} "F*?*]BK**"2G<2?z6#z>T:TO& ʬ ?ҿ!?yb * ~_~@ʼ +++~#¼ ?*?BK" ?+++ 22:Fgo"""21"<2:**6**O20H 20G:828:º>`ʗL xʗҗBú".:;Ŀ2!8~w{{:;5 ~w*":aĞúFORLIB REL ҝxě:{$MEMRY**!"w#͈~@+^+V"*!1 2! Ô?Start symb_!=>?{~#{ ʤ–!Ô Not Found> {> {>2< <ʌ>2:_<2!~<&?yBKO6&! s#r! s#r! s#r/ ! s#r&! s#ryb6*͟ / ͇ ! ~#foBK#:=d :[ *|P [ U }[ #`͟p#:[ *|y [ ~ }[ #:;22r 22*5|ږʖyȷ–͈ڶ~@–ü"Öx *5|Ö*.~ ´:2:86 G@x Ý6 ?Commanol - - undefined< ~# ͿÍ REL7:8`Q K :K ͵27** F ~G~ ~@ /21:8` ~<ʋ! w#! wʹ|![ʚS!A͵**DM[Begin execution]:1** ~ ~ʵ+++}>GO6! ~#fo! &?ѵ!  &?}_|W>2**?m**:m ҁ**?W{_*][ :=³ :ʳ nͶw+p+q+p+q#B/ ++sL :7> E?@2<L x  =  > d Error~{#~#  `' +!~GS#~ B4:x+#w~H:j ͵>*{ 9> {::!;o> >/{+^+V+~{ /{~@® >*21{y~ !k   ~ y+^+V y:7?27̵~ <</O X |*+",""""go"*"5212320!""""""!""""22aà?No Start Address?Loading Error?Out) ~+‚>ʗ6 =‘*?!(  215 *?~O_?+++y++:1^:1! 285 >[{ y/!">  6 #= x2;y.L Ex& 3 ' H !E~ H 6R#6E#6Ly[j 0j Af :j O Ò:› :2*|‹}ʦ~_!&^#V*"8Aq#p8A^q#Vp{8#~@+^+V{r#sA^#V{r+sˆ"O<2XP̾ʫҫO! N#F 24:24  w  r W 4m  :0"Public = ?**? Ң!?*]**?BK**?***"**?BK**""""_ ~w#~wPỲ>y! ^#V^#V?1! s#r Gyx!Ys#r#Jxl|W}_?* ZBK| ~_q#VpAŠ  n:=ʬ >@w+r+s+@:2r+s >͈ /o/g   ~@wq+p*>28~@w+Ns+Fr{8*6+r+s+p+q+"~+V+^+F+N+*P@ DM>>>>m<23=O!}! ^#*>2* ] *?>͈ڋ+^+VA" ̀:=W<2= : *  PY7H*?*!"}2<2 `BK͈d~@?:$~@w+~_q+Î n:=1>Cw+p+q+r+s !P1 ͵ %Mult. Def. Global ~@*5+"5PỲ>`BKůyoxg*"*":=¬*!"͟*{OzG*?*DM7xw#  +x ~+ x}| "* ` !B 1 >/{͵ ~W+++~{+8 %2nd COMMON Larger /*" |2* `0 > ͈~@wVډ?yږҬy?ڳ& ?ڳy!! s#r^#Vͷ?ڑʑ!p#*!N#F#:4Ñ**|G}~O"A++++µ~ y/O Í"Ox_?WOw#͈~+ڥN+F@¾:z  | :r#s :AÅ z #n:=>Bw+r+s+r+s *5#"5!~#w+ :7=O#:7/&? ?Intersecting \O& ?2:?O:/ n:>ʣ :=ʘ >G:=ʢ >@w+:2: :=r+s+r+s z `"*̀! ^#V!!~#fo!^#V  !~#fo Ҁ!^q#Vp!~s#_~rW?}^#̂ {_!6)2+w+w+w+ w+w+"7ɭ :ȯ2**?DM* "* "*?BK""/""*"23!:3 B/B y** ܦ*4 6+wxG ɯ2,7:͍S|͍ |!"wi4#6 _{w#m!  // /!2 >,{*& M^#Vy¼Ý!"F~#{>({>){Ý:&? Start = External y :** !*"/*?l*`**?BK*" """/""// |*`i{!#‘**?"**"!y! ^#V  F#fh?!^#V ^#V? ͽ & %*, Խy *, ԽÑ ^*, W!b!!!2,Yè͸͒Ԩܸ! N#F#^#V#~#fo|} +x~+ íxw# øxw# ~#fob?q#p A(J) = SQRT (FLOAT (I2*10 + J2)) 200 CONTINUE 100 WRITE (3, 3) I2, (A(K), K = 1, 10) 3 FORMAT (1X, I1, '-', 10"**""*"*" !i~R#~E#~Lw+»COM` `<2: **ines print the heading for the table. C WRITE (3, 1) 1 FORMAT (1X, /////, 25X, 'TABLE OF SQUARE ROOTS', /) belowaboveOrigin loader memory, move anyway(Y or N)?/    ! y*,O(F7.3)) WRITE (3, 4) 4 FORMAT (1X, ///) END  **|< <  <>͛**}͛|͛qͅ:]/yO]qͅ:ĵ`< ?سȯ͛z WRITE (3, 2) 2 FORMAT (1X, 8X, '0', 6X, '1', 6X, '2', 6X, '3', 6X, '4', 6X, - '5', 6X, '6', 6 / y*,!  $!9;;;;;; b @?zfb7i\if ڠ ڠ*** This Batch file will compile, link, and run a FORTRAN program *** TYPE ROOTS.FOR FOR ROOTS,TTY:=ROOTS LINK ROOTS,FORLIB/z&?z~#͛Ï!:_w{<2`!Ô?Can't save object file!f!l!o!u#X, '7', 6X, '8', 6X, '9', /) C C The following lines calculate 10 square roots, load them into C an array, and print thҋ?zʚ7*"*"**?fKP*?"!*?BK***?  PROGRAM ROOTS C C This program calculates and prints a table of square roots. C C LUN 3 is assigned to the termiS,ROOTS/N/M/E ROOTS ##### #!!*"*?"*"*"*?"*"bmbh͒ڃ͒Ԩܸ͒e elements of the array. C DO 100 I = 1, 10 I2 = I - 1 DO 200 J = 1, 10 J2 = J - 1 K O*?*"**?BK**?"òPY*?"*?"5**?ڃBK**nal, so the number 3 appears C in the WRITE statements. C REAL A(10) INTEGER I, I2, J, J2, K C C These l r to enter the value of K. C WRITE (3, 12) 12 FORMAT (1X, 'K = ') C C The next line reads the value typed bin the form specified for C I FORMAT input in Section 8 of the FORTRAN manual. C INTEGER J, K, L C C The next l*** This Batch file will compile, link, and run a FORTRAN program *** TYPE EXAMPLE.FOR FOR EXAMPLE,TTY:=EXAMPLE LINK EXAMPLEy the operator and stores C it in the Integer variable K. An existing FORMAT statement is C used by the READ statementines write a message on the terminal to prompt the C operator to enter the value of J. C WRITE (3, 10) 10 FO,FORLIB/S,EXAMPLE/N/M/E EXAMPLE  PROGRAM EXAMPLE C C This program demonstrates the use of the READ, WRITE, and C FORMAT statements to do Input an. C READ (3, 11) K C C The next lines compute the sum of the two variables J and K C and write the value of tRMAT (1X, 'J = ') C C The next lines read the value typed by the operator and store C it in the Integer variable J. C d Output to the terminal. C C The Logical Unit Number for the console terminal is 3, so that C number is used in the FOhe result on the screen of the terminal. C L = J + K WRITE (3, 13) L 13 FORMAT (1X, 'J + K = ', I7, /)  READ (3, 11) J 11 FORMAT (I7) C C The next lines write a message on the terminal to prompt the C operatoRMAT statements. C C The values entered by the operator in response to the prompts C generated by this program must be  END   ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ? @ A B C D E F G H I J K L