Google
 

Trailing-Edge - PDP-10 Archives - decuslib20-03 - decus/20-0093/demo.dta
There is 1 other file named demo.dta in the archive. Click here to see a list.
  1 STOP ST*P
  3 EXPT EX*
  4 ECHO EC*
  5 NOECHO NOEC*
  6 LECHO LEC*
  7 LOAD L*D
  9 VARS VA*
 10 COMMANDS C*M*
 11 SHORT SH*
 12 VSHORT V*SH*
 13 LONG L*G
 14 STAT STA* ST*T*
 15 REPEAT R*P*
 16 NORPT N*R*P*
 17 SAVEBIN S*V*B*
 18 SAVECARD S*V*C*
 19 DATAOUT D*A* D*O*
 20 NODATOUT N*D*T*
 21 XPRINT X*PR*
 22 NOXPRINT N*X*
 @END OF SUPERVISOR COMMANDS STRING
     DEMONSTRATION MODEL 2
     ROBERT L. STOUT, SIMULATION DESIGNER
     BOB STOUT, PROGRAMMER
     JULY, 1973
@END OF MODEL IDENTIFICATION LINES
 NOVER=1000 NGRP=1000 NDEF=5 MAXCONDS=16 COSTPT
 @END OF GSC STRING
/INCOMP (INC, I*C*P*, I, IN) 1, EXT KF
     (RANDOM (R*) =1) RANDOM (0,10)/
/LAZINESS (L, L*Y, L*Z, L*Z*S, LN, SLOTH) 1, EXT KI
     (MODERATE(M*)=1, HIGH(H*)=2, VERYHIGH(V*)=3, SUPERHI(S*)=4,
     RANDOM(R*)=5)  RANDOM (1,4)/
/WORKCOND (W*) 2, EXT KWD
     (OK(O*)=1, BAD(B*)=2, GHASTLY(G*)=3)  BAD/
/TASK (T,T*K*,TA*) 3, EXT KWD
     (MFG(M*, HOLDERS, H*)=1, FORMS(F*)=2)  MFG/
/XINC (XI*) 1  EXT FLAG F/
/XLAZY (XL*) 2	EXT FLAG F/
/NOTIME (N*T*M*, N*T) 3 EXT FLAG F/
/NOQUAL (N*Q*)	4  EXT FLAG F/
/INCME 2 INT NUMF 1 (0,100)/
/LAZME 3 INT NUMF 3 (0,100)
/C1 4 INT NUMF .5 (0,100)/
/LCONST (LC*) 5 INT NUMF .9 (0,100)/
/FSD 6 INT NUMF 2 (0,100)/
/QSD 7 INT NUMF .3 (0,5) (10,83.0) (83.05, 83.06)/
/T1 8 INT NUMF 3./
/T2 9 INT NUMF .5/
/T3 10 INT NUMF 2/
/T4 11 INT NUMF 2/
/TBLS 12 INT FLAG F/
@END OF VARIABLE DEFINITION STRING
@END OF ILLEGAL CONDITIONS STRING
INCOMP, LAZINESS  @END OF VCWS STRING
MEAN, R @END OF DEFAULT STATISTICS STRING
INCOMP, LAZINESS, TIME, QUALITY