Trailing-Edge
-
PDP-10 Archives
-
FORTRAN-10_V7wLink_Feb83
-
forddt.rel
There are 45 other files named forddt.rel in the archive. Click here to see a list.
~*(AgigI(0(AgH/?*# "U*U*+ - i,+#- i,+",^ tO@+ u- i,
&G
&5
&G *# J* A"T
-<, !7 1,, *Z
JS
JS
8 j1 JT@@T". "** n&+ ,
8 j'+ JTZ*9XJ
h * J
hRJh,4O@R 9
: (P*Q
,'@@XJ] Mdl@ : XY, + Ml @M!*Z J
^ J^ "U(T*"Z* JUZ
h5J*6@\+*
; JYl , >,i ;d(@ H\ HY,"ZU **U *A; @M@"7 ,, 9@@x@@O@@X@@Y@@P@@N@@@@g
8+
&G *UP3,,E4F*vFe5Dp7$,elZe6Ox<DO*(J}(D5D9 2 P; f3F+B2F+@:Q*d<5RA:1RY /$`.6 D X+C\G"(1G>vJ7I I&l[YI?,+OJ~\O?%pQfY>[>$P]F@B-`a.9 em}R *U*LgR-gR~gSrigPo"@;7{87%h
h4Jz7@R+$
(*A*] , +*!*Z J,
\ JYl !$@ DY, >+XJh @M *A( f,4,-* p@<+4 n,y+1
(,+1,i+%+ 1Z
h *Q
U
nZh4Dz Ja !*gp3K,D D7@R+$,+,4!*Z J,,4 z *U*Q*w,5Dp4Fp,j HY,"+* \+y
< JYl , >+ZJa+,
= "(Q j2+
aj+ ^5 >-*>4 *= j=+@
B j!>-*> * Ja+, *U*Q(5 Z
h5J
+
hRJh@@@@,-* p <,,5Fp4Dp0D+p *AU*,5Dp4Fp)D0D+p b+* `
S4J2JS+Z
*
S4J (T*U*3JS,~
&G
&B
8 j+ 7@T JT3JT+ JT
&E,
&F
&G7Jc (U
U*!
(Z
+:6@R+3 ^^Z6@R+6 ^- i,
$ Jc JUXJhO@R *QU**6@V+.
; JYl , >1,"
4
&FZ
U,:
&I
`,
q
&J M *U
P(2+* 9+.@@R@@c@@R,~ 9Z
h4J
( */A* JU+.7@+< "Q"U*;2j+M
&N
&Ol ,G+<1+B J,
p
&P
,/7@c+D
&P *D(U*C
c,
q
&G,~4 {l@,y+1+wZJ@@6 ,+f,5Dp4Ff *U(*L3FQ+u6 ,+p3FQ+f2FR+pd l,G,~ J|6 ,+p@@|dB *ET+R5DV,.0D+p,0D+p[f1FM+b1FI +a1F\ +a1Fi +` "*E"]1F}+`1Fy +_+p:|:|:|:|:|l,G,~ J}dB+T
V *A*U*e J7
W,G1
(4*p*
6 ,+s J^,5Dp
^4Fs2FQ+p6 , *DE(n+,
5Jp1D+m0*0j+Q
X
^l ,+, +*@**
*E"v J^+m O`d+6@b+ (3D].*+Hl`+ *"U* J} *},~,W1L,~+ !*Z JZ
h4Jz6Jc+
*X3J+
c4
c (*P(,G1
(4*p+
d
c Ja,4,-* p+a,> " B/ <.,7` *D*+& @/:S"@X BA."A B@d7X!&>9 (,
+( Y B,X@, *@@@-@@- Y!$@f@e$+!0D 1D
+0d+(@@:`Jl$ (D("!+(Y@+$
`@+'
` +)Z-:
'+!
&\++
&`7
&d
&g") <.,
&G,^+*".x/ (Q/4 :l@,y++ $jZ1H(+6.$1dx+2+ (3H].*.* *Q*8@@@@@@+*2Fj+p+4 p@@_7@R+$l,y++ J`B **Q@, , +
O[
(aJ+ >6 ,+p4Dp1D+p1D+_0D+p *A"*I,4Fp*k1Jm0@ J4DO1D+O0D+p+I
6@N+Q@@|+T AD"Q`p@a`+T0J1J:N1J+1J+ 1J+1J+e1J+Fd0@ "U(Z1J+p1J+1J+
1J+
1J++p
JN
| J|d ,>X *E
U*b,y++p,^2HX+6a@ +i |2d|*| D|
^+k2*N*
N J (A"P*k, +
O[
(aJ+ >1D+I4Dp+pl0 &,M
_*
,s *PU(s*
K J_:aph`@1+l,>X
k JX
,s,G+ 1 (U(U*|+0,^ JX
_ K:7@N+`p+l3dN+r+*>
@@,@@Ne@ "U
`ph>
,.+*,
+rl0+&`@ &,M+rl0 &,M+rl0` (T*@*
m J^ &,M
^ J^+r`p@m0 l0,>X,>^,y+ *D"D(+p,^^,^X ( D_ap@+r
(J+rl0+$l0XD,D,
n J_7@N+$d0@d,.6 ,+p ,@@_ "A" &dB+?
n`p@* n,D1D0+=dB+oD`n`+)1l`@ (U(T*/+0ap@+B7@_+2 J_+4 J_aB+'ZL-,ap+r _4Dr _ QT"7(D)D(s5H:)D|+8(Ddfl D_ F_+rmB+)d+,d0 *U"A
@
n J_ J_+rZL-7@N,ap+r$sJ(J+rl0,.6 ,+p "D"(H0D+y^ $|f Fz *,w
,s,D0D+T,D1D+T *U D"Q
o J,.,+Y`
,k1L,sd=hN * J- * (U A*Y<([J+Y |/|4h`
^
($* z
L=j^
o J,.6 , *U U b+c,+*
^7@|++*l0@*6 ,+r,.6 ,+r@l *`p@ T"D"j *
1,.6 ,+r0D+o``@+p+k1D+k0D+rh @+k/$ (A**s4$w0$+w)LG<Jw,.7 ,+rap@+z L_ N_+z N_,e`@ *U*P({+rL@_L@_:_7@_:_+r, +,!+*
z,D0D1D *QE+ o F,00D5pXJ1n0+zd4D,D0D1D1,0 (A"U
5D0H+) 0D+,D1D+
+7@R+$@@xl l @@`` E*Q*m d ,d ,+*@@N@@|@@|,y+1++,!+m { ,Y *Q,
p
&|
XF1d +m
"+ ((
&G*}0J+
J^^*{.JY "A((&,>, +8,^ $(+
&}
d
(,~1D+reB+., m Q (P
Q". JP
(*
P Jd`p!l,
5+@@N*
YaP+D^ $|4H8 7h *,w
,u`P@+<0f &,=+D,p
&~`
(~ "("?1H,u*1J,\,\=f>
&~,~aP+F,p &,DaP+L,p (@T H d
J_
&`@ &,DaP +P,p d
J_
&,D "D(E"PaP+S,p 4,
aP+W,p 4,
aP@+W,),
aP+[,p (T*"Y,aP@+[,),aP+a,p
&(J,aP@+a,)(J,aP *U
T(a+d,p5*d
&+d
&aP+f+2
&G7@N+m`P+k:
d`@:
d *U P*j3jN+.+m
d:|3d|+.`p[7 ,+,~eP+
&
P,~ *E(Q(r JN
| J|d ,>X,y++p,^2HX+6d@+-2*N*
N1D+p U(*{l aP+. |2d|*| D|+.``0D+,5+6 ,+p+y0* ""*0j+0D5Dp,,^x+ma`+*,^x4Dm+p Jd@@e,
f<
*P*U"
J|.
d JN
d,~dB+7H(s+3H`+ HY ` Ha,>,,^ T
U* ((H(nHx+5 Hx,>$*.
,>,>ZJ
J, *P
Q",^,,^,^x Hx+m+l , >+
QJ`.* *D"%XJ`
Y J`,~()*+,-. "D"./0123456 (D"6789:;<=>? "D"?@ABCDEFG (D"GHIJKLMNOP "D"PQRSTUVWX !D(UX['Z
YZ(4D]XDY,~,*
&+*[YXJ@@(QJY,~ "T(ad
@@NZ&ZZ
Z4JiZ(3D^+f Z
(+c6((el`hl + E i,>,>
^l,G+y+y,^,^ hd$@G2Dh,~l h (T r$d0D1Dm0De l $ DQ$ 5DzZ:h+ ,^,^,~ Q*"zlZ+h JN+x,>,,a+,,d@+*a@+}+#,^,Z J (",ZXH@@ ^`@l$`@ l$ D QJ , + /SD( D( (Q*D" Je,~,Z eXJ+ 6Je+,a+;`@+[
(+`@+Z
( *"Q4J Je ( F[(. F,~O@e? Q+ h J h JZ:h,~ *DT
^*^,a,~ H^`@,~,c,~
&
^,G+ +
&
,*+* (T"E %,,~+u,a+.`@7 ,+*l@
^ J^,a,~a@,a P
-,~[(Z(XD,^,3a@@,~Z
4J +.7J,~Z ,^+3,w **U*6
&G+*m l4 5,4F5,m+;+p,j HX HY, + J^ > *D"E(>6 ,+&,u1D+B0D-+Cl ,I+*0D+p,5Dp4Fp)D0D *T(Q*G+p,a++o@@fl@+T@@},>,a+R`@+P,,,a+Ra@ *U(
O+R@@e,
f J}@@f
^ J^,^l,G1
(d J,u1D (
A
X+]0D1D+sa`.$1D.+],*+pl d`+_ * J
3* **E"`+x/
1j+c+ 7@f,|,
/
8
7@f:f$Jfa`+T
f "Q
Q(i`@.jf
^7J},~2*f,~
&G
&,p
&,~,,+*
^d,G *Uq+ + ,~l`+p
J+T6 ,+p5D +.
&G
8+
&G7HZ *U(T"z+
&
&G4H
&G
&
&GZ(ZZ 4H ,+~,>
&GZ
J^, (Q(Q(
fa@ + ^$
,,
&}
^l,G+;+
&}@@e
^d,G "U*U(+ +;
&}
&,
,,
&
,,,+
&+
&,^`@ (D"+`@+ `@ +!a@+#`@+%,~`@+7Je,~Z
(4J + (U(U(7`Q,~+ @@f@@e,
/
8
7@f:f$Jf,7
f+`@.Jf "Q(U*$,~4 0,
4j0j+ ` D(s$*6 ,+&.
JZJ
' J, *T*E-,05D,6 ,+*+,ZJ.
' ( DO@,$,05D4 $6 ,,~
" P5`ZJ0H8+1,~
?
G
N
V
]
e
l
*U
x
&G
&I
`,
q
&G7
7O
,> * J *j6@(+.*1jx+~
&G *UE
&(+,
&G
&*
&G 2jZ
H4J[
H4J[
H,
&}
H4J
&-+
"D*T"
H,
&}Z
H4Jl ,G+9,
p
&}6Jc,
q6@H+6@H+..2 *T Q*1rx++,
&}
&/Z/$j&$(D D,
`j+#
1J
+/@@^ *U"U*@@g,
5+9 ,
&1
&()`j+&
1J
+1@@^@@g,
5+9+ *U*T#
4*%
&+
&+
4*(
&+
&+LT. LE. EQ. NE. GT. E*Q*+GE.
&G,^4**,1,w
&G+*,1+* 26@Hs+4=r1
&G
&3 U4,~ 2+<7@Hs+<
&Gl
&5
4,
&
&} *H$*,/.2 "E"<1r+5d ,~4 G,G1
(4JA J0D+G,5+paP+Gd@ *U*EdPldPl@ @M
J_
6 JZ
h4Ja6Jc+
+
c- i,Z
T
QMZ
(<
J
(@@YO@Rll ,G+=+=,ea@@+[ L
W1J ""T*V1+Xa@+[?`d+7
&}
,
p6 _+^,1+_,-* p,~ *U
*^>@_+[ *X JXJ
h+*eB +[
(l,S+=+=+T,
0,
c (U*(g3J`,~ JY,"
&G
&,
q
&
&}a@@+^@@d,~
&G4 pl,y "T**od7$+r, !+y @@_, 65$x
4Jwej@+z3JYZD_.94$s ""E*xaD+qd@+*+7@_+wl,
q _`j@+
&}@@_+w
&6
&9 *U
D"
Y,
q
&:
&;+~4 "@,,4Fp&k1F+<1F+=1F+>1F (D"( +?1F+@1F+A1F+B1F+C0F+pl
6 ,+ 4D 0D+p *T + LU+* $Y,UmddB@`B1+ l , >1+ `B,~ Q !$l DY, >,~ZDO
7
:x:xd ,~!$@+ ,>,> (@ " C",,^,^4V + D d+ 'S$X$ dS$[,~ 2 (P
E* +7Dp1, -, !,~ an@+ 0.94$ -,~2N<3ND+ 32NE+ /_ "( 3.&ZFH <_#QFH <9 / . 6ZX <1H8+ :=6 7,~[X <PX <.,~ U
( >@,e`+ D + D[, a1+ , !,~ V[+ ae`+ L7D`,~ " * Gah@+ Kd(3HY+ X.94$ F,~`B ,~+ Ie` +@ @4D P, R1 * U* O+ X, !,~4V , 65$ W ah@+ VfY3HY+ Y.94$ R4L 7 A @ X7
+ `h@+ X5L ]
0+ VlaB ,~ 2H+ Vl@ "QD ` + X_[4D #.[ $ 3HY+ X_5( .Z[0h,~+ d "U*U* i7@+ k: i+ n ^Z>~*>
iPJh 9 MO@ 9+ iXJ i
h "E qd*PJ iS>~*>@@+ i-J
(`-J
(-J
(-J
( A z-J
(-J
(-J
(-J
(-J
( (
-J
(-J
(
2&2f2F3F3f3& "T
U"
-
#:
Z
,/*k&*(J (
(
(
+@
:
-
#+
*
&*
& *@
$*
'*
'+
#,J *(tXJ
, *(XJ
-
/x
PJ
5*
(6@k *T(
-+A
,?`k+
8 JZ
,[
/5J
6*E0*Z0j[aJ`+
m0JX1JW+
m
+
5 *T"U"
5
- i,+
91- il ,@@XO@R,,X>
,Z`/*i&* (U("
>XJ
V@"
&G6 +G
&H
(PJh */A*ll ,G+
Y1+
J6 *U U*
F+: J,
p
&P
,/+
L
`j@+
],
q
&P
c JY,
q
c2J` *U*
O+
a7 +
\
&GZ
,XJ
h[
,4J
V Ul @@,,,d !&(&d` *U"U*
WBFycFy+*+
h7@+: +
(/$,/
&G"`+* D^
&J,
p,27 *U"T"
`+
\
c JY,7 +
\+
P *7a
- K
-Z
,@@[4F
gl ,+
&G *U*Q"
hZ$96@+
k,B+ J@@,+
o
- i+
(PJh ( H+
u "A*E
q/*4J9* D $> ,B+ J*E1JV+S>~*> +jK,L *Q
y*E 91JX+1JZ+1JZ+1J[+ aJ`+
q1JW+
s-* p *T*E*+
(:
(+
(,- i+ +lLP
hPJ
(!* BJh-* p,
(+
(Q
*Q*U(
*
0~+
(P
h!( BHh ,7+;
+ p
(Ph H0~!* BJh * + M6Dt,B+ J
,7+ .&3fM+,~ &x
x
6D,7 Q*
+ /&0&j+,~
N@@j**y+* ,B+,A
@@^ $jZ "*$1H(+(7@XD^.$1dx+#7D^+ J
J
J/$j&$ & "
,(FBFy``GFyZ
4J (D.$
| J
|1J} * J
}1J} * "(5 J
} J,~*,i,~+<*aDx+; J+ J~+ * 8 *= x,~ J`X x+ + ,7+,~*,i,~+ *aDx7
~ "@
F
+ @@cd $`@"$ DZ,Y,~+O DZ N[e@,
p *P*
N,U+ 4J DZ ..( N[,U+ ,>Nd+w,>.95$X "A(Q"W`n@+U Nc,^,~@l J
MaB +]6D`l ,k+a1+ `@ *U
*_+ J L, !+O
$X,k+ 1+ 4J a@+h2*+ +i *U*h6@3j+
+ , 65${ an@+y`n@`` e.@+w`n@ (*p+w F
5*th6/i6/F
46
4V
36Z+.94$k+{ UA
y`B e`+w Z+k4L `@+
3J0+ 0/
+ `@+w,U+P *"
7NX+
,>
d,@3L+
,^+w,^ VZ
+w`@+w,U+R *
7NX+
,>
d,@2L+
,^
`n@+
+ m@+
l "P
an@+
+
5V
0d*@d.@2N+ +
`n@+
@@Z+w "T
a@+w3vZ+w VZ
+w7
07
0:x+ W*W0N3nW+wd *"(
#+
W1N+w NW+
,
0`@+
)
+
q
&G
&T+
(,
0
3Jg " A
,,~ Jg`B@+
/
&P+
(
&V,~*
x JX
x,> ,
4,>
+X,^ *"
4,^,~7J,~ J 3JN+
?*
^ J `P+
@,a+
G
l,G+; *U*
=+
.+
O,a`@+
i,a+
C
} |+
O
},
p+
e
l ( U
E,G,~ +
O
l,G,~7+W D N
/
J^,a+. *U
P"
N
N,
p
&9,>^,> ^f@@e@@b
d@(L L
* Jf, *Q(Q
V,>,>f
/
8
$Jf:b,1+
V b
,H,H&
.,( T"Q*
_ZL *
=r
]7b+Y^
,,.(=r
a
&; f,^,^^
c3J`+ $c *U*T(
g,
*@@N+ 6@X7@N+
D
&Z ,X,
p
&G@@X
Nl,G+
D7+W *TD
p+
O*\2J\3J;+
,>d,,K1+\ ("
x,
v[
x.*W0j\.*0jm/*1JQ *WA*?4,
V+
&],~
V5L L *E(T
u
X0L+b
&c+
u0*0jg
Z,JV "UU(,
dJ1D ( A
1J++ (""0D+2Fe((
l,D,0+@
l,D,0+@6@O+l`+0Jl@,~A*``+
E
*dh DOl,~a`+
OP0n+ ,
g(N P(A"
04N
a`@l`+
P&*4J
7
7
JhJO "U@+e`@7
O"
OLg@@O@@Pd `,~a`@ "
O
P``@"j>,^x,~5$
%*, .(+@
,:QFx4D
x.*X+:s\-6-Qa^'&wka#SD!y P
&f
? + *)J,\+
&f,~ JP".
P *)*.*,8.,~Z
1L+gZ
1L+)Jn(L'+QLx4J ( ,
x.*+5*
&h#j+
",~
$,~
2+
6,~
2 UA*,~
+,
0 o D
8,~,)6 ,,~1D+6@-2D-+!@@- *U" !+@@-
&G
&h,(
&f
&G,~6 ,,~
">+',)6 ,,~
"+' *@(()+@,05D $,~ 4+
&k 4Z
+
4+
+@@| += (Q*U(2XP'5( 3(o,~
&G
&o H\
&G&q
&q,B \*h5
&G,~E *U*U(:EE-E-/HEIKEE0-0 +
( (UQ*C J_ J_fr+: <Z, <],+X
&r,~,,
&}
_+,,/ *Q*T
K
&}
_+/+@D (
sO@,,.7 ,+R@@_@@_,~D,DO@,,0 (U"PT4DV1(9R
&t
&G He <e,+F <a,F+X` @\(_ `('+'G$,G$)Xd(1H+$)PhG "
h(G,G),> 6(16+p3v;+r
, &*
16(+pZ
:0v(+p+q,^ E(Pq,~,^+ ,^+ ,i+~+,~,i+,~,~
(4n`l+~ "U"y`*
0J+~*
&*0L+~,~
&*
&+*7Ha,~@@a3H` "U*E ,~ HY
&G
&
Y,
q
&
&G+"Z/$/
(Dq0d+
"T
$D+,DD,~
"*(
oa`+6@+
JZJ
'
JO@,,. & ( 4D 0$0d+!+$0d=+.0$0h0$ 0d-+0/$`hpD+@+ *
U('*
Y JOl !*@ JY, >,~XJa
OJY+ ,-* p+a+@0D1D (A"/+.1D+.0D1D+<0D1D+<1D
81D+=1D+> D>,~
&G:,:,:,@d>,~hB+.O@,,. TU
@aB,~5D?7 ,+?d,~
(,~
&
&
&6+lO@,@@O@@P * @"Ifd+@0D1D+I,04Dp0$00d=+Nh0$ 0d-+dB+`,>f "U**Q,>,>e,>f,>^,>Y,>X,>,>,>Q,>,>Nd,,++p,^N "U*(Z,^,^Q,^,^,^X,^Y,^^,^f,^e,^,^f+ ,+ @( , " @b
4J 0*0j
+f/*+h0*0j+p/*$(0.((`dp+b,~ "k0(0h+{+a 4Du0$0d
+r`hp+n+pd`+p $ *D(s2D>+ +pe`+w $d+ $d+ d @@X,5F}0D+ "U
|l ,4Fp,m+ >0D5Dp,am ,j HY HXdB,~, ,~ *D* L} J^``+$@@b,a1l >4D$0D-+
l,I,.+ 0D (Q@(l,G1
(`@+,4*/* Jb " A0D+pd@,%+@,04D$0D1D+$0D1D+$0D.1D+$0D D"E1D1+p`@+$dB+$!,5+p!+$
^d@6JN1+4 (Q
T"& >d`+ .
bd@.
ba@ +
^ b F|+ J,
/
5j "U
E/
/
4*$
f.jf >0D+ /8$Tf+l,G,~4Fp @7dPR&k1Fl1Fl1Fl1Fl1Fld@1Fl 1F "@l1Fl1Fl1Fl1Fl@1FleP+p4DI1D+I0D * H+p+6aP
?l+ ,
0d
01j,~d*@&* LX4JR&*0,0l "(Q,~+Ol
X0L1L
0
d*@&* LW+Y4J[&*1, "" Y1j+X,~0,:~,~4Jd1J?+e0*=+f0*+b
&.*
",~ (UD"b6@T1j0+a
&~+a
&,~
&,~
&,>,/,^
&,~
&G
& (T(*j,7@+t,j HYl , >+[(0DZ+ +
&G
& ,%
&G
&$ *U*U*s
&G+*
&&,+i
&G
&)+&
&,+
&G
&/,p
&0+*
&3+* (U*U"{
&5 ,
&6
&G6@\+*,+i,+*
&9
Y,
qa@+<
&= "U*U*,~
&?,%+*
&B
Y,
q+'
&G+*
&J,+i
&M+*
&P+* *U*Q*
&S
&V+*
&X+*
&]+*
&` ,Y,
p
&a,~
&d
Y,
q
&e+* *T*U*
&f+*
&i+*
&l,~
&o,+*
&G
&t+&
&G
&w,+&
&z *U*U*+*
&|
Y,
q
&}+*
&G
&,p
&+*
&+
&+*
&G
&
*U*U*&
Y,
q:
b
&,
&+*
&+
&G
&
Y,
q
&,*+*
& *U*U*. ,Y,
p
&+*
&+*
&+*
&G
&"+*
&&+*
&G
&)+*
&G *U*U*7
&-+*
&G
&1+*
&8+
&<+
P
&?+o
&C+D
&}
&F+^
&G*T*E(?
&J+*
&M+*
&Q ,
&G+*
&T ,
&V
&G+*
M R U ],> `(R -
5STARTING FORTRAN DDTx+*|GJQJ(R@~`E=g0`gg >m6$M!>-*>+
?%FDTPOV Program overlayed by *** (F[ Program suspended Open section: ]in high segment
&K+<in low seg P*Oment at + in igSC$\@S@
l* J|+U@
l*GJ|+e-
*W:(,~Q3@M?I(%FDTCAB Cannot allocate buffer for help `file%FDTIOE I/O error reading help file%FDTNHF Cannot find help file; I'm sorr
P"hy, I can't help youem}R< qG3dN+&+*(_ H,D,> o D "Pq,^,0,+.<%Character string must begin with single quote
&t (Py+*H04D*+
H FORMAT: '<R.TRUE..FALSE.
&G (P+q = H0?FDTDTO Dimension table overflowP.h6h,h?FDTMLD @
Multi-level array definition not allowed.^%FDTABX compiled array bounds ex ceededNo
&+zArray specificationsUSED ARRAY DIMENSIONS[: (Q",] - F10 ORIGINATED
&+ DP
&+ CH
&!+ SP
&"+ U($ FORMAL
&$+,/+*,:0No pause requestsGROUP AFTER PAUSE LO
,CATED INN/A
&G+IF
(, .
(,No group specificati (5onsGROUP ,L
&G * Jd+Y( IS GLOBAL)l
+ l
(D"=+ l
+ l
+ l
+ l
+ l
+ l
+ x(Agw]!+6$ P+FPause at
&F+
AEntering FORDDT from routine \..- v-
(k *T(PNJ7@+ +i W1N+w+
`@+
+
$ equivalent to in (COMMO UWN)
,
p+
e
&+
aFormal parameter 0O@+
yMAIN PROGRAML# * _
&a+ent
&`+
uline<+
&f+
h-%FDTCHI Characters ignored: "?FDTIAT Illegal argument type = |Arguments pare:. = .] LABELHG%FDTECI Buffer full excess characters ignored y%Trying to write to illegal address; wrong mode???
&y+*%Trying to write in (high segment; wrong mode???
&+*%Trying to read from illegal address; wrong m P
ode???
&+*0<%Improper byte pointer; wrong mode?%Null character @* string; Wrong type???[Implicit OPEN HH>d+@
,
^ P<NUL><DEL><Program name: ,,+i?FDTIAF Illegal argument forma #t Type H for help?FDTIPN Illegal program name?FDTMSN More subscripts needed ,?FDTBOI Bad octal input ?FDTLGU lower subscript .GE. upper%FDTNST Not 'ST 4ART'ed?FDTNFV is not a FORTRAN variable?FDTBDF is undefined
&:+ J=Jismultiplydefined?FDTINVDInvalidLvalue?FDTNFSCannotfindFORTRANstarta ]Eddressfor?FDTPROToomanyPAUSErequests?FDTCSHCannot'START'here?FDTN NDT DDT not loaded?FDTCFO Core file overflow?FDTFCX Format capacity exceeded Vplease re-type?FDTICC Compare of two constants is not allowed?FDTIGN Invalid grou p number?FDTLNF is not a format statement?FDTNSP no such PAUSE?FDTCCN Ca gnnot continue?FDTNPH Can't insert a PAUSE here%FDTNSL No symbols loaded?FDTD pNA Double precision comparisons not allowed?FDTTMS Too many subscripts?FDTSER Su xbscript error?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%FDTS PO Variable is single precision only?FDTNGF Cannot GOTO a FORMAT statement?FDTI #TM Illegal TYPE modifier - S?FDTFNI Formal not initialized?FDTRGR Recursive gr +oup reference?FDTIRS Illegal range specification?FDTMCD Compile program with t 4he DEBUG switch to type a format statement?FDTIER Internal FORDDT error - 1?FDTI <ER Internal FORDDT error - 2?FDTIER Internal FORDDT error - 5?FDTIER Internal FOR EDDT error - 6?FDTIER Internal FORDDT error - 7?FDTIER Internal FORDDT error - 8 M?FDTIER Internal FORDDT error - 9?FDTURC Unrecognized command ?FDTCNU The command V is not unique PnFdFeLFeFfFfFg D"u'v%$u3Hru3I
() D"u4}?*Fu5%H+Xcw;,p-
/0e "Y"kPu77Y);25
rz9R+G`B.wg& D"b2b7}u)D;w8Hr)obn)vwmPQ-RA[j "u#gR b.:Jof:K*a:[we;wd;#\XbPD @5A+x\1yP@-{j. k..N w.lQk+txt "+thpPLjR,cK,2m^
(Dm
6Dm
-Dn
,.2A' ".JEZR/'k~@XwxO t\,M
Y4n@4nK;
\O v]29 D"5aiO
^>
JO_ _#_(][R
L5':~ D"PO`wF
86%.
V6%.
V6%.
96%.
P6%.
]6%.
aa
A 6|A:R:e;R:e_:f
9>R:f#[R:f4.PDD8m7 G>KtP|KG?#&~
@P- HXiiHYI&8 D"! :J2/&wJPpHiJQCuJ[<sKth|K}&{Kh|K.{ "KI
2KL
4KKD=!KD=KDHLNGeL[ 7 "RL+@RLwLmgB)M%<M9@M**
MC"ER
)R| D)R|)R})R}PRM7
#M:
&M:!
&M:!
'M:"
' D")TY
M>H)Ob+T2 BMR/Q MR/Q M^d@GO(g} P^6]xP*R]|?gR^Yg{^g
;k~
B&-_k~&.c D"&.]&/5&0Ca_rjsa_rjRa_{Qa_{]Ra`Ga`7Y DlhIa`=gZa`GwRa`^.a`c"'a`eCf'1Ol'(.l')r D"al$h.al$i-al$jal$j l')+l'*"l'*l'+ml'+ "l'-l'3
al'}l'9d (Ad6P\gsmy=gsn= t?7@Rw-,?z"nzGz"pqIz"pr
z"ps C9N`}
Ec}
8H%}
fYPaoCO3U* Kw)
Kw) Kw*
Kw* Kw+ Kw+ D" Kw, Kw, Kw-Y1w Kw< Kw= Kw= Kw> Kw> D" Kw? Kw@ Kw@#Y2x KwP$ KwQ% KwQ) KwR* KwR. D" KwS0 KwS1 KwT2 KwT4 KwU5Y2z Kwd6 Kwe8Y3{ D"Y3Y4Y4Y5 K{A K{4R`
R`*S JoR D"og Rx Rx 5 Rx c)2}K `` WJFSoJm e~]} xL
cMBS,,@ D"S,E IhHfY` RY
&& aK|'
g 7
g :`j 6 "S!+S@$'@
B-,D^ .D^
'Ch
L d?aH X?aI Y D"?aI ]?aJ W
L D
L F?b I?b K
L L
L P
L R D
L V
L X?fg >S<!(7tX(AY (AY(Ag(bAV @"(bMM
MdS(yG(yK`c): #) B) D Bm
D" C
C)
]P
k D" AN m
N m[!W[ X
!n)(U'](SS{Z!|:!|:!|;(T2 "(T(T `(TG(T0(TS{
(T]i D (TtE.(TtE0(TtJ.(Tvj(Ty" `(U
9!(U
:$(U "*=,i !S,mg@
aSg
b:a
b7MR";hP
dM
h 1
h 4 D"
h %0Bov1"M 8"M s0Cl#0P
h0D7b,0D?71
h) / "
j% &S2';#\'+S]#u% E$u;+PQsIQsI9
PSX[SXh[g&I &Q D &RtqQ
$^\'_
(^|Y D^|Z^|^^|{NS_Y\ S_Y@c_<F
G`Satj}&dS
s D"
9z
q
9{
u
9{w]:Uw]_gTw]h.c
KyISw^gS{Tp
XPJP
5+^Ff "T#+Y<T#,BT#XMt%?x(E'MDP
D"
I
hJh
$Ki,Ek,Fw
,G
,G
,H
,H
Y
D",I
(XzSWpt(YLgY,GcPZ.]-L^-M^ D BaVe8Qmg8YqXT:40`;4^ `=PT@.? A#@U D"AOb AW7 Am;"AoY#As[ 7ABGBp r-P} "Rwqq[TS"aS/S>M
~;t!@u&P ;'
?A-
G1PA
O1PB
V1PB
] D"1PC
aA}
e1PC
i1PD
Dl.t
Al/W[
5n`2g[p,4aq @[ "2xv2x
TUAzTUByr:^3`r:F`rWf`5U3!6U3"I D"s^;czs^<z`20JY20;u^t$u^t
"_y(u^HH' D"u^v
&a9a: a:v(c-
U@@ D"J^ `2{+Hw{+IH$&p$&f$'f$'s$(u$(m @ $+E$c
P
.+-B[3@ KR4c45
qg\'$
h
{4
k'%
m'%
o
}9
h D
}I
d
}S
c
Y>#{U
S{^
KT}G
Sg| D"-%>v yzex D" t'{z t'|~ t'| t'}yiR/PB/#.h"[N D2W,Gd2`V%0mcP7".7"f7"i7"z7"x2luga D"2mAy5(a:65(sO#*PY<*PZD5)B5):.5),f45)C; D4vOE4~0fR55KJ 5
S5!5&*[/e5$J D"5$965$:25$;:5$;25B p1;*U7y<:A(9^=f "PV99a kKB
09c nK6r~KDVKeQ D"K}:^pZhK!;
4pZZ\L$
CM/Y
gwKy
/M/a@
*MPg ` D"94C -x4x /x4y 0x4y 3MPJ *MPSg"MPSg `MQ `yIg "8
6Q.K
897
p9y
q9y
v9y9y
u9y
e`V?QYaV?QZnV?QgheJ
`VG(ie D"VG(iaVG(jT}iG}jL}kX}k^}l[}lUVNvj@ D VS?+MV\V]
:0-:0.$ D":0.:0/:0/:00 :00,:01Y\o.YY\t9
)Y\t:
( @"Y\t
&hyUY]1"Y]4 <Y]]
OYYZ "Z[[c)=d=w;--;--;-.;-. D";-/ ;-/ ;-0
;-0
fYv<F8V,f[ <f\1=f_g; D"F?ybF?yaF?zaF?z`F?{`F?{_f"
;/`H\;m "Ulr
UlrVUlrY[d2plW/QqlW/Qr^~kZemWQ^^Umm[@ "Umm6GmoP `&moV: `';nO;oRm~nSWm;KmX_~aX D_~aY_~b[mOjUg@o"bfd hd
To#E[ D"<%<%qQe<*h,<*i-m0h:<*j/<*k0<*mW "<*nkUrhs m2R0<*oFrnGm2r<<*pD<*qP<*sa D"m3ydm4<*tfr/7~<*tS<*v[rDmp<*vdrT) <*yLV*76@?)ZJCjVl(VKP@ DA,+x6:6 `Auh~Aui,AuiAuj
Auj D"AukAuk,Ry R{R{R|5Mf<Mg<R|= D"R}8(i<#8)%84E<&84w(P: F=S[igI( WW!s `r%j[Qgg[l{ng[mg\.'g\)7k\)8*@`r'Ig\2gzg\>5\B:/W.J)WUS8 ( a0