Trailing-Edge
-
PDP-10 Archives
-
decuslib10-07
-
43,50445/flecs.exe
There are 2 other files named flecs.exe in the archive. Click here to see a list.
?p @ ` ?x M2,<`Kb)s |Gbs` INX g# t {A) %R{B E@QF ) ) Or
+ ' @,
@ ( ASSUMED ABOVE) CONTINUE ***** (NO CONTROL PHRASE FOR FIN TO MATCH) TO RETURN ELSE FIN ***** (PROCEDURE ALREADY DEFINED ON LINE h WHEN END ***** (VALID PROCEDURE NAME DOES NOT FOLLOW TO) CONDITIONAL ***** (ONLY TO AND END ARE VALID AT THIS POINT) GO TO I I
TO DUMMY-PROCEDURE ELSE CONTINUE , ) GO TO ) ***** STATEMENT(S) NEEDED BEFORE LINE GO TO ( ***** THE NEXT PROCEDURES WERE INVOKED ON ***** (MISSING RIGHT PAREN) ***** THE LINES GIVEN BUT WERE NEVER DEFINED WHILE REPEAT IF( CONTINUE UNTIL
WHEN (.TRUE.) STOP d IF ***** (CONDITIONAL OR SELECT IS APPARENTLY MISSING) CONDITIONAL = DO ASSIGN UNLESS TO I !
(FLECS VERSION 22.35) ***** (ELSE NECESSARY TO MATCH LINE ***** TRANSLATION MUST TERMINATE IMMEDIATELY P .NE. ... ,( ***** (LEFT PAREN DOES NOT FOLLOW CONTROL WORD) STOP PROCEDURE CROSS-REFERENCE TABLE (OTHERWISE) B IF(.NOT. . IF ***** TRANSLATOR HAS USED UP ITS ALLOTED SPACE FOR TABLES SELECT ***** (FIN NECESSARY TO MATCH LINE GO TO ***** (RECOGNIZABLE STATEMENT FOLLOWED BY GARBAGE) ***** THE FOLLOWING PROCEDURES WERE DEFINED ON 1 ***** THE LINES GIVEN BUT WERE NEVER INVOKED ASSUMED BELOW ***** END STATEMENT IS MISSING ), I GO TO FIN DO ---------------------------------------- ) END ***** (WHEN TO MATCH FOLLOWING ELSE) DUMMY-PROCEDURE ***** (INVALID CHARACTER IN STATEMENT NUMBER FIELD) X $ @,+ @ ' H "C p " Cp ,~ : p , p p p p p p b ,~ p ("4"
,~ Z
,~ 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 0 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 #p Q#p p $&$ .$ *" ,~ Z/p Z-p p p J8 0 , >,~ Z/p Z-p (
0 8 .J8 , >,~ Z/p Z-p p p 8 .J8 , >,~ "'&" ."0 P+<$ A` =$ @ &$ .$8 P+<& E` =& D<* j F =* E,~ p , N F 2 /p XN 0 < 0, 6,~ Z/p p , N F8 ,~ @ &" $ )D|=` O,~ p 2Cp ,~ , ], bO + `, ] p 2#p 7p " , b+ ` (B (D 3" " + `,^ 3,> ,> ,> ,> 3,~ ,^ ,^ ,^ ,~ 4B jZ'p Z)p & ( F /" 4b hd 4D d+ iA
l4D j: x ,~ ,> ,> Z%p . & . " Q
jA *D tF *d s(@&p + a7Cp ? 2 B 2 ,~
p O@ C@@ B6@ C+ |
&++ 7@ C+
&, 4,
"- 5,
& y, N7@ >, R7@ ;, ^@Ap ,~ @@ ; -*" A@@ 4@@ 4 . B 5@@ 6, 0B +
7@ <6@ ?+ K+ J+.1* , C+ D , =j5 1 * , C+ D , =j, C+ + A0B -+ ", y7@ Y D0B + BQD 6, y7@ X D0B .+ BXD 6, 0B + +6@ + , 0B + $R 53B.@" B 57B 4!">9 B 4@@ 5@@ 6 2 d + 1B + 20B + 56@ <+ A7@ 46@ 41 + 4 53B.!"ky B 5!$Lu7@ 4 D 4 6*" >+ 0B + B7@ <+ 66@ ?+ A7@ 46@ 41 + 8 53B.!"Lz B 57D 4!$Lu6@ C2D91 !$Lu D 4 :*" A+ , 0B + A+ K0" 00b =1 "p0" 0b -1 + I0" 0b ,~ $p+ iOAp ,~
&:1 ,^ 7@ C+ | ` 7B 4!"Lu@ $ 7
+ hB 4+ j,~ 6@ ?+ V!$Lz D 5!"Lu@@ 5@@ 6+ Z7B ? 4 B ? >*" 6 ?3B?O@ A@ !$ 8
+ hd 4+ m,~ 6@ <+ b!$ky D 5!"Lu@@ 5@@ 6+ e7B < 4 B < ?*" 6 <@ !$ :
+ hf 4+ m,~
&@, w+ LZ 55Dl
&C+ o
&F+ n
&HZ 5
&J,
&K, w 4, R 5
"-6@ , [ 64DL
"L,
"MZ 6,
"M+ L,
"N,~ @$ ,> , ,^ /" 4"~0" + ~$$ . + y." ,~ 7N ( &$ QFx 6@ , [x .$
" ,~ O 4F j.&
" `dp + ,~
&O `
7 8Z#p " P+@r B, 0$U0D + 0 `D + 0F + O@ B+
( h $ , 0$( .( h=d Ip , 00F + , 00F + O@ B` +
$ .Ep $ + $ , 01F + -1F + "F 8 0F R B=d + ' ( H 8 =d", 00& 0f + 'f R B, 01F + -F 8 0F R B12 $+ ', 00F + + B Cp , 0 L 7 N 8,~ ? -(2 4F0,~ B + 7
B `F + 6
&V ` OAp ,^x ,~
7 8+ '@ p 0 1B l 1B l 1B l
6@ ;d 6@ >d 6@ Ad a@ ,~ p 5bF4"E`@ + F
Y+ Ml # a@ + I2b C+ I " . C B C@& ( &" $ )D|=hJ
`@ 0 :`@ 0 8a@ + Q
@ @ a@ + [? -(q` "U0B + R p " 3b + X (S+ ql
J0 d,p /. " , m+ e;@ Ba@ + ^ " , oa@ + b " $ , m=d` " , m $ Z , m=dc " , mZ'p 4di & P+ , m=dh " , m " , m L@ N@ ,~ `@
" a@ ,~ ? -(qB ,~ L@ N@ a@ + u f + w
&Z ` d + w
&_ `
@ @ + ' " $ & p 4D~
&d,
&e p 4DO@
&h,
&i,~ 7B C+ lab+ C5B " B C1B + 0B 1B + !$|1B
7N*d,~ ` @ 3 n `
+ @ D7@ C+ $@@ n!"k o ` 1 + z INX + $ `
& & ." )B}=fX$k!&K8@h @ + $ o@" @ 1 @@ C + + z@@ C+ z
&o@" b / 3&" t0d z " &" 5Bs,
&x ` H
* FLECS: 8 <M3@ H 46@ 4+ A 4 B 4+ H 5 46@ <6@ ?+ }+ KO@ <O@ ;+ @ <O@ ?O@ >+ .O@ ?O@ >+ YC @ ??FLXIFS Improper file specification x 4iSH H 4?FLXCID Cannot initialize device ?FLXNSF No such file as ?FLXLEF Lookup ?FLXEEF Enter error ( ) for file - . H
?FLXFEA Further execution aborted DUE TO MAJOR ERRORS < ?FLXREI Read error on input file H ?FLXOEF Output failure to Fortran source file ?FLXOEL Output failure to Flecs listing file %FLXMNE minor error(s) detected
?FLXMJE major error(s) detected
( + H D x D
Runtime: minute 9, * ,> ,
&q,^ 1D
"r
&r + ) seconds
M2,<` \ } "} B ?+
5+ }7 + : E <8, y7 + |@d &@d ~ D d D y+ 7 &+ " B +
s " B g+ + <6, x+ | <j, % (2D E+
` D (+
$ 2D + $ 2D l+ c D ( "
B \+
+
O@ l0$ 0d + + 0$ 0d + + @@ l l0$ 0d + O F l7 l; ~: d6D + $ D Z+ _ 0d + " "_ B =+ X+ _ 0D + & "_ B + O+ _ 0d + ) $ D Z+ _ 0D + , "_ B + O+ _ 0D + 0 "_ B + h+ _ 0D + 3 "_ B }+ d+ _ 0D + 7 "_ B k+ m+ _ 0d + : "_ B =+ X+ _ 0d + > "_ B =+ X+ _ 0D + A "_ B + O+ _ 0D + E "_ B '+ J+ _ 0D + H "_ B }+ d+ _ 0d + L "_ B '+ J+ _ 0D
+ O "_ B + O+ _ 0D
+ S "_ B }+ d+ _ 0d + V "_ B =+ X+ _ 0D
+ Z "_ B + O+ _ 0D
+ ] $ D Z+ c 0D Z0D + x" y D ~ <4, 9" l $ F z D J G0F + i <2, 9+ v J G0D + l <0, 9+ v J G0D + p <., 9+ v J G0D + s <,, 9+ v J G0D + v <*, 9: J; z+ f+
Z0D + { E D (+
Z0D + " y D ~ <(, 9 <&, 9+
Z0D + <$, 9+
Z0D +
<", 9 <!, . < , G < , 6 < , 96 g+ "
B r+
+"DB + w+<, 96B a+ + c2D (+ ,"@B n+ B+D 2 D l3D +& F D2D +D M " B K+ -+"W B G+ A+ / "W B ^+ + W
2D A+ 92"2WB F+ h2D +"7+B B+ M3D M+ W 2D M+ C2"W+B v+ + W h2D M+ T+ D E+"G B + 6B B+ J "W B v+ + W: l & FG "M B n+
f <, .+<, G+<, 6. h.$ D ~+ ;/$ 0D ~+<, :2 +D c@d "{+B e+ < , 2 <
, Q4 " B + @+ " B +
a6B M+ "D v4$ " B f+ u " B z+
w6 &+ $
D Od g6B u+ o2D A+ "? B z+
w+ ? 2D A+ "? B W+ L+ ? *2D A+ "? B 6+ \+ ? 52D A+ # "? B + l+ ? r2D A+ ' "? B + + ? w2D A+ * "? B + i+ ? U2D A+ . "? B n+ u+ ?
2D A+ 1 "? B `+ r+ ? 2D A+ 5 "? B ?+ T+ ? @2D A+ 8 "? B + g+ ?
2D A+ < "?2B + + ?' (2D A+ ?S"?zB u+ n6B m+ D c <, . &2D }+ E $ D O+ F $ D O O $g D ~ O $^ D ~ <, : "K B e+
w+ S "S6B r+ N6B W+ +"U+B k+ + ? x F ~+<, v,@ &"& / Z.f S y Hx.& Fy S y Hx G v5( @y6 + g:v <, . <, G < , 6 ? $v D ~ <, G+ k <}, . <|, G <z, 6 <y, G D c "m B e+
n D A " B +
j K D > " B + 6B n+ " B '+ ;: g _/$ & 6.$ D D.$ .d 6. 2$ S+ 6 E Fw y Fw@fv Fv D Hu"
D.
6 F(w" D. 6 &w F ~ <s, :+ " B m+ E6B + "$ .D g " B '+ ; 6 v D c4D" "" B k+
r "$ B F+ X 6 v D > "' B C+
H6B d+ @")<B @+ \+"+6B '+ ; &2D F+ ;"<r, ."<o, :6<n, 6 6u+D J" J. 6+&w$F ~d<l, 6F<k, 6<j, v@ F 6 @v<h, G@d cF"<dB e+ [ B + 6B m+ 20D + f '2D }+ f <f, . <c, : <b, 6 <, : D c "h B e+
D D # "q B +
n $ .d 6 y Fw P Fw
F # "w B +
n D D A "y B +
j
D D c@d "} B + D A@d + 7D >+ D A@d >+ <\, v @ A <[, v @ D @ # "
B +
n A D A "
B +
j D D + A6D c+" B 2+ + " B +
a+ '2D + +" B ?+ T+ <Y, 2 <W, Q4 " B + @6B + &2D + ! $ D O+ " $ D O O $g D ~ O $^ D ~ <U, 2 <S, Q5 * C D ?@fx+ M <R, m" . A @ <@d B <7Dw+ 6+ 17 B+ 6 <7Fw+ 6 < w D < $y D ~ <P, Q5 /Od B+ /6 B+ 9 < D ?+ M" *.& / 6& 6"$ / ]. . S D ( . 63$ (+ A C D ?@fx+ M ( D S. ] D ? G v5&F <O, v @w7 @fv@fw < D w <N, v @x Fx Fy $y D ~ <M, .6B k+ <L, v @ D c@d "S B +
n6"W+B + 6B r+ 7D >+ [7<J, K <H, 9@d >6B F+ 66v+F D5F` <G, v @v+ c+ D D "c B F+
r"$ .D 66B + 6 w7D +"s B F+ x+ 6 v+ <F, . < $x D ~ <D, G <C, 6+ <A, . < y F 4 w H c5F $x D ~ <@, G+ + 7D 4+ "$ . C2$ N+ "
B e+ ., 4,$x6D ~+<=, G <;, 6 4Gw+D 4+ "$ .D N6$ v+ +<:, 6+ "$ . C2$ N+ " B e+ ., G <,, 6 " 3,B e+ ),
@ }6B + <', 9 <%, 9 <$, x <j, %6B m+ " L B f+
h <", . < , 96B '+ " P B f+
h < , . < , . 6 $w D ~ < , G <, 6 <, 96B + " Y B f+
h <, . <, . 66Dw+ ^ <, 6+ b 6 $w D ~ <, G <, 6 <, 96B =+ " e B f+
h < < , 96B }+ " j B f+
h <
, . <, 96B + 60d + p " v B + h+ v 6 t2D P+ t " v B =+ X+ v " v B + h6B k+ g D [5D z <, 9+
<, ." [ $ F q D J <, 6: J; q+ } 3d e+
<, 9+
<, 9@d ^6B + $ D "
OB B+ D J+
6 +
J0f +
"
B + : }2D 33D a+
@d : J+
6 +
g D [@d M "
B \+
+
<}, 96B
+ <{, 9 <y, 9 <w, 96B w+ M2D h+
"
B w+
*0$ +
! <u, 6 <s, 27D [+
'" [ $ F m D J <q, 6: J; m+
% M2D +
+" .D <p, 6 */$ D ~ <m, : 3d e+
0 <l, .6 v+
3 <j, 9@d v+
4<h, 96B \+ @d E$ 6F D e"$ . &$ D dL wD f4$
A $ D Z D ]+
F6 +
D $ D Z $ D ]+
F $ D Z $ D ]Od @d v6B ?+ 6 w F 2F E+
M"u/( .H 6+
g 2D +
P"$ .D 6+
g 42D +
S"$ .D 6+
g J2D +
V"$ .D 6+
g 82D +
Y"$ .D 6+
g P2D +
\"$ .D 6+
g H2D +
_"$ .D 6+
g 2D +
b"$ .D 6+
g d2D +
e"$ .D 6+
g 32D +
g"$ .D 66B C+ $ D Z "
k@B n+ (2D c+
r <f, .7d P+
p <e, G+
q <c, 6 <a, 96B f+ <`, v @ @d g"$ / Z/ @. A D S. Z D C S/& / A S@hw.$ 8&
{ $ D 6 d Fw@f Oh l@h F > c H ( F g F [ " B w+
6B + + 7 g+
. 63d S+
"
B m+ E 6 w D a2D 4+ "
B + p+
32D a+ "
B 5+ %+
J2D a+ "
B + k+
H2D a+ "
B %+ 5+
" B |+ 82D a+ / K2D M+ "
B m+ +
2D M+ # "
B u+ >+
M2D M+ & $ D +
2D M+ ) $ D +
h2D M+ , $ D +
]2D M+
$ D +
d2D a+ G K2D M+ 4 "
B m+ +
M2D M+ 96 + 7Od g+
"
B u+
+
2D M+ < $ D +
2D M+ ? $ D +
h2D M+ D 6 Fw "
B m+ C+
]2D M+
$ D +
E2D a+ \ ]2D M+ L "
B >+ (+
2D M+ P "
B d+ +
M2D M+ S $ D +
2D M+ V $ D +
h2D M+ Y $ D +
K2D M+
$ D +
2D a+ p ]2D M+ a "
B F+ Z+
2D M+ d "
B d+ +
M2D M+ g $ D +
2D M+ j $ D +
h2D M+ m $ D +
K2D M+
$ D +
P2D a+
2D M+ u "
B M+ }+
M2D M+ x $ D +
2D M+ { $ D +
h2D M+ ~ $ D +
]2D M+
$
D +
K2D M+
$
D +
2D a+
h2D M+
"
B m+ C+
M2D M+
"
B u+
+
2D M+
$ D +
2D M+
$ D +
]2D M+
$ D +
K2D M+
$
D 7 +
"
B a+ + 6B g+ 7D x+
H D a "
B w+
<^, 9 <\, 9 x D <@d o D %+
%7D <+
. <6Dx+
(Od o: d <6Dy+
*Od %: ~ "
, B E+
I < w D <+
$6 o+
; <Z, 9 <X, 9 "
2 B + w x D < y D a+
67D <+
; <6Dx+
9 "
9 B E+
I < w D <+
56 %+
H <V, 9 <T, 9 "
? B + w x D < y D a+
C7D <+
H <6Dy+
F "
F B E+
I < w D <+
B6B r+ <S, . <7Fx+
M $x D ~ <Q, K < $y D ~ <P, 6 <N, 9 < y D x7D x+
_ <L, . $ D J7D x+
^ J2d d+
^ <K, 6 x $x D ~ <I, G: J x w D x+
U <G, 9+
R <E, 96B E+ $ .d 6 y Fw 8 Fw: g6B + $ .d 6 m Fw J Fw6B n+ $ .d 6 A Fw 4 Fw6B + $ .d 6 # Fw H Fw6B + "
s B F+ X <D, K <B, 9@d c6B k+ 6D >+
y7<@, 9+
{7F +
~ "
} B F+ X@<>, 9+ 9, 9@d >6B z+ <7, . <6, G7D >+
<1, .+ -, :63 + )+$ !,D D+ , 9 $ !.D )+
+
@d B+ "$ .D . & 6.$ D D" D.& $ 6. ,F " D BOd B+
: lB& FG\"JB n+
, 6: J; \+ * D "
DB B+ + :: 2 F F& b Fg" b. H^" b. H ~ <
, 2 <, Q56^ 2 g#F& ":B v+ 6B F+ # }2D 3+ #"8B + :+ }3D a+ !: l,& OFG2" -B n+ : }3d $+ + }2D ]+ 1Od e+ +Od O+ + / b D $6 e+ ; K F M F A & F 2 F & b F h D +
<, 2 K D M o D A N0D + O <, Q5 B D A+
<, Q5 E h D M+
<, Q5
}2D 3+ J "G B + :+ G }2D $+ M o D A+
( D A+
N0D + X < , Q5 S D M+
<~, Q5
}2D a+
M D M+
N0D + _ <}, Q5 \ 5 D A+
<{, Q5
D M+
N0D + g <z, Q5 d r D A+
<x, Q5
w D A+
N0D + <w, Q5 z }2D 3+ m "j B + :+ j D b }2D 8+ r "n B + :+ n / b D $ <t, 2 <s, Q5 w U D A+
<q, Q5
D A+
<p, Q5 }
D A+
<n, Q5
* D A+
N0D +
<m, Q5
@ D A+
2D }+ ] D M+
K D M o D A6B + }2D 3+ " B + :+ @d B }2D 8+ D b+ }2d ]+ " B + : }3D ]Od B+ 6 B+ : 2 F& b Fg" b. H^6B + }2D 3+ " B + :+ }3D a+ , D E "$ B + 6 B+ ' ", B ^+ + ,: 2 } F& E Fg & . */ E F^6B v+ @d @d !
+D [ZD J;"1+B F+ :. 33D }+ 8 $2D }+ 7 $ $ . @/ 7 D + 8 a2D }Od !: J; [+ /6B K+ 7D + ? "= B F+ X D >@d 6B '+ S D <@fw & . A/ @ F |/& / A | F [ D J7Fw+ O < w Hw+ J <7Dw+ O < w D <.$ D e "I B t+
w J x@j )7 )+ c6D x+ [Od )+ X < $y D ~ x $y D ~ <k, U5 aOd )+ X x D = w F x+ X < x Fw = Dw+ R 4 w D x6B q+ },~ p ~ ~p N Sp N Up N p N <p N 5` N * b $p N 6p N <p N 5p N )p N Gp N ep N Lp N bp N p N D` N * b $p N ` N * b ~p * b` * N b ~p * p N *p m *h +
@p * Kh y * &h y E` N ) Dp 4h y E` N
h y N Ep N cp N p N Ip N s` N * h p N p N h y * Eh y Ep ch h N ap N ~p N p N th N ap N ~p N ~p N Wh 7 yh / yh
~p op ` *
p * >h h f h h y * h ^ h ^ ` p p Wh ^ h h yp * >h V yp * ih yp bp ~p p p * 6h yp bp ~p ap * nh F yp * Lp ~ h e yh yx @h ~ @p N bp N ~p N pp N ~p N bp N {p N ~p N Gp N 4p N bp N pp N ~p N 4p N ~p N ~p N pp N ~p N bx h y Ep >x p ~ *x x p * ~p * @p * r` * * ~ ~p N :` N * h x x x x ` N * h p N x` N * h p N
yh r yh ) yh v yh ~ m yp ~ dh E ^