Компьютерное моделирование. Тарасов В.Н - 103 стр.

UptoLike

103
Рисунок 13.1 – Блок-диаграмма GPSS-модели
GENERATE
15,FN$EXPON
ASSIGN
WS,1
QSQW1,1
REFUSE
QW1
QUEUE
TRANSFER,
PROC
GENERATE
12,FN$EXPON
ASSIGN
WS,2
QSQW2,1
QW2
TRANSFER,
PROC
GENERATE
12,FN$EXPON
A
GENERATE
17,FN$EXPON
ASSIGN
WS,3
GENERATE
17,FN$EXPON
ASSIGN
ASSIGN
GENERATE
20,FN$EXPON
ASSIGN
GATE SF
SERVER, PROC
ESS
ADVANCE
NORMAL(1,18,3)
P$WS,1
TEST2
DEPART
ENTER
SERVER
ASSIGN
WS,6
A
B
B
C
C
TRANSFER,
COMPLET
A
D
TRANSFER,
PROC4
LEAVE
SERVER
QUEUE
GENERATE
28000
TERMINATE 1
E
QSQW6,1
GENERATE
20,FN$EXPON
GENERATE
10,FN$EXPON
ASSIGN
E
TERMINATE
REFUSE
QUEUE
REFUSE
QUEUE QW6
TRANSFER,
PROC
QSQW3,1
REFUSE
QUEUE
QW3
TRANSFER,
PROC
WS,7
QSQW7,1
REFUSE
QUEUE QW7
TRANSFER,
PROC
WS,4
QSQW4,1
REFUSE
QUEUE QW4
TRANSFER,
PROC
WS,8
QSQW8,1
REFUSE
QUEUE
QW8
TRANSFER,
PROC
WS,5
QSQW5,1
REFUSE
QUEUE QW5
TRANSFER,
PROC
QW1
ADVANCE
NORMAL(1,18,3)
P$WS,2
TEST6
DEPART QW2
TRANSFER,
PROC2
P$WS,6
TEST3
DEPART
QW6
ADVANCE
NORMAL(1,16,2)
TRANSFER,
COMPLET
P$WS,7
TEST4
DEPART
QW7
ADVANCE
NORMAL(1,19,3)
TRANSFER,
COMPLET
P$WS,4
TEST8
DEPART QW4
P$WS,8
PROC5
DEPART QW8
ADVANCE
NORMAL(1,23,1)
TRANSFER,
COMPLET
DEPART QW5
ADVANCE
NORMAL(1,15,2)
PROC
                        A                   B                     C                      D                      E
 GENERATE
15,FN$EXPON
                                                                                                            ADVANCE
                      QUEUE       QW6
                                                                                                          NORMAL(1,23,1)
                                         GENERATE             QSQW5,1                 P$WS,6
                                        20,FN$EXPON           REFUSE                  TEST3
    WS,1
  ASSIGN             TRANSFER,                                                                             TRANSFER,
                       PROC                                                                                COMPLET
                                           WS,4                                      DEPART         QW6
                                                               QUEUE         QW5
                                          ASSIGN
 QSQW1,1
                                                              GATE SF                ADVANCE
  REFUSE                                                    SERVER, PROC                                    DEPART         QW5
                                                                ESS                NORMAL(1,16,2)
                     GENERATE
                    17,FN$EXPON          QSQW4,1
                                         REFUSE               ADVANCE                                      ADVANCE
  QUEUE       QW1                                           NORMAL(1,18,3)                                NORMAL(1,15,2)
                                                                                    TRANSFER,
                                                                                    COMPLET
                       WS,3
                                                                                                             LEAVE
                      ASSIGN              QUEUE       QW4                                                   SERVER
                                                             TRANSFER,
 TRANSFER,                                                     PROC
   PROC                                                                                                      QUEUE         PROC
                                                                                      P$WS,7
                     QSQW3,1             TRANSFER,                                    TEST4
                     REFUSE                PROC                ENTER
                                                              SERVER
 GENERATE                                                                                                 TERMINATE
12,FN$EXPON                                                                          DEPART         QW7
                      QUEUE       QW3
                                                               P$WS,1
                                         GENERATE
                                        20,FN$EXPON            TEST2                 ADVANCE
   WS,2                                                                            NORMAL(1,19,3)
                                                                                                           GENERATE
  ASSIGN             TRANSFER,                                                                               28000
                       PROC                WS,8               DEPART         QW1
                                                                                    TRANSFER,
                                          ASSIGN                                     COMPLET
 QSQW2,1                                                      ADVANCE
 REFUSE                                                     NORMAL(1,18,3)
                     GENERATE                                                                             TERMINATE 1
                    17,FN$EXPON          QSQW8,1
                                         REFUSE
                                                             TRANSFER,                P$WS,4
  QUEUE       QW2                                                                     TEST8
                                                              COMPLET
                       WS,7
                      ASSIGN              QUEUE       QW8

TRANSFER,                                                                            DEPART         QW4
  PROC                                                         P$WS,2
                     QSQW7,1                                   TEST6
                                         TRANSFER,
                     REFUSE                PROC
                                                                                    TRANSFER,
 GENERATE                                                                             PROC4
12,FN$EXPON                                                   DEPART         QW2
                      QUEUE       QW7
                                         GENERATE
                                        10,FN$EXPON
                                                                                      P$WS,8
   WS,6                                                      TRANSFER,                PROC5
  ASSIGN                                                       PROC2
                     TRANSFER,
                       PROC                WS,5
                                          ASSIGN
                                                                                     DEPART         QW8
 QSQW6,1                                                          A

  REFUSE                 B
                                             C                                           E



    A

                        Рисунок 13.1 – Блок-диаграмма GPSS-модели



                                                                                                                                  103