Trailing-Edge
-
PDP-10 Archives
-
decuslib10-05
-
43,50337/17/simlib.ctl
There are 2 other files named simlib.ctl in the archive. Click here to see a list.
.R FUDGE2 ;or MAKLIB
*SIMLIB=OCSP(A)^[ ;TOPS-10 two-seg version
*SIMLIB=SIMLIB,PHPT,MA,MAT,RD,SU,SS,SANE,PHFO(A)^[
*SIMLIB=SIMLIB,SYS:FORLIB<ACOS.,ASIN.,ATAN.,SQRT.,SINH.,COSH.,TANH.,
*EXP1,EXP3,EXP2,EXP.,ALOG.,SIN.,DEXP.2,DEXP.3,DEXP.,DLOG.,DSQRT.,DSIN.,
*DATAN.,FLOAT.,FLT.0,RAN,FORXIT,CFRXIT,EXIDOT>(A)^[
*SIMLIB/X=SIMLIB^[
*SIMLIB=SIMLIB(L)^[
*SIMLIB.L=SIMLIB(S)^[
.IF (ERROR) .GOTO A
A::
.PROTECT <257>SIMLIB.REL
.TYPE SIMLIB.LST,SIMLIB.L
.DELETE SIMLIB.L,SIMLIB.LST
.K/F