Google
 

Trailing-Edge - PDP-10 Archives - FORTRAN-10_Alpha_31-jul-86 - 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$	+
"dkl$	,3$	1	^1{c^t1PR^1{*4XPSc^t1QZ4XPS.^hc^t1Q^^h*SLsc^t1QZSLs,]A	 "-0. w& Jp Hw4H,>,/: p.:Z/+-0	 .@@[w< Hp2tp+Z
w.
 (4V 8)6 8`X9(9/	D"c^t1L\]A
aTEFc^t1O@c^t1O@c^t1L@c^t1O@-0w 8)6X5V+ aH+7j,>@,~D"
 L,>,/  N6P+",>,/+%	((E
"@@[
8
QJ#R`$ * 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(+J:
0(O@ ap	(7+KZ
wZ,(Q,	Z87Q8`Z6pQ6@@@p/(H/.N/0	 @P 2 * Jp2rp+K 
p2LH9B &. 
&*Z(8Q( l0	*PH4PJ>5+f9B:
l  
 .2Lw~@  (0P@AaN+Z	 E*Q 
 Jp , L 0QPQ,  p HSZ5NXQTVXTW+[[
WXT0*E*YQTX+[  
wj	D"c^t1O@/c^t1J@0c^t1O@1^t1O@[	 D\S,BLP 
w~ LP w~ PP w} HP .3LK@ 
M 01J@GaN	(
d+f,>,/O/+-0,>w},>w~,>w~,>w,2/+-0h,>w~`D*m,>w~,>,>w,2/+k-0l,>w~,>w~,>m,>w,2/+o	D"c^t1O@fc^t1O@g,h :hc^t1O@k
w[0 N`0<+@D{++~++	*|++@ +7  Z`+ :+ :z w[h,>,e /@+	D"c^t1J@uc^t1O@vc^t1O@yc^t1J@~c^t1J@c^t1J@c^t1O@c^t1O@o#",	(@D-0t6(w+	 ,L"nw 
w&,4L.(H@*D+-02. w8Z*d8Q*A` Jp 
	D"c^t1PUo#",
_Cc^t1P@c^t1O@
c^t1P@
2O ,c^t1O@c^t1O@c^t1J@	 P * L@@p084+  Z+  Pp 08+T+@d++U+	*+'+:,+C+P+U:
pZ
w.
 (@  2&4.6)V|=2"	 $  2N=2%+ 
p8
 JpZ
w.
 ( D.6V+604@(@-+60T?+1 */J .N	D"c^t1P@c^t1O@c^t1P@c^t1O@c^t1P@c^t1O@$c^t1P@&c^t1P@/c^t1P@0	(@0+04+5 ./N G: Z+T+ Z4PQ4A`7X+	"9X+7:
pZ
w.
 (ZZ4PQ4A@[$.7r+.0 0X	"@@"AX=r?+ 
p8
 JpZ
w.
7v(+ 7X+IX+G   @"J@  2&4.6)V|=2K 	D"c^t1P@2c^t1P@4c^t1P@5d"e;g@6c^t1P@9c^t1P@Ac^t1J@Fc^t1P@Hc^t1O@M	 D N 2
L=2N+:pZ
w.,>h,/+X+ *J , D VL@N :/+g	D"c^t1P@Oc^t1O@Sc^t1P@Tc^t1P@Uc^t1P@Vc^t1P@Wc^t1P@Xc^t1O@X
^>yY@`@LY	(@
Y-0,>,/  aH+h 
a1J+a,>,0/>. 06n`	 
b@ w *3H@
A`P,>
a,>,_/*,H
aJ+r(j ] 00N@D w ,3H	D"c^t1J@Zc^t1O@[c^t1J@_c^t1O@`c^t1O@cc^t1O@gc^t1O@hc^t1O@hc^t1O@n	 n@
AaP+r,>,/
&`O@l@+-0Y.	 w~ 
 .Z,/Q,`	 w LpZ.pQ.A` Np 8$, Lp
2xp
+:p  Fp
O@p2Hp
+:p+: *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
+2:p* w<$0Z"@	D"c^t1O@pc^t1O@q	K{tc^t1O@tc^t1Q@uc^t1Q@bH@bH@bH@+	 A@,Q"A@ $<$1
7F+1 
.,Lp+- ,Lp 02Pp
+8:p	 4 
Z"(Q"A`7F+8Fp+6;@p
&	  =Z
+(/	+s-0t :d@aZ+F
D,>	,>,/(A E+?@+ED"c^t1Q@4c^t1O@?
u`Uf@c^t1O@Cc^t1O@E
u^u}G@`@(LG	(D"G-0p waH@+J,>
+OaH+L,>	+OaH+N,>+OaH+Q,>
	"O,>w~,t/@+s-0@ZwZ
w~/$(,./
&,.<78(X+\ 	D"c^t1O@Ic^t1O@Kc^t1O@Mc^t1O@Oc^t1O@P
%
cRc^t1O@Tc^t1O@UbH_@X P"Y< P5p[,@w~N=8X@+FD"bH_@YbH_@[
HF]@`@](@]-0R < H5h`,@ 
wL@+]D"bH@^bH0@bH@a
1H+e ,A`QLw
w7X+j < P5pi,@X+e@(Ak+,>,]/,~-0] :b@aZ+s
B,>,>,G/	D"c^t1O@cbH_@gbH_@hbH_@i
+#=kc^t1O@l
u`Tmc^t1O@qc^t1O@r	(@( s+b@+s < H5hw,mF,~-0G@+Q-0x.@/(@( {+y	D"
tbHx@tbH@ubH@w
Kyc^t1O@zc^t1O@{
G>C:|	(|-0y ah+ah +,>w~,>+,>w~,>+,>w~,>,>,>w,2	"Q /+{-0| |ah+ah +
,>w~,>+
,>w~,>+
,>w~,>,>"J@c^t1J@c^t1J@c^t1O@
G>_c^t1J@	c^t1J@
c^t1J@
c^t1O@	*D A+-0 ah+ah +,>w~,>+,>w~,>+,>w~,>,>,>w(P,2/+-0m.@	x X	x	 X@/+t	D"
G>vFc^t1J@c^t1J@c^t1J@c^t1O@(T63c^t1O@c^t1O@
,  H@,~, /.h@,~@	`:H$ (
&	D"
@$c^t1Q@%c^t1P@&c^t1Q@&c^t1Q@'c^t1Q@'	 (H
     <$@P $@`
0$@ 	 0%FTN?FTNHDH
<w~<w0w Extension to F	 9ortran-77:  VMS incompatibility:  Fortran-77 and VMS: 


	 A Line:
BINARY OUTPUTASCII OUTPUTASCII INPUT J
	D"c^t1P@(c^t1Q@(c^t1Q@)c^t1Q@)c^t1Q@*c^t1Q@*^t1O+^t1Q7c^t1Q@J	 JOBJECTLISTINGSOURCETNDW	 SL 1 DEVICE 4 WRITE LOCKEDTNHDE HARDWARE DEVICE ERROR ON 1 DEVICE 4TNCP	 [E CHECKSUM OR PARITY ERROR IN 1 FILE 2TNQEX BLOCK TOO LARGE OR QUOTA EXCEEDED d FOR 1 FILE 2#(	D"c^t1Q@Jc^t1Q@Kc^t1Q@Pc^t1Q@Qc^t1Q@Qc^t1Q@fc^t1Q@fc^t1Q@gc^t1Q@g h	D"K^t1L^t1PeV?\G!d
=!!bM>Ge>rG d%
!d"e0H
`{0	D"`A`
KyI>b+qj	qb]=r`Lge%`9`9`9ou	D"gm!%d"e0Hqge&Yb^$HYbM	yHTdC?R`/83UeM7Fjd%
!`	D"d]KkJd^"CFF`A~Cb^,,f,h"6f5*35d]6
tf,h,gm!&	D"`3+;-`
J"e_+we
c@d
%e_+!fge%kgm!%bge&D"gm!&ge$c@d	W,b,cL%gm!$((h