Google
 

Trailing-Edge - PDP-10 Archives - BB-D480F-SB_FORTRAN10_V10 - inout.rel
There are 10 other files named inout.rel in the archive. Click here to see a list.
0^t1V0 @	^t1DS4xk!4y
A4y&Bb^t0H  
"dkl03 	^1{c^t1PR^1{*4XPSc^t1QZ4XPS.^hc^t1Q^^h*SLsc^t1QZSLs,]A	 "-0. w& Jp Hw4H,>,/: p.:Z/+-0 @* w@ 8)6 8`X85V	+-0 w 8)6X5V+
	D"c^t1L\]A
aTEFc^t1O@c^t1O@c^t1L@c^t1O@>@,~D"@dH@`@,	   H *j 
 L,>,/  N6P+,>,/+	((E
@@[
8
QJR` * J[
,>,/Z 4N& (HZ
",>( E
%,/@H$:
$ , L,>	D"c^t1O@c^t1J@c^t1J@c^t1O@c^t1O@c^t1O@c^t1O@"c^t1O@&c^t1J@)	 ),/,>,)/@,~-0.Zw0(+E:
0(O@ ap	(2+FZ
wZ,(Q,	Z87Q8`Z6pQ6@@@p/(H/.N/0	 :P 2 * Jp2rp+F 
p2LH9< &. 
&*Z(8Q( l0	*PC4PD>/+a9<:
l  
 .2Lw~@  (0P@AaN+U	 E*K 
 Jp , L 0QPK,  p HNZ5NSQTPXTQ+U[
RXT0*E*TQTS+U  
wj	D"c^t1O@*c^t1J@*c^t1O@+^t1O@V	 DVS,BLP 
w~ LP w~ PP w} HP .3LF@ 
H 01J@GaN	(
+a,>,/O/+-0,>w},>w~,>w~,>w,-/+-0b,>w~`D*g,>w~,>,>w,-/+f-0f,>w~,>w~,>h,>w,-/+j	D"c^t1O@`c^t1O@a,h :bc^t1O@e
w[0 N`0<+@Du+}+x+y+z	*w+{+|@ +z7  Z`+} :+} :z w[h,>,` /@+	D"c^t1J@oc^t1O@pc^t1O@sc^t1J@xc^t1J@yc^t1J@zc^t1O@}c^t1O@o#",	(@D-0n6(w+ ,L"nw 
w&, 4L,>,/ .(H@*D	+-0-. w8Z*d3Q*A` Jp 
	D"c^t1PUo#",
_Cc^t1P@c^t1O@c^t1P@
2O ,
c^t1O@
c^t1O@c^t1J@@@p08.+  Z+  Pp 08+S+@d++T+	*U+"+4+;+B+O+T:
pZ
w.
 (@  2&4.6)V|=2	   2N=2 + 
p8
 JpZ
w.
 ( D.6V+104@(@'+00T?++ */J .N	D"c^t1P@c^t1O@c^t1P@c^t1O@c^t1P@c^t1O@c^t1P@ c^t1P@)c^t1P@*	(@++04+/ ./N G: Z+T+ Z4PQ4A`7X+	"
3X+2:
pZ
w.
 (Z48Q4A@ 2.0 0XX=28+:
p	 <Z
w.
Z4(Q4A@ 2.. 0XX=2>+ 
p8
 JpZ
w.
"D7v(+ 7X+HX	D"c^t1P@-c^t1P@.c^t1P@/d"e;g@0c^t1P@3c^t1P@:c^t1P@@c^t1J@Ec^t1P@G	((H+F @  2&4.6)V|=2J  2
L=2M+:pZ
w D P.,>h,/+X+ *J ,L@N :/	D"c^t1O@Lc^t1P@Nc^t1O@Rc^t1P@Sc^t1P@Tc^t1P@Uc^t1P@Vc^t1P@Wc^t1O@W(D X+bD"
^>yX@`@tX	(@
X-0,>,
/  aH+g 
\1J+`,>,+/>( 06n_	 
a@ w *3H@
A`P,>
`,>,^/*,H
aJ+q(i \ 00N@D w ,3H	D"c^t1J@Yc^t1O@Zc^t1J@^c^t1O@_c^t1O@bc^t1O@fc^t1O@gc^t1O@gc^t1O@m	 m@
AaP+q,>,/
&`O@k@+	-0X.	 w~ 
 .Z,/Q,`	 v LpZ.pQ.A` Np 8$, Lp
2xp
+9p  Fp
O@p2Hp
+:p~+9 *2Jp
+:p 0F+ 0Pp (2Hp
+:p
w	  (Z"8Q"A`
7F+Fp+ (2Hp
+:p
w<
$*Z"(Q"A@	" $<$
7F+ .(Hp+ (Hp $<$7F+ 	 A.0Pp+ 02Pp
+':p$(Z" Q"@` *-Jp $<$"
	 @  .,Lp+ 0Pp $<$&
.*Jp+# ..Np ,2Lp
+1:p) w<$0Z"@	D"c^t1O@oc^t1O@p	K{sc^t1O@sc^t1Q@tc^t1Q@bH@bH@bH@*	 A@+Q"A@ $<$0
7F+0 
.,Lp+, ,Lp 02Pp
+7:p	 3 
Z"(Q"A`7F+7Fp+5;@p
&	  <Z
+(/	+r-0s :d@aZ+E
D,>	,>,/(A D+>@+DD"c^t1Q@3c^t1O@>
u`Uf?c^t1O@Bc^t1O@D
u^u}F@`@(<F	(D"F-0j waH@+I,>
+NaH+K,>	+NaH+M,>+NaH+P,>
	"N,>w~,s/@+n-0?ZwZ
w~/$(,./
&,.<78(W+[ 	D"c^t1O@Hc^t1O@Jc^t1O@Lc^t1O@Nc^t1O@O
%
cQc^t1O@Sc^t1O@TbH_@W P"X< P5pZ,?w~N=8W@+ED"bH_@XbH_@Z
HF\@`@<\(@\-0Q < H5h_,? 
wL@+\D"bH@]bH0@^bH@`
1H+d ,A`QLw
w7X+i < P5ph,?X+d@(Aj+,>,\/,~-0\ :b@aZ+r
B,>,>,F/	D"c^t1O@bbH_@fbH_@gbH_@h
+#=jc^t1O@k
u`Tlc^t1O@pc^t1O@q	(@( r+a@+r < H5hv,lF,~-0F@+P-0w.@/(@( z+x	D"
sbHw@sbH@tbH@v
Kxc^t1O@yc^t1O@z
G>C:{	({-0x ah+ah +,>w~,>+,>w~,>+,>w~,>,>,>w,-	"Q /+z-0{ {ah+
ah +	,>w~,>+,>w~,>+,>w~,>,>" 
,>w,-/	D"c^t1J@~c^t1J@c^t1J@c^t1O@
G>c^t1J@c^t1J@	c^t1J@c^t1O@,>w~,>+,>w~,>,>,>w(@(A,-/+
G>vFc^t1J@c^t1J@c^t1J@c^t1O@K^t1E^t1Jc@d
@c^t1Q@ AH
	D"c^t1P@c^t1Q@c^t1Q@c^t1Q@c^t1P@c^t1Q@c^t1Q@c^t1Q@c^t1Q@	      <$@P $@`
0$@ %FTN?FTNHD	 'H
<w~<w0w Extension to Fortran-77:  VMS incom	 0patibility:  Fortran-77 and VMS: 


 Line:
	 8BINARY OUTPUTASCII OUTPUTASCII INPUT
OBJEC ATLISTINGSOURCE	D"c^t1Q@^t1O^t1Q,c^t1Q@>c^t1Q@?c^t1Q@?c^t1Q@Ec^t1Q@Ec^t1Q@F	 FTNDWL 1 DEVICE 4 WRITE LOCKEDTNHDE HARDWARE DEVICE ERROR ON 1 DEVICE 4	 OTNCPE CHECKSUM OR PARITY ERROR IN 1 FILE 2TNQEX BLOCK TOO LARGE OR QUOT WA EXCEEDED FOR 1 FILE 2#(	D"c^t1Q@Zc^t1Q@[c^t1Q@[c^t1Q@\K^t1L^t1Pd%
!d"e0H`{0	D"`A`
KyI=b+qj	pb]=qge%s`9|`9{`9opgm!%l	D"d"e0Hlge&Xb^$HTbM	yHNdC?M`/83PeM7Fid%
![d]KkE	D"d^"CFA`A~>b^,,
f,h"0f5*30d]6
of,h,gm!&
`3+;'	D"`
Je_+we
c@d
e_+!ege%jgm!%age$c@d	W'D"b,cL gm!$((]