PDP-10 Archive: 43,50531/random.rel from decuslib10-11

Trailing-Edge - PDP-10 Archives - decuslib10-11 - 43,50531/random.rel

There are 2 other files named random.rel in the archive. Click here to see a list.

 2V{?02V{?@ HHH	 
14

 $2 & ( * , .O ",4Z$4DE4 $h	 
 
,0@7,,&0*,(,4	$V 0@7,, $V0@7,	"P(,,F~44 $2,0@7, & (2 *~@l,4	(* # $h 0@7,  ~ (, & ~ *2,
440 $V 0@7,2, $V 0@7,6 & (2 *~@l,"44 $2	 Q(
= 0@7,9 ~Z(,4< $2 0@7,> & ~ *2,44@+	(P*UE4D++G+Hg " Bz |5BL @{ N{ R|O@| < \ < \	 @NZ&1\ < .<Q<pX>pQ \} ^}	`-"0x "$	b-" $2	 @ VZ&Q&`	, "@f@j *@n, $h "@n, $V "@n,Z  _, `B`b+,+	 1db>>New: INPUT     P         ?|g@#@

MhI         ?|j@$d@

}`BF   	!8k     ?{@
d@o@Gr2@ dINTEG	'psER   @!u@#@4CHAR      @

x@@\BOOLEAN   @tz@k@ALFA      @}	0@|@;@,ABS       ?{?{@V@TIME      ALFALENG  @C@#@@APPEN	$0

D    @k?{@FARCTAN    ?|
@(@n@
< ARCSIN    ?|@(@.@	 @
< ARCCOS    ?{@(@n@
< @(d@8d@To@P	(@rBREAK     @?{@vCALLI     ?|?{@BREAKIN   ?{?{	 C`@F@hATRUE      @l"@l@@|@TIME      ?{?{@.@RUNTIME   	!b&TTY       @\)@{@m0
hTRUNC     ?{?{@@(SQR  @[TTYOUTPUT@	1/@{@]@7@^USETI     @+?{@USETO     ?{?{@.WRITELN   ?{?{@V@x	(8@@dXoFALSE     @$C@k@

@CLOSE     @$F?{@>CHR       ?{?{@f@	 H@ORD       DISMISS   @lL?{@&DELETE    ?|O?{@NCURPOS    @tS@ 	 PQ@v@?|COS       @s@(@6@
< COSD      @3@(@v@	 @Y

< COSH      ?{@(@6@
< DATE      ?{@3@v@

b @0d@Lo@H@rDUMPIN    @<i?{@nDISPOSE   ?{	 j?{@DUMPOUT   @c?{@>EOF       @#?{@f@XSUCC      EOLN      	0s@c?{@&@`EOF       EXP       ?{@(@f@
< INPUT     ?|}	10{@{@%(GET       @{?{@VGETLN     @ t?{@~GETLINENR ?|?{	 p@ &GETINDEX  ?{?{@ NGETX      ?{?{@ vREAL      @*$

@+@!POINT	'p@

ER   @&|@*@!G@NIL       @$l@&k@!l@MAXINT    @#t@#@"@?MARK 	"P     ?|?{@"NLN        @#3@(@"v@
< LOG       ?{@(@#6@

< NEW       @$?{@#vNEWZ      @$C?{@$NEXTBLOCK ?{?{	 8A&@$FOUTPUT    @&)@{@$m HODD       @%[?{@%@0TRUNC     ORD       	 .?{?{@%^@8ODD       PACK      @&C?{@&PAGE      ?{?{@&F@&h	 07RPUT       @(

:?{@&~PRED      @'c?{@'&@HCHR       PROTECTION?{

??{@'fPUTLN     @(\C?{@(PUT8BITSTO?{?{@(6READ      @)lH?{@(^	!HPUTX      @)+?{@)RANDOM    ?{@(@).@
< READLN    ?{?{	 @8P@)n@*dTEXT      @|T@{@*$STRING    @0|W@2K@*O@RESET     @,,Y?{	 0Y@*vRELEASE   @,\?{@+RECSIZE   ?{?{@+F@xROUND     RENAME    ?{	 @a?{@,REWRITE   @,S?{@,.SETPOS    @-|g?{@,VRUNTIME   ?|k?{@,~@	 pjDATE      ROUND     ?{?{@->@pEOLN      SPACELEFT @/|s@ @-~@

	 
@rSIN       @.{@(@.>@

 SIND      @/;@(@.~@
<	 { SINH      ?{@(@/>@
	< SQR       @0;?{@/~@ ABS       	   SQRT      ?{@(@0>@
< STRSET    @1#?{@0~STRWRITE  @1K?{

@1&SUCC      @2?{@1N@PPRED      TANH      ?{@(@2@
< 	 E*P@2Hd?|o

EdsroRANDOM    fetKva	   %P@~@<b@,c@
lc	D"?F@%zINGg{INVT{IN	||

u^c;D	D"|G;2bP^nB-d+#4<LdSLxgM`aGF`
Nu7`-%/e5$@^e5!\\	D"c]Ez*Bf73DgR-eo#5_f7O/e4v	V;c(T#rWfv?eMPbB?@ev|>Sev{2UxaJ1gg/8 F((,