U$Q0(AgH_-* UUAE+ -7, X`--7, XI= & I=7 1,q, o  AQUU J8:!1qZ* Q R;O@7,`#@ TQQU ,e!*Z J a J J9B5J+ EUTU3  J=l ,  H=#Z9 e@" K i *T U("y@@=kg@@ 8+ I=,& 4F FIe l  *@"U I 6B!O*(J}(D5D- 2  3F+62F`g@  "@3QY_5R5:4! /$`.6 X+C\G>vJ7I )[/+%OJ~\ UwO?%pQf/%[>$P]F@_B-`a.9 gR-gR~igPo"@dE UUUUD"[G[]Tq;7 TPTB ,,~7@7`  c +!*Z J **A(U J=l ,+`e;, R}@<+ +Z1 ( TAU,b+ `+ 1BAO$!*gp3J @7@7`,b EUUUf`;!*Z J / ,J H=#++k# J= UTUl ,`R` /B5Js `R , `@@e, R UEPEw} /` )D0D` b+  UTTU* 82J8+Z Bo4Jvro,~I=I%:!+ qqrq UTQU+ qI+ # &I=7JGB+$Z6@7+ -7, X UDE! JGs 9 J*6@:`/  J=l ,1# 4I-Bs UUE,$ & D, I5e+ `/ * J*@@G@@7,~ B# QEC *s`/7@`M2j+ &I?l `'1`[ UTE*  &  kIA, I=,~l@ +Z1+YZJe UUEUe` 3F!+JqC+W2F"`d ,) J^5D;, "DD";0D` 0D`y1FM+G1FI `1F\ +F1Fi `1F}+E1Fy  UUUA``@@@@@,)E7 #,)1 ( UUDL* e+U QC` I5JR1/+P 0j+i" "T*E"l ,b+p +@** e+P 4`d+p6@F+pq.* E]`cl`+h J_ *_,~G1L,~+u!*Z JB UTU6JG` *$3J @` G G,)1 (` I G;, R} *Q"*na@ &+4 zl@ +Z+ Z1H(+v1dZ`` UErʀʀ@@@@+QI`` @@ b7@7`l +Z * U" `B,y,i+ 4[ (aJ` (`I1=`I1- (UD*`1/` *%1Jm0@4D1=+/`+ 23 DE+C2!`1J`2/`d0@1J`I1J`s2)`w2#`{` *"U"1gd y +Z`,^Ry+JgBg,i+ 4[ ( "E U !aJ` (1/+ I` &   Aaph`@1 PEUS+1lyKy + 1+ y bAg`i "U((2`p+&yg+&+g€e@`ph€s+ I`Ml0 & ADTUu +&l0 & +&l0`,0D+O & a +& UDEC`p@m0 y +Z`y ( ap@+& J b+& EPTEl0+Pl0 ( J bg+Pd0@d,` , dB+k ( DT`p@*Q (1D0+idB+)`n``1l`@`ap@` UU ` J b+` aB` Kap+& 4D&  b1(*5Hf @TDUe1+ddf F b+&mB`d+Xd0 ( J b`M *(g Kap`MUJ`Ml0@*`M,`M * DQv`p@ * 1,`+```@``1D`-`h @` DEU/$4$Q0$+Q3G,`ap@+ N b`  K "U*Te`@+& L@ b: b7@ b@ +&,i+Z,,+   + (0D "T"1 +W F,0DXJ1n0+,4D (0D1 1 * U",5D)+ + (1D+`77@7`@@_l @@`` UUAm d Gd  +g +1+6,,+a - ,= I[ DE)XF*1d +aH+) ((I=]0J+j ^*{.J=,>,i PAc`-,^ +u ? H,~1-+feB`s,ym ! J5 UP: (* 5 JHI= +* =!l4` &, IaP+F *"Q H J b  &, IaP ` H J b  &, IaP DQK+M 4, aP` 4, aP@`g, aP`,  TTEaP@`g, aP+[ &/, aP@`g, aP` UAA\+ I=g+a: Ha@`Ph: Hzg+9[`G,~ePI= ***I_ 5,~gd y +`,^Ry+d@+8JgBg1- UPEm`l `s``/`,``` 0j+i0D "*T(,^x+aa`+,^x4Da` JH, J. H< g H,~ *U(@*~``3HD` H= D HE  (H(nH_` H_ "U*U( . 0,> y ,> J yR a JG,^ ,^ y  "T(E"(H(j_ H_+a+[l ,+Z_ 2ʈ = JD,~/ /13579;=?A "D" CEGIKMOQ QSUWY[]_ac "D"1egikmoqs suwy{} "@bB<-BZ( EPEE4DL,~, &1+aXJ@@(2,~Z&IZ I4JWAq` @(SZ (+Qeld +ul +e+e *  hd$@i2Dh,~l$50Delk D6$6d " "dN+u,^,~lJ J3+d,>,P`/d@+a@ DAU``,^ JXH@@ `@l$QJ ,t+u e DQUuSD(,~XJ+tҀ`,P`%`@+[ (+ ""E"`@+Z (4Jr[( Fe,~? 6+r h (( JeN,~*B,P,~ HB`@,~,Q,~Im + +  TTEIo,+,,~`,P` `@7<,h+l@ B,P @  ,~a@,P,~[(Z(XD,a@@,~Z 4Jv+7J,~Z  UUU?+I=+lA A,M`K`,J H=,i+Z *QQ*( (`#1D`Y[`[l ,3+/` )D "UA(a0D`,P``@@Jl@`q,>,P1a@/ JB,^ D9,)1 ( Je1D+B0D1/+[a`.$1]`,` UQQl d`` `7@J e8 7@J:J$JJa``q DJ. J`@. Jl `%+ d (s,~I=Iy EI{,~/+d + + ,~ ej+R:`+y UUAU[l`` e`q`5Dv+I= 8+ I=7HI &AII= *T**4HvI= &DI=Z(IZ 4Hv,h+f,>I=B, J e  *E T"l ? &Gl `%+  eId + `%  *U*U ? &G e &H e e,`I` &I,^`@I`@ E}Ia@ &L`@I,~`@`,~Z (4Jv+u7`6,~+u@@J TUQ  e8 7@J:J$JJ,7 J+`@.JJ,~4  I4ji TUUU0j+i D`. 0 J yR  J, u,5D+ (U  -+R. 0 O D,7 $,~ "ZJ0H+,~   M  .  k  =    L    UEUI= & D, I= * J 6@(`ʀ1jZ`I=I`I= QQhII= Z H[ H[ H,  ?I` H,  "(D* ?Z Hl `! $`6@HI=̀1rZ``  DUUy ? &TA (D D R1JS` `!  &V &( UU1JS` `!`LT. LE. EQ. NE. GT. GE. I=, I=+ *(" , + 2$`I= &X,~ +$`+I=l I  PA% 4, I *H,̀1r`d ,~A,)1 (4J T@U/`A,`aP@`Ad@dP@ldPl@e \ JB UPTG4JU6JG`` G-7, XBZ (< @@=O@7ll `)`) ,a@@`k ;1Ja@@1`ca@`k+] ?  QQUEi`q A1`s, R},~`k *$ J @ Q+eB `k "U**=l, `)`)`[, ],3JD,~ J=#I= &G, Ia@@ ETQ`q,~I=l d7$L+R @@C, 4JP "UU Nej@`3J=ZDC._aD`d@++Z7@C+Pl,  C`j@ *U*E"`I@@C+P &` =, I+W-@, &%1F+b1F Q_+c1)+d1/+e1F+f1#+g!`l +h4D\0D` *T+\ L9+ $=_mddB@`B1`,1``B,~ Q p!$l {,,~ZD4 :x:xd ,~!$@`7@$,~  4Vv+u h9!bS$X$ 9!S$[,~ 21, ("U,~ an@+._4$,~S#s`2Ni`.&Q!"A a1!$ . 6B,!1H8`=6 ,~b,!,!.,~ U (@,e`+,01+u,~+0`?,~  " U 7ah@+d(3H=++._4$,~e` +)4D#,%1++,~ (A*T$4Vv , ah@`Q{3H=+,._4$%4Lv77 +u  "D (Y`h@++5L/ `Ql,~4Dv#  3H=`U_. UUU5B ,~`e7@d`s:7`yZ>\*>c 7PJL eO@d *Q"D{ +7XJ7 LPJ7S>\O@@d+7 ( AF " W 2&2f2F3F3f AUQh3&@Z y/*Mʀ(J (RTp@`@B TDE*sA*t`@,J @ *( XJy XJz /xuPJ B UEy6@M+Ay+ Z yb 0*Z0j[aJ`` W0JX1JW` W UDUQ +  @-7 A+ 1-7l , XyO@7 E, X> yX/*K EPA ʀ 9@"I= &jPJL *ll `#`# `j@` ? UUUE %, IA J=, 2JD+ "I=Z y Q[ y4J  9l  UUU  d !&(&d`Qq++ ( &k , 7 J= ` - UUU G 7az KzZy[ Ol  I=Z$, ` J @, R+ . QAU ,-7+ PJL ( He+ 4!4J B*  D !> e, + B J @ QU i1JV` S>\O + @jl 1JX+ D1JZ+ J2+ O1J[+ H ETU =  @aJ`` _1JW+ 2}`@@`@, X-7+ +olmP L UUQU !* BJL}+ @Q @* 0\+ LP L!( BHL  @ + B; @ *T* N @`}PL H0\!* BJL+ N6D , + V J + ɀ * Q* 3fn` ,~ &Z xw6D +  ` ,~J+ *E* _, +p  Z1H(+ g7@1dZ+ b+b J (D  e J (FQ``B4Jv(D J * p ^1J_ 1J_  J _,~A ,~+ {AaDx (T* + z J+u J\+uA 8 x,~ J x+ +u +p,~ @Q A ,~+ AaDx7 \ +ud8 `@I D>, ,~+  DE  } N?e@ ,>._5$  `n@+ ,^`4Ju} ETE ..( N?+u ,>od` [@lfA, %+ 1``@+u Jf QEU 5` $X, %+v1`4Jua@` C2*f+u+ #6@f3jf+u *T # f+u, an@` [`n@`` e.@` [`n@` [ 6(/68 UQE W 4V ;36>` e._4$ %4Lv`@` r`+u`@` [_ PDE 4+qy` s,> d,@s+ 9,^` [,^ V> ` [`@` [_ *@" y+sy` ,> d,@S+ 8,^  `n@+ N`m@` l DQ* E an@+u + N  `n@+ N@@>` [a@` [3v>` [ V>  QE ` [:x+uw*;3n;` [d` ;3` [w`  (E*E" V, ]`@` + I=I` , ]7@I,~@@IIA` * x J< x AUE ,> , a,>?+<,^,~ JgB,P+ j gl `% U g+  .` ,P+ g + +u  EPEU I ^Jd@ Lh  e TQ x8 @,1`  h.,(SC  (E"U* I e.( I J 3JD+u , Z+u7@3,~ *U U( &w y I=y 3 ,~+u` *yR3J+   (DP #K1` ? , ,>d*@&*QLx )[ xʀʀ0jm/* "Q( 2 *W* CBu` ?I,~u5Lv` ? , 3L< &|+ 0*9 UUA Eg Ku,~ik,, ), (+ '+@, 0D1)`  A" +/1]` 0D1=` 1J` k+2-` o1J+ Q2E+ Y0* ""D g9`/*+ ;il`@`,~i`l` `+l @,~*`` *( <+ Bi`h`ik$(k,~ ,: C .!$ DE   =l D!,*9il,~a`` ik0n` ,  PA Md`@ 7 K 0 a`@l``k&* h*Fh,6   @DU    ilR` C,~m`a``a@`e`@iCi LKi (  ^kd `,~a`@l c@}a`ik``@Z (,^x,~ "` DEP - ?dd+ lad` &i ` I ! (%$!]@@e  D@ o * ?"$.e  %* 4Lv ,~"( .+@ + xL  " E 2   ,^ ,^&$:eQFx4D ~ [ x.*X` ?\-m ( -Qa^'&wka#SD!y! 0}|i,S5^c󞍸T=8)9Lf32d i  E-E+ A alx *2 ? ,~ I` ! *2,7` I "  ,~ J5". 5 *)*.* ?8. ,~Z 1LIZ 1L` ;2  D 3'+QLx4J , [ x.*` ? = &~z+ H,~I,~ 2 U "+u 6,~ 2,~ ` #, ] 8,~, 0,~I=I, /I (E( UI=,~,~ "(` [, 0,~ "` [+@,5Dv $,~ 4 AU 3+ I 4B+  4+ + Xc5(v3(,~I=I H@I= UEUU w&I, G @Z uI=,~ g g k  UAQ D S g g g m +  J b  f+ ?,,~ < ] QQE   ,,~ < ``@I,~ e ? b` e k ? b *Q(U U` kp ,,~+ L,,~ < d  ,,~`@X A    Q ($G,G)X (1H+$) 6(16,~3v%`  QU k* 16(,~B0v(,~+u7HE,~@@E3HD,~ H=I=I =, *Q" &II=`#Z yI ` (D y,~  EUQWa`+6@`  J yR a`a J, &   4Dv0$9+ ` 0$=` 3 ah A0d-+/$`hpD+@`  * U(* =il !*@{,,~i J=+u, R}`@+@0D1  (A" 5+1 +0D1D+& 1+&1+%}1D?+%1D` M0D QUU#1 +' D(,~I=@@@@d(,~lik+@ QU W0D1 ++, A0d-`dB` ,>J,>,>=y QQU4,>e,>6 ,>3d  +Z`,^3 ,^6,^ey,^= *E* y,^,^J+u +u @( , 4Jv0*`  E` !0j`/* $(0.((`dp+B,~  !0h``  "(E"  0$` `hp` `d`` #2D(+v`e`+W $ AUVd+u $d+ud y 5F]#`l  ,M` ( "E D* 0D m ,J H=ydB,~,i,~``+@@F,P1 QEgl (4D[` l ,3,+h0D` d@@J ,P DU el,)1 (`@+ 4*t JF)`d@,+@,4D Ax0D1-+0D1=+]1)+/1D1`+dB+ QDQE!,`!+d@6J31` (d`+u. Fd@. F` EQQ J / e .jJ (0D+t e8 (D#` l Q,~dPR&%1!l1/l1Fl13ld@ Q1#l 1Fl1F1)l1Fl@1%leP`4D$1D+$ "A (E/``%4+u, ]d 01j,~d*@&* L<Y&*  D@*+0l,~`Sl <0L 1L@?,~, ] d*@&* L;`gk&* @D(g+1j`e,~ @?,~}2` {`0*`yI!.* H DDE<,~1j0`w &`wI#,~I%,~I',> k,^ &,~I=I) U `,J H=l ,+[(0DZ+c+uI= & WI=I5 UUUUMI=+ K`I=I9`# & +_I=IEIG+IM+ UUE &) I &*I=+ K`,[+ &- =, a@`_Ia UUUU^,~ &3 W+Ik =, `7Iu+ &> K` &A+I+ UUQUI &J+I+ &P+ &S ,=  &T,~ &W =,  &X+ UUUoI+ &\+I,~I=I`#I=I K`# &h+ &j = UUUU,  &k+I= &n &o+ &q` &t+I= &w =, : F UUUU &G, e &I+I+gI=I =, I,+I ,= I  UUUU+I+ & +I= &+I'+I= &+I=I5+I= UQUU` & ` -IC` &#`[ ?II`qI= &&+IO+ &) "T*@3 II=+ &, II]I=+ COMMANDS: ACCEPT,CONTINUE,D "DT,DIMENSION,DOUBLE,GOTO,GROUP,HELP,LOCATE, MODE,NEXT,OPEN,PAUSE,REMOVE,START,STOP,S UTRACE,TYPE,WHAT (SEE ALSO FORDDT.HLP; APPENDIX F, FORTRAN REFERENCE MANUAL.)  7 9 ,> D "  STARTING FORTRAN DDT+LQ@>> qkѽ=gk %%FDTPOV PROGRAM OVERLAYED BY ***[ PROGRAM SUSPENDED OPEN SECTION: ] IN HIGH SEGMENT &`MIN LOW SEGMENT AT + IN C$\@9›S *G:(,~ qGyg+R+( b  K+ZH0 ( *@,4D`H FORMAT: R = / y?FDTDTO DIMENSION TABLE OVERFLOW iP444?FDTMLD MULTI-LEVEL ARRAY DEFINITION NOT ALLOWED.B%FDTA =BX COMPILED ARRAY BOUNDS EXCEEDEDNO ARRAY SPECIFICATIONSUSED MAX ARRAY  DIMENSIONS[] /,] - F10 ORIGINATED DP SP FORMAL, * N+, uNO PAUSE REQUESTSGROUP AFTER PAUSEN/AIF (, e+. PE (, e`NO GROUP SPECIFICATIONSGROUP : K I *`e D"_ ( IS GLOBAL)+el +el +el +el +el  Uu+ex(Agw]!+6$ @PAUSE AT ROUTINE \ @. @. G-PyHM 7@f *E p+v+ # ;3` [` i`@+ P` EQUIVALENT TO (FORMAL PARAMETE R 0O@+ MAIN PROGRAML#<"-%FDTCHI CHARACTERS IGNORE D: "?FDTIAT ILLEGAL ARGUMENT TYPE = |ARGUMENTS ARE:. = . `0wF   LABELz[IMPLICIT OPEN  dp I, )+ '^' @<>PROGRAM NAME: ,[`?FDTIAF ILLEGAL ARGUMENT FORMAT  5TYPE H FOR HELP?FDTMSN MORE SUBSCRIPTS NEEDED?FDTBOI BAD OCTAL INPUT ?FDTL #GU LOWER SUBSCRIPT.GE.UPPER%FDTNST NOT 'START'ED?FDTNFV IS NOT A FORTR @WAN VARIABLE!?FDTBDF IS UNDEFINED &.+^ IS MULTIPLY DEFINED?FDTINV IN 4VALID VALUE ?FDTNFS CANNOT FIND FORTRAN START ADDRESS FOR ?FDTPRO TOO MANY PAU ySE REQUESTS?FDTCSH CANNOT 'START' HERE?FDTNDT DDT NOT LOADED?FDTCFO CORE FI ELE OVERFLOW?FDTFCX FORMAT CAPACITY EXCEEDEDPLEASE RE-TYPE?FDTICC COMPARE TWO  CONSTANTS IS NOT ALLOWED?FDTIGN INVALID GROUP NUMBER?FDTLNF IS NOT A FORMAT STA VTEMENT?FDTNSP NO SUCH PAUSE?FDTCCN CANNOT CONTINUE?FDTNPH CANT INSERT A PAU SE HERE%FDTNSL NO SYMBOLS LOADED?FDTTMS TOO MANY SUBSCRIPTS?FDTSER SUBSCRI gPT ERROR?FDTNAL NOT ALLOWED?FDTNUD NOT A USER DEFINED ARRAY?FDTSTL SIZE  TOO LARGE%FDTSFA SUPERSEDES F10 ARRAY?FDTNAR NOT AFTER A RE-ENTER%FDTXPA AT xTEMPT TO EXCEED PROGRAM AREA WITH ?FDTPAR PARENTHESES REQUIRED ( . . ) ?FDTFNR   IS A FORMAL AND MAY NOT BE RE-DEFINED%FDTNAR IS NOT AN ARRAY%FDTSPO VARIABL  E IS SINGLE PRECISION ONLY?FDTNGF CANNOT GOTO A FORMAT STATEMENT?FDTITM ILLEGAL # TYPE MODIFIER - S?FDTFNI FORMAL NOT INITIALIZED?FDTRGR RECURSIVE GROUP REFERE NCE?FDTIRS ILLEGAL RANGE SPECIFICATION?FDTIER E1?FDTIER E2?FDTIER E5 E?FDTIER E6?FDTIER E7?FDTIER E8?FDTIER E9?FDTURC UNRECOGNIZED + COMMAND ?FDTCNU THE COMMAND IS NOT UNIQUE ^gG6U(Ag$Q%; hg[l{ y]!g\)7 i@'2 ->k ( 60