GPSS WORLD

PU1 EQU 1
PU2 EQU 2
PU3 EQU 3
RAM EQU 4

SIMULATE

        GENERATE (UNIFORM(4,3,7))

        QUEUE RAM
        queue cpu1
        SEIZE PU1
        depart cpu1
        ADVANCE (UNIFORM(4,4,6))
        RELEASE PU1
        ASSIGN 1,2
        ASSIGN 2,2

        queue RAM
        queue cpu2
        SEIZE PU2
        depart cpu2
WAIT1   ADVANCE (UNIFORM(4,2,3))
        LOOP 2,WAIT1
        RELEASE PU2
        ASSIGN 1,3
        ASSIGN 2,3

        queue RAM
        queue cpu3
        SEIZE PU3
        depart cpu3
WAIT2   ADVANCE (UNIFORM(4,1.1,1.9))
        LOOP 2,WAIT2
        RELEASE PU3
        depart RAM,3
        TERMINATE

TIME    GENERATE 3000
        TERMINATE 1
        START 1