*                 Manufacturing shop model 1
*                 G. Gordon Figure 11-3/9-2

       GENERATE   5                            ; Create parts
       ADVANCE    4,3                          ; Inspect
       TRANSFER   .1,ACC,REJ                   ; Randomly determine defective parts
 ACC   TERMINATE  1                            ; Accepted parts
 REJ   TERMINATE  1                            ; Rejected parts

       START      1000