Google
 

Trailing-Edge - PDP-10 Archives - BB-D480F-SB_FORTRAN10_V10 - formsc.rel
There are 11 other files named formsc.rel in the archive. Click here to see a list.
p0(|*HP[hP[|PbKCV;/VKP@( wY:0wY:H @\	 CR@,>,> p  p  Ep<b $Ep$ E..&+" C%p. Ap 2D
	 CTs@,>,> p @ p Ep$.<b	 /.$$Ep$ E"
.&+"C%p.Ap3D+/.$$Ep,^,^,~?	w[fPIPCP9Z049ZH @L	 @CT4',>,>p Ep Ep  p <b $Ep$ E..&+ @"Ap 2D
$Ep,^,^,~?	"
49ZPIPPZUc*4UexhW.GPyPRG((
 4<04<H @|	 CT9g,>,>p Ep Ep p @$.<b
//.$$Ep$?AE.&+"Ap 3D+
4<PIPC
PPXYPYPZUc*4UexhW.GPyPRG(( b0bH @\	"DCQ` D$/$ D"%p #p."Q  @@ @.< $p.D p T/p$ *b 7@( D @ ,~ 0
p	DuI?bw^e@l/W[
s"0
s"H @\	 
AaJ|G,>,>,>,>C3pC,p0" 1@ "+@
C2H 02/H2oH	((,$H..2.,=p,^,^,^,^,~  +++C!H+	*
@++  C!H+ H H+++C"7/,>,> p p, ,^,^,~6H@H.H,+	b"]jx9)O=[]&8;^$q^BB^T.`R[	_^;_sk;_t"B_t4.q,dOR{e'%gX@.	D	v`
+[	`
+[WP [hP [|
PEPP
P
3F
s"]"R3[	9q:YPYPZUlr
Ur(.UrfWLA$5C W.GPyPRG(( q9
90(CH @l	"E(Q(IVnO@+a-\@@ D6@
,,^,>Q"X"*"
C<Z, 	 Q( , 
C<[,=l	,>C<[,
1*9
	**D(C<^, *C<[,1*9
C<a,w4T8@C<c,,>C<
,^9t= C+p9t8C-p9t9 	p80(+92**
$f   	3I3,+(C#."20.*3j9$3F+. /"	*U*(*C<e,C<f,C<W,+C<,, l2j+;C<X,-C<[,. &C<	(D
@
3,12*+:0Z9
6.*<=f2,+"Z*Z
(/,@+,74N=	"T;  .@+6@+>,~,>C<
(1H148X9HCORE DUMP/1H 7HOv fla	 Dg17X9HCry0 flag15X9HCry1 flag15x12HFlt ov flag 13X8HFPD flag/1H 5(A9,15X))(2(//	 L/ 8(9X 3HAC O2) /7X8O14/))(///)(///' Locations 'O10,9H through O10,9H c	 
Uontain /1H )p@$@Ol}p@$@Olp@$@NAp@$p@$	(T
A"]@NL`@D@@$`@D@@$Ap@$@NPp@$@NQ	 fh@$@$A(1H0,O10,8O14)(1H0,O10,8G14.5)(1H0,O10,8I14)	 n(1H0,O10,8A14)(1H0,O10,4G25.16)(1H0,40X,O14)(1H0,40X,G14.5)	 *w(1H0,40X,I14)(1H0,40X,A14)(1H0,40X,G25.16)@s@u@w@y*U @{@h@j@m@o@qOFF  ON   H p@$Ap@% P
..~	Dwkg|[o`l9yPIoUWrHfoUXoVZoV[	D"oW]oW^oXaoXcoYePo+yP	"R_9(k~PfKf2[q_l9{%((fs:f	5Kyvz"	D"q9	9m	4B[jx4l9u}
8}
E8}
F9})3@`	WJ?	D"P`
*uq` R:
CB	):c)P R[P [hP [|	"P	P%u
@m[mZl9wc_<F
3<E~<FPAT;wS
#OeLT;wg#OfPT;w{	"#OfQT;xP
/S:q;P~w3AAb[hlFl9s	D"pj(.pj)/pj)2pj*6`20J0P
9PP	Dstvv=Ly9>9>[PXYPYPZ=l?	UlrVUlr0OUlrA;UlrBKUlro4Ulro6LA$5C W.GP$PRGr%H(HY""/~H(( z#
*uqc)S<&#c):z#x7tGHY""/~HY""/~(( KW[0KW[H @<"g4k:6@,  ,,~	 `
*uqc)S<Tc):PY""/~@0(( K[0K[H @<"G3k:6@,  ,,~	@
K[`
*uqc)S<c):PY""/~@0(( +,[0+,[H @T	" YNty:6@,   p, &@b) 4B	1B "1b1"+$$ D.$h@=f ,~" ,~ 	 `
*uqc)S<dc):P+!K	
+,[+:#YPYPZW.GP$PRGHY""/~((&$7@"$  (@. &"*	(" 
)@
(@ $ &$.$.&(D(F..."  0@+  	(  p*`+ +p,^,^,~-Jan--Feb--Mar--Apr--May--Jun- -Jul--Aug--Sep--Oct--Nov--Dec- @.pH@	@"Ru	u?u?	`?`
*uqc)P[hP[|P	YT0PUlr
LA$5C W.GP$PRGHY""/~(( h/;@0h/;@H @4	""i&j)w6@	,,> 
	b+BM 
	`+d `4@@M,^,~"U + x	@L`
*uqc)P[hP[|(Ty"	`qp:P ;F30;F3H @,	""i&lP6@,,>,>,>	b	&"j0 D&" D  @-& "B 	*-& 0@+   p*`+ +  Ap[w0F+ 	(Q"A" @ "B &"t D-& "B &$2 $D 0@+  	(  p*`+ +  Ap,^,^,^,~&" "B $D "+"H.p@.p	DRu	6f3`
*uqc)P[hP[|)u=PCX3	`		Dq\:q\:qPUlr
c&3W.GP$PRGHY""/~ ((" G?Q^+{0G?H @4	"@g2NI 6@,"p4B! (  n B,~g2NI:"p! (  " Cp( gB:p B,~ 	 `
*uqc)PYW.GP$PRGHY""/~(( VGM0VGMH @l"gO>Ht6@,"p! (  " Cp	b ">p,~	`
*uqc)P[hP[|PPPyPRGHY""/~@`(( ^O[0^O[H @,	"(E KK9:6@,  C", @C"`b7!"GBGBGBRwO@	"*
 p*H
 p*H
C'p7@+2$+  5$ @ .	 I G"8=`,~ ,+,+	D"b"]jEFCGJ	Gt2
^O[	K{V_t9
_tC	D`
*uq`
+7`
+<c)P%u
@PT?DDvdD:PYPZPZLA$5C W.GP$PRGHY""/~ (( D:0D:Hc):lD:H):P$ rG((  ^Q0^QH @	"KK;Y6@,  C",w" 0"[Ep0"+1",~ $	" 0D+
p+m$Q$A`&(4HH=f Z1DO Ep+.p	"Ru	R&Y)
b]yG	KzE
^2w^I;
^Q	 `
*uqc)S<c):P[hP[|PP
LA$5C W.GP$PRGHY""/~(( HX|LKLaqR0aqRH @4	"(
G3J;6@I'4\Z6@, p  ,C 
 p5+	++	*"++,~G"\J;6@,  , Cp,~,+	,+	,(@+	,+		D"
HX|L

KLl6
aqRar!;	l:?`
*uq`
*xC`
+	@`
+;|`
+gLc)S<LS<Hc):
PPPXYLA$5C W.GPyPRGHY""/~@(HY""/~@`HY""/~@X(( vWK0vWKH @\	""Z.)V6@,,>,>  C",C"`b7!"GB " $ 2f"@ $ F=b Ep@@1DO@,^,^,~ 	D EFCGJ`
*uqc)S;tvc):P%u
@P	DLeS
vWK25EPPYPZLA$5CW.GP$PRGHY""/~X((
9 6@,5`
*uqc)PemWQ^HY""/~((^h/+0^h/+Hc^h/2+^h/+c^h/2[^h/+Vk(Vl
&,>,^,~%FORDDT not loaded
0	~*P [hP [|u^v
&PP$PRG(( }K0}KH"KbN@6@,5D}K`	WJ`
*unc(-2PY"V/~(	W90	W9Hh	W9H!izPMswc!iz(  &2`I0&2`IH @ cVL]  5@ S<Wkc):[S5
a"0
a"H @L	 DaJ~8G,>,>C#p  p p4$2$+2f+ p,^,^,~,> ,> 	p p.$,,^,^+	`
+[k
P{0PP>P
a"1;94PX	YPYPZPZP[PrPIjV3gLA$5C W.GPyPRG((
 A+0A+H @ a
(  
5DS<P+
c):[S5PXW.GPyPRG(( o0oH @D"M-j:6@,  , Ap,~	@`
*uqoc)S<oc):PP/~@8(( l0lH @T i?Y6 p1b1b+  ,,~,+	@ b"]j`
+tS<Fc):PP( UHI0UHIH @ gK%T p1b1b+  	,O@2@,~@@,,~,+	Db"]j`
*w5`
+tS<e	c):PPPyPRGgH(( 
*j*
*k

*u2
*uh
*ul
*un
*uq
*v
*v_
*w5
*w]
*xC
+r
+k
+
+[
+t
+7
+:
+:K
+;|
+<
+[	
+[W
+[k
+a
+gL
+t0(|/H @<	 
",G0!Hjo,G!Hot,	 (
G@!Hot,Gx#Huo,
	 S>(1Hy,]?Hy,S(
4	(H~,k:x
4H,]>0
5H	 @",G_(
5H
,#G2(
6H	(*,'S(
6H,*]
7H,.CG	 D@3
8H,1gN(8H ,5	 @;gJ(9H$,:i6
9H+,@	   DG
:H/,C[b H2,Go:
	"LH7,J]`
H;,NGK
:H?	(U,QGC
<HD,USBp
=HH,X	 ]g:@HK,\G
=HM,`K
>	(@fHR,cC3P
>HW$I Intrinsic routine $N invoked incompat	 nibly$I FORTRAN-10 supplied routine $N invoked$I Overlap of charac	 wter assignments$JERRSET: error number out of range - ignoredDIVERT: illegal	  to divert to unit $DDIVERT: unit $D is not openDIVERT: unit $D is not open fo	 r FORMATTED I/ODIVERT: Can't write to unit $DConcatenation result larger th	 an expectedIllegal length character expressionNo character stack allocated -	  compiler errorFirst argument to SORT must be a quoted stringSubstring range	 ! error $S($D:$D)
	on line $DSubscript range error - subscript $D of array $S = $D
	 *	on line $DToo many arguments in call to SORTCan't get pages 600:677 for SORT	 2Missing EXTERNAL declaration in CALL to $NWrong number of arguments in call to $N	 ;Argument to SECNDS not floating pointCan't return pages 600:677 after call to SORT	 CCan't preallocate pages 600:677 for SORTIllegal page number $OInternal F	 LOROTS errorNot enough memory for creating character stackNot enough memory fo Tr expanding character stack$N: Argument less than or equal to zero	D"RSK	
*j*g
*k
1
*u2`
*uh
*ul

*un
*uq
*vC	D"
*v_'
*w5U
*w]Q
*xC#
+rc
+k*
+
+[
+tX	D"
+7G
+:.
+:KN
+;|
+<
+[	\
+[W:
+[k5
+a@	D
+gL
+tJc(J"gP[hP[|PPZPZP[V>]	W.GPyPRG(([ r^0r^H`b=V(r^Hb=VP Kh(  
@^0
@^H`b=V(
@^Hb=VPdKh(  &O0&OH(&OH&(jPa	p`&(j(  (O0(OH`&(j((OH&(jP)p(  [WVO0[WVOHcX[j+[WVOHX[jP]zip(  t
VO0t
VOHcX[j+t
VOHX[jP Jip(  |O0|OH(|OHy(jP_C)p`y(j(  
J*O0
J*OH(
J*OHy(jPd%)p`y(j(  [Wuo0[WuoHcXdJR+[WuoHXdJRP]~]p(  t
uo0t
uoHcXdJR+t
uoHXdJRPQN]p(8A08AHc8J+8AH8JP#8(  8B08BHc8J+8BH8JP#8 (  r%
@50
@5H`lL(
@5HlLPdQP(  t0tHbt
*_tH
_t
PCP(  _t0_tHb_t
*_tH
_t
PCP (  yp0ypH(ypHfP_`f(  
H0
HH(
HHfPd`f(  yp	0yp	H(yp	HzP_`z(  
H	0
H	H(
H	HzPd`z(  @p0@pH*@pH
cfPDbcf(  0H*H
cfPHpbcf(  z @0z @H(z @H+&P_$`+&(  
H0@0
H0@H(
H0@H+&Pd`+&(  z A0z AH(z AH+:P_$`+:(  
H0A0
H0AH(
H0AH+:Pd`+:(  A @0A @H*A @H
r&PDbr&(  0@00@H*0@H
r&PHvbr&(  rG0rGH`hV>(rGHhV>P_#x(  
@(G0
@(GH`hV>(
@(GHhV>Pdx(  &![0&![H(&![H.JPd0`.J(  ([0(((.JP;0`.J(  [t{@0[t{@H+[t{@HanLP_O8canL(  t){@0t){@HcanL+t){@HanLP"8(  1^301^3H*1^3H
7B@
P;f0b7B@
(  1Qn301Qn3H*1Qn3H
7B@
Pb7B@
(  rG0rGH`c*(rGHc*P_ hp(  
@G0
@GH`c*(
@GHc*Pdhp(  [S<f0[S<fHcW3+[S<fHW3P]7L`(  t<f0t<fHcW3+t<fHW3P L`(  [ScF0[ScFHcW?+[ScFHW?P]<8h(  tcF0tcFHcW?+tcFHW?P 
8h(  [T[0[T[HcWQtJ+[T[HWQtJP]C{0(  t	[0t	[HcWQtJ+t	[HWQtJP {0(  rb0rbH`jvb(rbHjvbP_#| (  
@/b0
@/bH`jvb(
@/bHjvbPd| (  &b0&bH(&bH&.bPa
 `&.b(  (b0(bH`&.b((bH&.bP, (  [tu0[tuH+[tuHalLjP_NQpcalLj(  t)u0t)uHcalLj+t)uHalLjP"Qp(  &(0&(H(&(H0
Pe0`0
(  ("0("H(("H0
P 0`0
(  dn30dn3H(dn3H
7B@
P>Mf0b7B@
(  %VG0%VGH(%VGHc*PZhp`c*(  d<f0d<fH(d<fHW3P^GL`cW3(  dcF0dcFH(dcFHW?P^L8hcW?(  e[0e[H(e[HWQtJP^S{0cWQtJ(  %ob0%obH(%obHjvbP]| `jvb(  zb0zbH(zbH&.bP, `&.b(  
u0
uH(
uHalLjP`^QpcalLj(  alL^0alL^HcalJ+alL^HalJPIKh(  0H(H0
P 0`0
(  E3F0E3FHdE3J,E3FH
E3JP$)v8h(  7B@
07B@
H @D ER.= p  (@cApgO,~	
7B@
P[hP[|PPG((3c*0c*H@$SStC@ pAp,~P [hP [|c*PP
LGpX(@Bp,~	P[hP([|W3PP0W?H @L E
S
NLgp`p`,~<0Fp	P[hP[|W?PPSS],pF(@Gp,~	P&[hPj[|WQtJPP
&(F	p7"/(DGf",^,~0	P[hP [|alJPP
 E3J0E3JH @| D*E([Z p` p` p`` `,~<<00 FpFp	S&P [hP [|P
E3JPPXW.GP$PRG(( 0
00
H @ ]?!`Lp,~ P [hP [|P0
PXW.GPyPRG((KJ+e0)"gHW@$]#C",~	 P[hP0[|P&H @	  @ gi[w0@, 1@+0@,6@,	`	`	p,~.p " 	D Ru	`
*uq`
+:K`
+tc(-2Pl[hPl[|PCX3	`		~PW.GPyPRGHY"V/~@((