Google
 

Trailing-Edge - PDP-10 Archives - decuslib20-06 - decus/20-160/del.dat
There are no other files named del.dat in the archive.
TITLE TEST OF DELAY PROCEDURES                                          00000010
* EULER                                                                 00000020
* NARROW                                                                00000030
* NOSTATS                                                               00000040
L LEVEL.K=INTGRL(RATE.JK)                                               00000050
R RATE.KL=(DLVL-LEVEL.K)/CON                                            00000060
C DLVL=500                                                              00000070
N LEVEL=100                                                             00000080
C CON=5                                                                 00000090
L LEVEL2.K=INTGRL(RATE2.JK)                                             00000100
N LEVEL2=100                                                            00000110
R RATE2.KL=(DLVL-OUT.K)/CON                                             00000120
EXPND DLINF1(OUT,LEVEL2,TRX)                                            00000130
C TRX=5                                                                 00000140
PARM DT=1                                                               00000150
PARM START=0                                                            00000160
PARM STOP=50                                                            00000170
PARM PLTPER=2                                                           00000180
PLOT LEVEL(0,1000),LEVEL2=2,DLVL                                        00000190