PDP-10 Archive: pascal-demo/srttst.rel from SRI_NIC_PERM_SRC_3

Trailing-Edge - PDP-10 Archives - SRI_NIC_PERM_SRC_3_19910112 - pascal-demo/srttst.rel

There are no other files named srttst.rel in the archive.

 ;.30;.3@ H`H`H`H`	 ("14 $ D}0d	b+ }/$0$0d	a- ^$d &C8Lf	*@
:}+4
C$0@7,C& * ,4C$ 0@7,
C$ 0@7,, F~4C$ 0@7,C& * ,4C$	 P
  0@7,,C$ 0@7,C&7 (dC*L@

,4C$ 0@7	(P
$,C& * ,4"C$ 0@7,$,C$ 0@7,(C&# (d	(P,C*K@

,!4&C$ 0@7,C&L (	b H F  H (	b H,	*Q54.C$. 0@7,+C& * ,&C&7 L *d,9 & (,C&#	(Q"= K *d,;45C$C&7 (d@
@

@@@,4? $ ~ Fp	(PF D}2dp+U4D Dp .n> NX.ZN!  @~ \}C<,>}	 (N @x x p xC$? 0@7,7 (
 *,,:}+F4GC$@	"AW,4UC$L &	b,4WC$C&# (d@
@

@@@,4Y ~	"E@*_1d
+b4^ $
 D~4`C$ 0@7,RC& * ,>,T4b $	(E( h ~ Fp D}2dp+t4g4jC$Z 0@7,d, FF4kC$ 0@7	**p,m F (
 *,S,f:}+i4n+g   @ 5@z B D	"y FO@w < \Z&1\ < .<C>pQQ $ &-" \} ^|	( C$o@@f@j@n,CC$)@@f@j@n,^ `B`b+,*@
++u+u

How many records would you like in the file? File name for unsorted random numbers: 	 File name for sorted random numbers: s/r:20/k:1,20 Please verify that these are i	 @hn orderNAMELENGTHS|@

!@8dI         |@H@<,}THING     	# %+|'@(FSORT      #| FH     H     NUMRECORDSS|	4@@Z.@@8~LE   UNSORTEDFIc|@D3@pSORTEDFILES|@`@t0~SORTE	!4t6DNAMES|@@L#TH   SORTEDLENGc|=@<EKD    SORTCOMMAN[|	2"?@LHz-ML@,A!MD%MD+	bNGTH UNSORTEDLEp	b@8	(qHGLH,EL@A$EL+dME   UNSORTEDNA`d@7H0EDA	 PGTH  COMMANDLENhd@T,@87	bINTEGER   8d@7<W@87REAL       d	>x`X@0$Z@,T7CHAR       d@1d]@W7ALFA       d`@"7NIL       	'ad@lc@"7GET       d@

f7ABS     d@Li(7	 iLN@"4Ad@((7CHR       d@x(7EOF       d@\r	 r(7COS       d@((7EXP       d@((7NEW       d{	 @ z 7LOG       d@((7TTY       d@pPUT       d	8@@!, ODD       d@ x(ORD       d(SQR       	"8d

TEXT       @$t@tSUCC       @$D(SQRT       	,P@@((SIND       @$@((SINH       @((TANH      	!p% @((STRING    0@.|*@08MAXINT    0@,\-@8?	 8<-FALSE     (@'l1@'XTRUE       @&|4@'\-TIME       	 @6(BREAK     (@'( CLOSE     (   ,1	 9>INPUT     (@(LA@pkGETLN     ( kPUTLN     (@(x	 0G kRESET     (@)( kWRITE     (@*<M kTRUNC     (P	 O(kROUND     ((kAPPEND    0@*h kDELETE    0	(0@XY kCURPOS    0\@8(kARCTAN    0_@((kARCSIN    	#R`0b@((kARCCOS    0@((kOUTPUT    0@-@pVREADL	!@iN    0@.k VRCLOSE    0n VRANDOM    0@((V	  qRENAME    0@.H VSETPOS    0 VUNPACK    0@/\z	 z VSTRSET    0 VUPDATE    0 VH- (ABOOLE	!pAN   <A@0T@'\ZVDISMISS   <A@14 VBREAKIN   <A V	 @DISPOSE   <A VREAD      $A VPACK      $A@6,

0 VMARK      $A@5L VGETX      $A@5 VDATE      $A@44	0@@4`(VCOSD      $A@4@((VCOSH      $A@((VEOLN      $A	 $(VH, ,@4|A$ ,+JSYS        VNEWZ 	 @-      / VNEWL        VPAGE       @6X V	 5PUTX       8 VPRED       (VSTRINGPTR H@<>@0	 
8>8VPOINTER   8@8@<8VALFALENG  @@:DE@8VREWRITE   8	8 F@9dH VRELEASE   8K VRECSIZE   8(VWRITELN   	" O8Q VRUNTIME   8(VGETLINENR HW VSTRWR	 @WITE  @Z VGETINDEX  @@;P VNEXTFILE  @@8(V	 H`H'L@TTYOUTPUT H@<@@pPROTECTIONP

t	*ThT+*ATEST      PS:<PASCAL-DEMO>SRTTST.PAS.1                      	 q                                                                                      y                                   PgH?x

7@H?x7@

(H?x
@
`H?xg@xH?x@H?xg@pH?xw@(H?x?@XH?x?@0H?xO@hH?x@0@p@d

@L@|@

L	@;.3u;.3uOHWOH.OHfD(RC1g@%vgINGgx	D"gINVTxgIN	|yg@%
Nu)`-%se5$@e5!\`nb4c]Ez*pc^hKB0	D"f73fgR-gR-mc_f7=1rf7r<bK1We4|C-ev{2L%)6gC1xaJ1ggaJ1ggM?J1gg/8 
((}G