*                 Manufacturing shop model 2
*                 G. Gordon Figure 11-6/9-5

      GENERATE   5                            ; Create parts
      SEIZE      INSPECTR                     ; The inspector becomes busy
      ADVANCE    4,3                          ; Inspect
      RELEASE    INSPECTR                     ; Make the inspector idle again
      TRANSFER   .1,ACC,REJ                   ; Randomly determine defective parts
 ACC  TERMINATE  1                            ; Accepted parts
 REJ  TERMINATE  1                            ; Rejected parts

      START      1000