~*(AgigI(0(AgH/ n** "U*T(+ - +, +"- +, +!,^ 7O@+ 7++*  ** J*- + *P(E,  &? & &?-< ^, nZ JL JL  j1 JM@@M D*E*". n&+ ,  j'+ JM * J L * J@@K,;O@J ,  "A*D*@@XJW Fdl@  XR, ]+ Fl @F!*Z J S JRZ* *T*U " JN7@K6@V+(, 1+&,b  HV HR,I NQ`A @F@" *U*A**7  ,}@@@@@H@@R@@R@@I@@G@@@@a 8+ &?,,>4F( F_ * 35Dj7$ e l  _ 6M  O*(J}(D5D7 2  f3F (A ;+A2F+>:Q*d:5R?:1RY 6M /$`.6 X+C\ DG"(1G>vJ7I I&l[YI?,+OJ~\O?%pQfY>[>$P]F@_B-`a.9 em}RgR-gR~gSr U*U*LigPo"@]yzzmj$ : M zKF *U*UU^ X8@<:7@+(7@K+t7@J+  ,  (U U ]+(!*Z J,} V JR!$@ DS, + JK @F,;, {Z ,  *E"T f4Ji @x-< + ( C Ix-* 3@<+K4 p,r+y1 (,++,` ((A n++ 1 K7@K+t J\ !*gp&l&2K7 \,D D7@J+ *E*U*w,+,;!*Z J,%4 ~,5Dj4Fj,c HR,I+( V+|  *E"( JR, + ZJ\+%  j2+aj+ ^ > *> * j=+  (A*U* " j!> *> * J\+%5 7@K+,E+@@K@@@@, {-* 3 (T*A <,,5Fj4Dj0D+j,5Dj4Fj)D0D+j b+( `,> "U"T@  *L4H3HL+, n *Z *L4H2HL8 ,^7@,~ &? **U(! &"  j+'7@M JM3JM+' JM &%,i && &?7J] }Z +@ *E*U**6@K+: ^XZ6@J+= X- +,  + J] JN JKO@K6@V+4,  *E(U*2+4 HV,I 4 &&Z N &) &?7,@ &* Y, T &, F+(+4 *E Q ;@@K@@]@@J,~7@K+ } */A* JN+47@+C2j+. &/ &1 **U(C, 2+41+H J, S &5 ,7@^+J &5 ^, T &?,~4 C "U*U*Ll@@@,r+O+P+ 2F6+y+ J@@6  +q,5Dj4Fq7@ *U*UT+W3F6+3F7+3F7+6  +j3F8+q2F8+jd l,@, *Q(Q] J6  +j@@dB+95Da,'0D+j,0D+j[f1FM+m1FI  (D"U(e+l1F\ +l1Fi +k1F}+k1Fy +j+j:::::l,@ *(*n, JdB+; = J7 =,@1 (4*j* 6  +~ JX,5Dj *U(A(v X4F~2F7+j6  +, m5J{1D+x0*0j+QJ Xl , *E*U*+, +(@**  JX+x6  +y,5Dj3F6+2F7+j7  ,} "Q(T(Z ,e Hz ( C I z+( H`d+6@\+d$@3D>: (3DW "Q .*+Pl`+ J *,~,>0L+ h,?0, "*U,~+ h!*Z J7@K+t6J]+! *?3J b+ F4 F,@1 (4*j+ G *UA ! ] J\,;, {-* 3+\,> " BF <E,7`+= @F:S"@X "U() BA."A B@d7@!&>9 (C +? @ BCX@C@@D@@D A!$ @f A2@e$+80D 1D +60d+?@@:`Jl$+(A @+; `@+> "A*": ` +@ZD: '+8 &C+B &H7 &L &O <E, &?,^(C+("ExF (Q(U*F4 Zl@,r+R+ $e Fz Hd&@2F>6  +R,5Dj3F6+O2F7 *D((O+y7  ,}Z ,@A+( zZ1H(+V.$1dr+R+ (3HW (E*W.*.*@@@@@@+(2FS+jZ ,Q@A+ 4 j@@T7@J+,E (U *`+Jl,r+y+$ J`B,/, ]+ H[ (aJ+ 76  +j (D*P h4D1D+1D+0D+j@@,4Fj*T0Je?m@ J4Ds1D (U"Tq+s0D+j+l6  +j7J *6@G+w@@w+z`P@a@+z0J1J (D""y:G1J+81J+F1J+@1J+ 1J+ld@1J+1J+-1J (E*E(+01J+21J+A+j  JG v Jwd ,>R,r+y+j,^2HR (U*U +0a@ + v2dw*w Dv X+2*G* G J, ]+ H[ (aJ * U*+ 71D+l7  4D+jl &,3 S* ,j*  K JS: *P"aPh`@1+%l,>R T JR ,j, 2+ 1+*,^ JR T *Q*T $ K:7@G+(`P+U3dG++(> @@ @@Ge@`Ph> ,V+( *(",, m+l &`@ &,3+l &,3+l`,'0D+# V (UU*5 JR &,3 S JR+`P@m Y`,>R,>X,r+y+j,^X,^R ( (EQ = DSaP@+ ( JT+l+Jl ? D l,'0D+~,=, (UQ F+l W JT7@G+Jd@d,'6  +j ,@@SdB+e W`P "D @"N@* W,=1D0+cdB+XD`n`+O1l`@+VaP@+h7@S *Q(UW+X JT+Z JSaB+MZL ,}aP+ S4D T(D)D(\5H` "(D*_)D|+^(Ddfl DS FT+mB+Od+Rd W JS JT+ *E hZL 7@G,}aP+$\J(J+l,'6  +j0D+bX  (D *p$vf Ft *,o d*p,j,=0D+{,=1D+{ X J *P"y,',}+` ,T1L,jd=ht * J *<(J+ *P U* w/v4h X ($* t L=j X J,'7  ,} X7@w **  +)+(l@*6  +,'6  +@l *`P@ * 1,'6  + ""0D+``@+j+1D+0D+h @+/$4$p0$+p)LG *Q*Q*, ]+1,^ $(+ h &f ^ (,~1D+eB+V,/l  (Q(Q V JI (* I J^l, +z* RaP+jX $v4H^h  * (D P"_,o ,m`P@+b0f &,c+j, &g` (g1H,m* "T (g1J,U,U=fd &g,~aP+m, &,)aP+r, ^  JT *"p  &`@ &,)aP +w, ^  JT  &,)aP+y, ""Q(x 4,naP+~, 4,naP@+~,Q,naP+,,daP@+ *Q ,Q,daP+, &h(J,daP@+,Q(J,daP+ ,5*  *E** &h+ &iaP+ +, &?7@G+`P+: ^`@: ^3jG+V+ *UQ( ^:v3dw+V7  +@,~eP+j &k I,~ JG v Jwd ,>R *E D ,r+z+j,^2HR+0d@+U2*G* G1D+jl aP+V v2dw *A(T#*w Dv+V``0D+-,.+)Q`6  +j+r0*0j+0D5Dj (D*T +,5,^x+a`+(,^x4D+j J^@@`,[ `< Jw`@(J. ^ **T 4 JG ^,~dB+;7H(;+;3HY+; HR Y H[,>,|,^ ((H( *A*U*$*. l,>,>,>,> JZJ l J,@,^ ,^ **QE,^,^,^ ((H(j@ H@++z, +y_ #JZ. .* JZ R (AM JY,~PQSTV ( AVWYZ\]_ " ^`bcefh Agiklno ( Aoqrtuwx " xz{}~ A  ( A     "N (E P   (4D D,~,l &m+(  J@@( J,~d & "" 4J* (3DX+&  (+#d (`hl`hl + h,>,> (T+ Xl, 2+=+=,^,^  hd$@l$2Dh,~l h$pd Q30D1Dm1Dl0De l $q DJ$q1D$raD+,_,!+D,od@+$a@+@+,^ (A*D, J, H@@ X D `@l*`@ l* J ,K+ h / D( ("UM  D(@@( J`,~, ` J+K6J`+U,!+5`@+Z (+W ""U`@+Z (4J J` ( F.( F,~O@`? J+ h J h J T E ^.:,~ X*W,!,~ HW`@,~,#,~ &r X, 2+ + &s *E"*f,l+(,V,~+o,!+'`@7x ,?+(l@ W JX,!,~ "(oa@,!,~ ( ( D,,ua@@,~ 4J h+p7J,~  , *P*U*w+u,6 &?+(m l4 x,4Fx,f+}+j,c HR HR, ]+y *T"* JX 76  +i,41D+0D-+l , +(0D+j,5Dj4Fj U"E )D0D+j,!++.@@`l@+@@x,>,!+`@+,o,! (U*A+a@+@@`,[ ` Jx@@` X JW,^l,@1 (d J (AT,41D+ 0D1D+2a`.$1D.+,l+jl d`+" * J *U(T*" 3*+q7@`,?,O / 8 7@`:`$J`a`+,a+6Jx (U D*2*`,~ &? &x,/ &y,~,o+( Xd, 2+ + ,~l`+j *U(*3  J+6  +j5D h+' &? 8+ &?7H+} &~ &?4H h &? *T"; & &? 4H h,?  +=,> &?  JX,[ ``@(Ja@ +E (U"*D X$ , &f &f@@` Xd, 2+ +5 &f &,Q , & *U D"L ,,V+O &+J &,^`@+`@+ `@ + a@+ `@ ( E*U+,~`@+Y7J`,~ (4J h+ h7`J,~+ h@@`@@`,Q /  "T D]8 7@`:`$J`,V,~+\,>,> ``h+k`@(Ha@ +i X "@ f%(5Hk`j+k .(&(ah`hp+k:,^,^,~4 z, m4j "Q*U*n0j+ Y D(;$*6  +. l JZJ  J,,)5Dt6  +( (U w+tZJ.   DO@ $,)5D| $6  ,~ "`ZJ0H+y ,~          %  -  4  *U @ &? &* Y, T &?7 O ,> * J *e6@(+J.*1jr+FZ  (U""I,\7A+ &? & &? 2eZ H4JX[ H4JO[ H,n &f H4JR & (Q*T"Q+S^ H,n &f H4JX, 2+3, S &f6J^, T6@H+]6@H+.2 **(Z1rr+LZ ,I6A++v &f &Z/$e&$(D Dv  _`j+m *U*Q*b  _1J `+@@X@@a, +3 v  _ & &(s`j+pZ  `1J `+@@X *U*U*k@@a, +3+X  _4*o &i+f &h+f  `4*r &i+X &h+XLT.  "U(sLE. EQ. NE. GT. GE. &?,^4*(,{,6 &?+(,{+( 26@H; *P*D |+~=r{ &? & ,~ 2+ 7@H;+  &?l  &#  4,n & &f AA"  *H$*,w.21r+d ,~4 ,@1 (4J J0D+ ,. (@U* +jaP+ d@dPldPl@ @F  JY $ J7@K+_6J]+! *P*( + F- +,  Z (< J }@@RO@Jl@@Q, 2+7 JQ, 2a@@+ ( " Q*  L P1J a@@1+ "a@+ (?`_+$ &f , S7JQ+ ' &&, *Q(U( &@@Q6 Y+ +,x1+ ,, {-* 3,~>@Y+ ( *?ZJ b J L+(eB + ( (U*E* / }l, =+7+7+ , , ^3JY,~ JR,I &? &, T & (Q"" 7 &fa@@+ +@@_,~ &?4 jl,rd, +y, y4h C 4J Aej@ *A Q" @+ D3JR DX.$/(5h =d@+(+y7@X+ Al, T X`j@+ I &f *U*E" H@@X+ A &# &' R, T &' &)+ H4 !@,,4Fj&T1F+)1F (D" Q+*1F++1F+,1F+-1F+.1F+/1F+00F+jl 6   ** Y+ \4D N0D+j+ N LN+( $R,NmddB@`B1+ i, 1 ( b+ e`B,~!$ DS, ,~ DH  7 :x:x,~!$@+ d 1 "P j d+ kS$X$ dS$[,~@, + x./$ _ #`.$ "U(" s/2N3N2+ v2N2+ w DH ~ JH 8/5h p R ~,~7V ~,~3DX ~+ |(T {=v z,~.X /X + y *(   JR!$@ DS, + h.$/(4h h `j@+  + h, ,~ DU "E ./$ 3HR+ h_5( .2$U+ ,~6DZ7HZ,~ aj@+  "DA d*2JR+  + h`B ,~.$/(5h ,~@ , ,~, y4h (  "T  aj@+ 'f S2JR+ ' `j@+ *5L #  H + 'laB ,~2J (A"* %+ 'l@+ *.$/(5h 4L h   + h7@+ .: ++ 0 *U*T( . @x 3*  x +PJcZJ + FO@+ +ZJ + cd*RJ +S>x*>@@ (A 6+ +-J }`-J }-J }-J }-J } ( A ?-J }-J }-J }-J }-J }-J }*U*@ G 8 : ; = > @ A C D F* ] G L _ g p2&2f2F3F3f3& *.J vZ /*e U(" x&*(J ( _ ( _ ( `+@ s: v+ vl*,J b *(, J : J : (Q*Q  J [ ( J   /wRPJ * }- +6W - v^ >XW 7`+ 6J +  ( U *30*Z0j[aJ`+ Q0JX1JW+ Q, r 6  V -* 3+ + ] U  {,x+ 1l , @@RO@J,z,Ea,DZ /*c "*A" &*XJ 3@" &?6 +5 &67J }PJc */l, 2+ 61+ &6  *U U* #+4 J, S &5 ,+ ( `j@+ ;, T &5 ^ JR, T ^2JY *U* ++ @7 + 9 &?  J L7J + 3 NQ`l @@ ,5,yd !&(& "U(U* 4d`BFtcFt+ :+ K7@+4 + }/$, &?"`,E,L+( DX &8 *E*U( <*9, T,Ea,7 + 9 ^ JR,|7 + 9+ -,^ 7O@ p8  **E E J+ 7 *^ 7`XK   @@  4F Jl ,  &?a %:6@ *U*E M+ O, ,+ e J b@@@@, {+ R }PJc ( H+ X/*4J d9* ` D "U * V $> , ,+ d J b*31JV+ `*l* J dS>x*> + d J d,:*3 ""Q" ^1JX+ f1JW+;, r-* 3+ ]+ }: }+ }, - ++ +, w Q"U* g DX"P<l< BP&X d D-* 3+ ] }Q d* 0x+ n } % d, ! *U( o+ d; d b+ 3  }+ p, wR& DPH: DPH  b D,~ #  *(P( x/"c  7Z & L F ],~ & 8 ) ]6D,, ,+ J P =, !+ .& "D  :1f F+ |,~ &r wT7D+ , !+ /&0&e+ ,~ =@@e**t ( D" +(,> , ,+>, +,^@@X $e ?3H+ 7@ DX.$1dr+  *U(* 7DX+ K?  K?  K@/$e&$ &(FBFt``GFtZ 4J h(D *  .$ _  J 1J * J 1J * J  J,~*,`,~ (( "+ &*aDx+ % J+ h Jx+ h* 8 x,~ J`X x+ + h *D( +, !+,~*,`,~+ *aDx7 xa+ h + h@@^dU$ *U( 3 DS, F,~+ :  DT  NTe@, S , @+ g4J h DT ..( *E < NT, @+ h  ,>@d+ [,>,>.$/(4h D `n@+ A N^ *U* D,^,^,~@ J`B 7DZ+ K Z, Q+ K+ h+ g, + h , Q (T*P M+ h1+ g4J h4L h   S+ h, y4h  `n@`n+ [   " P* UF 5* Xh6/i6/F 46 [4V e36S+ ].$/(5h Q+ ,N+A *"* ^7NR+ c,> d,@3L+ b,^+ [,^ VS  H+ [,N+C7NR ( f+ m,> d,@2L+ a,^  H `n@+ x+ gm@+ ul  " oan@+ q  H+ x5V h 0d*@d.@2N+ h+ x  H `n@+ x * * w@@S+ [ 0+ g P*P0N 3nP+ [d+ m P1N + [ NP+ m4L h "  3J0+ g 0/ + h,> ,  ,^6@:x,~, `@+  "UE(  + T &? &D+ , 6J3Ja,~ Ja`B@+  &5+  &F,~* x ( *  JQ x,> , ,> +Q,^,^,~7J,~ J* X J R J ""T* `P+ %`@, M,!+ ! l@@, 2+5 J  + 4 4J , *E*U* " JX,!+ ,a@+ ), M+ ,!+ ( w v+ 4 w, S+ J l ( U *, 2,~ + 4 l, 2,~7+H D N /  JX,!+' *U P" 3   N, S &',>X,> ^`@@`@@] d@(L L * Ja,Q *Q(Q ;,>,>a / 8 $Ja:],V1+ ; ]  ,H,H& .  T"Q* D L * =r B7]+I ,.(=r F &) `,^,^X ^3JY+ h $^ *Q*U L, + h6@R7@G,~ &J ,, S &?@@R G JX@@G,~*9+ V2JV *"( U3J+ b,> ,,D1+ e,^ , c,>d*@&*,>4JL, Z,^.*W Q* ]0j\.*0jm/*1JQ *WA*?4, j* O+w &M,~ O5L h+w7 + h "T*" f , 3LQ+O+ X Q0L +R &S+ X0*0jg Z, JO,~fT@@H *A*T n@@I,', s0Dd, r+ q+@,)4D! T J 0D1D+!0D1D. ( D w+!0D1D+! 1J+ 0J1J+1J+)0J21J"+0J21J" (( +10*0j+/*+eB+~d d,0D+~2FU+ O l*T @,=,)+@ 2FU+~@ l,=,)+@  (E( 7@Hl`@+~,~6@H+~l` +~0Jl @,~A*``+ H`h+~ P @((H. HH I$(. HI,~ ,: .!$dN0Z4N(N=l P E !,*db DHl,~a`+7 H I0n+~ ,Zd`@ ,]7 b(N P(A"'dN 04N;= &a`@l`+~ I&*4J,h*Fh,6    Jb JH "U /lR`,~m`a`+~a@+~e`@7 H" H Lb@@H@@Id `,~a`@ "8l c@Va`7 H I``@"j 7,^x,~ 5$@"` *,wdd+D " @ad+S &3$]+L2$X9L (%$).@@6D,S *,w"$. I  %*,V4L h8$I,~"( .(+@^+P^G.9HM,>,>_ (A Q,D,^,`,^&$:,>4DV,S,^.*X+w:s\-6-Qa^'&wka#SD!y PZ! 0Y{z|i,SU4Jt ( s,q,^.*+w5*v &X#j+q ",~ $,~ 2+ h 6,~ 2 UA*|,~ +i,  X D 8,~, 6  ,~1D+6@ 2D +@@  *U" +@@ &? &X, &V &?,~6  ,~ "7+ , 6  ,~ "+  *A P" +@,)5D h $,~ &@@f ,~ 4+n &[ 4Z +n 4+n+d (T(U*@@w +d7H+ hP'5( h3(_,~ &? &_ HU &?&a &a,' U **U**h &?,~,,,,.,/1,, **T"& + ( JT ,E+J JSfb+ <N, <R,+D &b "U*E(/,~, &f T+, &f T+fb ( cO@ 7,'0D+9 ""T*71D+j D+67  +;+jD,=O@ ,)4D?1( 9; &d &?@ "U @@D i DO@ HZ <Z,+- <V,,+,>,>@ ",[ E*A*H,^,^4V h,~ &? &i,z+( &t &?,~P@$]A^A.^@NT@d_ @Q@h@$SAA ((T('+'G$,G$)X@$]A^A$^@NX@d_(1H+$)PA^A$^@N]@`BD@ T ](G,G)+j,> 6(16+g3vA+i , j* 16(+g (PT eZ @0v(+g+h,^,~,^+ h,^+ g,`+a,~ &+(,` (D(n+,~,~ (4nx*0j+`l+w`*0J+w*&*0L (U"E*v+w,~ &+( &+(7H[,~@@[3HY,~ HR &? & R, T & *E E( &?+IZ/$/4$ (Dq0d+ $D+,=D,~   "*( Xa`+6@+  JZJa`7  l JO@ ,' &   ( 4D h0$0d++0d=+'0$0h0$ 0d-+)/$`hpD+@+ **U  * R JH!*@ JS, ,~ J\ H JR+ h, {-* 3+\+@0D1D+' "A)1D+'0D1D+50D1D+51D +40D>1D?+41D +50D1D (Q*@*1+61D+7 D7,~ &?: : : @d7,~hB+'O@ ,'aB "PT*:,~5D87  +8d,~ (,~ &! &! &#+lO@ @@H@@IfT ( B+@0D1D+B,)4Dj0$00d=+Gh0$ 0d-+!dB+Y,>`,> *U(E*K,>`,>a,>X,>R,>R,>,>,>J,>,>Gd,,z+y+j,^G,^ *U(U S,^J,^,^,^R,^R,^X,^a,^`,^,^`+ h,+ h  @( ,  ("\4J h0*0j +_/*+a0*0j+j/* $(0.((`dp+[,~   T Ed0(0h+u+Z  4Dn0$0d +k`hp+g+jd`+j $2D7 * E(m+ h+je`+p $d+ h $d+ hd @@R@@w,5Fw0D+$ "U ul ,4Fj,f+z 70D5Dj,Zm ,c HR HRdB,~, ],~ *E Q ~7@w Lw JX``+@@\,!1l 74D0D-+l , ,'+ "( 0D+d@@`@@` * Ja,!el,@1 (`@+%4*/* (E(  J\0D+jd@,g+@,)4D0D1D+0D1D+0D.1D+  T"0D1D1+j`@+dB+,.+j+ Xd@6JG1+- 7 "D*Q  d`+ h. \d@. \a@ + g X \ Fv+ g J,Q / 5j  *T*"(/ 4*$ a.j` 70D+ /8$Ta+ l,@,~4FjdP "1R&T1Fl1Fl1Fl1Fl1Fld@1Fl 1Fl 91Fl1Fl1Fl1Fl@1FleP+j4DB1D+B0D+j (B+/aP ?l+ h, d 01j,~d*@&* LQ4JK&*0,0l,~ (@ J+Hl Q0L 1L :~,~,  d*@&* LP+R4JT&*1,1j (ES+Q,~0,:~,~4J]1J?+^0*=+_0*+[ &#.* ",~6@M "T" [1j0+Z &g+Z &$,~ &%,~ &&,>,,^ &!,~ &? &&, "Q(*d7@+m,c HR!$@ DS, +([(0DZ++ h &? &), &? &- *U*U*l &?+( &/,}+b &? &2+i &5+~ &? &8,/ &9+( &<+( (U*U"u &> ,| &? &?6@V+(,}+b,z+( &B R, Va@+E &F "U*U*},~ &H,+( &K R, T+% &P+( &S,}+b &V+( &Y+( *U*Q* &\ &_+( &a+( &f+( &i ,R, S &j,~ &m R, T &n+( *T*U* &o+( &r+( &u,~ &x,}+( &? &}+i &? &,}+i & *U*U*+( & R, T &+( &? & ,/ & +( & +D &+( &? & *U*U* R, V: \ &,= &+( &+ &? & R, V &,l+( &  *U*U*( ,R, S &!+( &#+( &'+( &? &++( &/+( &? &2+( &? *U*U*0 &6+( &? &:+( &A+X &E+ - &H+. &L+J &f &O+ + &?*E(U9 &S+( &V ,| &?+( &Y ,| &\ &?+(  F J N W,> Y(R   ((@STARTING FORTRAN DDTx+(GJQJ(R@~`C\ b=g0` "ggm6$M!> *>+?%FDTPOV Program overlayed by  & ***[ Program suspended from FORDDTOpen section: ]in high segment *. &,+Cin low segment at an unknown location &1+J + in _8KK|@ (7KKigSC$\@S@ l* J+`@ l*GJ+p- v:(,( (?,~Q3@M?I+,,?%FDTCAB Cannot allocate buffer for help file H%FDTIOE I/O error reading help file%FDTNHF Cannot find help file; I'm sorry, I  UPcan't help you2F6+y+Hem}R< qG3dG+L+(@(T H,=,> *Y X D,^,),}+T<%Character string must begin with single quot "Eae &]+(H04D(+H FORMAT: '<R.TRUE..FALS "EjE. &?+ = Hx?FDTDTO Dimension table overflow.h6hDh@h r?FDTMLD Multi-level array definition not allowed.W%FDTABX compiled array  { bounds exceededNo &}+9Array specificationsUSED ARRAY DIMENSIONS E [:,] - F10 ORIGINATED &+Q DP &+R CH & +T SP **@ & +T FORMAL & +U,w+(,:xNo pause requests &? & (A*+vGROUP AFTER PAUSE LOCATED INN/A &?+YON ERROR &f &f &+]IF  "A  (,=+f . (,=+XNo group specificationsGROUP ,  &? * *D"% J_+ #+( IS GLOBAL)l + Yl + Yl + Yl + Yl  (D  .+ Yl + Yl + Yl + Yx(Agw]!+y6$ bPause at &4+ Enter P6ing FORDDT from routine 0 L. b  d+ V, .-,Pe,^+ (P? h P1N + [+ ^`@+ y+ } equivalent to in (COMMO UGN) , S+ J &+ FFormal parameter O@+ \MAIN PROGRAML# &O (@ P+ gstatement &P+ Xline <+;iK,PMf9 " &V+o- X%FDTCHI Characters ignored: "?FDTIAT Illegal argument type = |Arguments are: Aa. = .R LABELH@%FDTECI Buffer full excess characters ignored, i?FDTIWI IOLST call currently in progress: Cannot process ACCEPT or TYPE until curr rent IOLST is completed.%FDTIWI IOLST call in progress at this breakpoint: Will n zot be able to process ACCEPT or TYPE until IOLST is completed.%Trying to write to  illegal address; wrong mode??? &+(%Trying to write in high segment; wrong  ( mode???%Trying to read from illegal address; wrong mode??? & +(<0* "0j+w,~0%Improper byte pointer; wrong mode?%Null character string; W  rong type???[Implicit OPEN HH>d+@ m, s+ p^ *%<Program name: ,z,}+b?FDTIAF Illegal argument format Type  -H for help?FDTIPN Illegal program name?FDTMSN More subscripts needed?FDTB 6OI Bad octal input ?FDTLGU lower subscript .GE. upper%FDTNST Not 'START'ed (>?FDTNFV is not a FORTRAN variable?FDTBDF is undefined &C+} is multip Gly defined?FDTINV Invalid value ?FDTNFS Cannot find FORTRAN start address for O ?FDTPRO Too many PAUSE requests?FDTCSH Cannot 'START' here?FDTNDT DDT not X loaded?FDTCFO Core file overflow?FDTFCX Format capacity exceeded please re- `type?FDTICC Compare of two constants is not allowed?FDTIGN Invalid group number i?FDTLNF is not a format statement?FDTNSP no such PAUSE?FDTCCN Cannot conti qnue?FDTNPH Can't insert a PAUSE here%FDTNSL No symbols loaded?FDTDNA Double  zprecision comparisons not allowed?FDTTMS Too many subscripts?FDTSER Subscript er ror?FDTNAL Not allowed?FDTNUD not a user defined array?FDTSTL size too   large%FDTSCA Supersedes compiled array dimension?FDTNAR Not after a re-enter %FDTXPA Attempt to exceed program area with ?FDTPAR Parentheses required?FDTFNR   is a formal and may not be re-defined%FDTNAA 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 5nce?FDTIRS Illegal range specification?FDTMCD Compile program with the DEBUG s >witch to type a format statement?FDTIER Internal FORDDT error - 1?FDTIER Interna Fl FORDDT error - 2?FDTIER Internal FORDDT error - 5?FDTIER Internal FORDDT error  O- 6?FDTIER Internal FORDDT error - 7?FDTIER Internal FORDDT error - 8?FDTURC Un Wrecognized command ?FDTCNU The command is not unique D"Pnu' %Ju3Hu3I3u3ILu3Ju3J%u3KO D"u3Ku3LTu3Lcu3MR%$u3\hu3]sX wXz D"u3]lu3^u3^Mu3_Zu3_`u3`^u3`u3aX{V D"&(u3pu3qu3q X X&-'6'0(4 D")Fu4}e*lu5%n+-Xcw],-0/A @"0 Y"Pu77Y);(2852rz9)R+G`BE D"wg=b2b&7}n)D;p8Hk)obg)vwfPQ-R_A[ "u#gSR b.&.a:Jo_:K*Z:[w^;w];#UX[ @"G?(iG@MkPD5A x\1tP@,c-{e. f D ..N 9.lQe+txm+thjPLjR,cK,2mW  }Dm  D"-%J Dm -%J" -%J# Dn -%J7 -%KB |-%LA .2A% @".2B&.JESR/'k~@XwrO 7\,M 64n@4nN 84nK; 9 D"4nMY :O 8]29 d5ai eO F5eQ5eQ^> &O  D"_ _ _ ][R (5':wPO`wF 6%. 36%. 3 D"6%. 6%. -6%. ;6%. @a 6|A:xR:e;R:e_:f 9d "R:f#[R:f4.PDD8myG>KtP|KG?#&~P(. "HFm %P- HXi`HY}EHYI&^! `J2/&oJPpHJQCm D"J[;=lJ[< jKthvK}&uKhwK.vKI 2KL 4K 8 D"K 7KD=KD=KDH}LNG_L[ 5RL_+@RL_wLmgA D")M%:M9>M** sMC"CR v)R)R)R)R D"PR)TY!M>H)O]+T2 hMR/Q hMR/Q gd@?O(gw P^6]@P*R]|?gR^_PbDPb'7Pb>hYg^g Gc D PcUt` vCb_BbA_%@ P !_%g3uP $YxIPd!7 D j &d*" %_-f !R_b$*PeY; aP"c ^ZGz&,&-i D"k~Jk~ \k~ }k~ &-"k~O&.&/x&0 D a_rj2a_rja_{Ja_{ Ra`Gl(lh l a`=g "a`G6Ra`^.a`c"Nl?a`eC`'1Ml')al$hVal$iU D"al$jDal$j/al$n"l')Sl'*Il'*@l'+l'+Gl'-z D"l'3 al'}8l'9}d ( +d  .L ReD$?en +g!6 P G\P?:PM7gsB ]gsmydgsnc t?z1 D"P>-3-4/5/60708Rw-,n  D"x#^ ]z"nz@z"pqBz"pr sz"pr pz"psaG^ C9N} 8H  }*2Pa_oCO:U*RLt[b^Y1o Kw( Kw) D" Kw) Kw* Kw* Kw+ Kw+  Kw,  Kw, Kw-Y1p D" Kw< Kw= Kw= Kw> Kw> Kw? Kw@ Kw@Y2q D" KwP KwQ KwQ# KwR$ KwR' KwS* KwS+ KwT, KwT- D" KwU.Y2t Kwd0 Kwe1Y3uY3yY4~Y4Y5D ^}J^$H K{: K{4~R` R`*S JoJSuHA7$SXW}uS] Hr%P+QH D"og ] Rx d Rx i Rx ec )2 XQ}K ` @` WJ65.%S6`PR f f. f/ f1 f, " f-SoJm e~]x xL  f^ ~*Pf4 cM ,S,, @ D"Ibf}_f}_Hf` RE & Kz Kz #Kz ' D"Kz (Kz * &# Kzy Kz{ Kz|  &% K{I K{M  D"K| cLJg g z g |`j yS@$'@ B-oD^ pD^ l D 'C]? y? wS<S[>E$\p?E$u;BPQsIQsI9PSX[SXh[g  D"%u &I l&Q q&R n tqQ n tqR p^'t4|S^(h @ "^\&~ $^\'_ (^|Y |^|Z ^|^ {^|{tS_Y\ S_Y@c_#C K{@GOSg?-%>DlmvKyz` D" : t'y = t'z A t'{ D t'| H t'| I t'} CiR/XPB D"/#.a"[G2W,G^2`V%@0m#7"&7"*7"<2lug! D"2mA=5(a:=5(sO**PYC*PZJ5)H5)575):45),f; D"5)C;4vO> 4~0j4~0fK5y5 KJ 5  =5! 5&  D"*[F5$9O5$9V5$:R5$;Z5$;I5B 31;(U7y< D:A(9=aA PVPEPEPFPF9 D"9a .KB 9c 09c 1K6rxKDOpX4 +K}:XpZc D"K!; pZZUL$  (M.~ ^M/Y awKy M/a@ MPg `MP r D"MPJ pMPJ vMPJ wMPJ xMPJ nMPSgIMPSg `MQ `yIg "8P9K@ UOy OOzt_PwXZ4=iP3 k5H@P^AY "Pwb[Q.F 6Q.K 897 S9y T9y V9y Z9y c9y e D" p8 h9y X9y j9y be^V?QY_V?QZiV?QZpV?QgK D"eJ `VG(i 2VG(i .VG(j }i }j }k "VG)= '}k + @"}l (}l ,UVNvj@VS?+FV\YV] gV`GW|gUW@ "W_2\W.4k:gH:gR:0--  w  ) D" & ;:0-z:0.:0.$:0/5:0/:00:00% D":01Y\m Y\o.SY\t9 Y\t: Y\t Y\{ ~hrUY]1" DY]4 ~Y]4 Y]] HP @#Ze LZM GPXPYPY "PZPZP[c)=_=w;--;--;-.;-. D";-/;-/;-0;-0;-1fYv5F8V f[ 5f\16 D"f_g4F?ymF?ylF?zlF?zkF?{kF?{jf" _;/` D"F_aH C=fDy@;j$q;j&u;j'vUl )\;mwUlr  "Ulr 9UlrVUlrY[d2glW/QhlW/Qi^~kXemWQ^\Umm[@ "Umm6GmoP `&moV: `'msNQ;nH;oKm~nSPm;DmQ D"_~aQ_~aR_~bTmOjN@)]o"bfzd hd Mo#E[ D"<%e<%hqQed<*h<*im0h<*j<*k<*m~ @"<*nrhWUrhs m2R<*omrnG?m2rb<*pj<*qw D"<*sm3y m4E<*t r/7=<*ty<*vrDm/<*v  @"rTs<*yrV*76@?QZJCcVl(VKP@A,+@ "6@6 `7+}LAuhFAuivAuiOAujSAuj]Aukf D"AukvRyRR{XR{LR|Mf Mg R| R}J D 8(i<m8)o84E<p84wrP: F=S[J\R+ iggJ+e   I(WW!s `r%a[Qgg[l{eg\..g\)7b\)8*@`r'Ig\2g \B:/W.J)WIMWUS8 ( c0