;         GENERATE  10          ;Create next customer.
;    	QUEUE     PARTS              ;Begin queue time.
;   	SEIZE     TOOL             ;Own or wait for barber.
;  	DEPART    PARTS              ;End queue time.
;	ADVANCE   7,3             ; takes a few minutes.
;	RELEASE   TOOL
;  TRANSFER 0.1, ACC, REJ  
; ACC	TERMINATE 1                   ;Customer leaves.
; REJ TERMINATE 1