poddergrukovodstkp (интерпретатор GPSS и описание к нему), страница 7

ASSIGN 9,q13_ ; Запись в Р9 доли брака блоков после постов контроля

Сегмент имитации

контроля блоков

Встать в очередь с номером в Р1 Занять МКУ с номером в Р1 Покинуть очередь с номером в Р1 Имитация контроля с временем в Р2 Освободить МКУ с номером в Р1

; Отправить брак блоков n1 к Met14

QUEUE

ENTER

DEPART

ADVANCE

LEAVE

TEST E

TRANSFER

LINK

TEST E

TRANSFER

LINK

TRANSFER

LINK

Metl

работы постов
P1 ;

P1 ;

P1 ;

P2 ;

P1 ;

P1,1,Met21 P9,,Met14

Met21

P1,FIFO ; Готовые блоки типа 1 на склад с номером в Р1 P1,2,Met22

Met22

; Сегмент имитации сборки изделий

GENERATE ,,,1 Met3 ASSIGN 1,0 Met13 ASSIGN

TEST L

TEST NE

UNLINK

TEST G Met4 UNLINK

TRANSFER

P9,,Met14 ; Отправить брак блоков n2 к Met14 P1,FIFO ; Готовые блоки типа 2 на склад с номером в Р1 P9,,Met14 ; Отправить брак блоков n3 к Met14 P1,FIFO ; Готовые блоки типа 3 на склад с номером в Р1

Подготовка к циклу

1+,1

Pl,TipBl,Met4 CH*1,0 Pl,Term5,1 Pl,TipBl,Metl3 Pl,Met5,1 ,Met3

Начало цикла по числу типов блоков

Все ли типы блоков?

Есть на складе готовые блоки?

Да

Блоки всех типов есть? Если да, то

отправить блоки на сборку

для следующего изделия Met5 QUEUE Sborka

ENTER Sbor

DEPART Sborka

ADVANCE (Normal(15,Tc_,T0

LEAVE Sbor

Вернуться для проверки наличия всех типов блоков

Занять очередь на пункты сборки Занять пункт сборки Освободить очередь на пункт сборки _)) ; Имитация сборки Освободить пункт сборки

Cегмент имитации работы стендов выходного контроля

Met9 QUEUE ENTER DEPART ADVANCE LEAVE TRANSFER

пункт сборки

KontSbor ; Занять очередь на стенд выходного контроля Kontsb ; Занять стенд выходного контроля KontSbor ; Освободить очередь на стенд выходного контроля (Normal(11,Tp_,T0p_)) ; Имитация работы стенда выходного контроля Kontsb ; Освободить стенд выходного контроля q2_,,Met5 ; Направить в военную приемку, а брак-на замену на

; Сегмент имитации работы военной приемки

Ovpr ; Занять очередь в военную приемку

Konvpr ; Занять военную приемку
Ovpr ; Освободить очередь в военную приемку

(Normal(11,Tpr_,T0pr_)) ; Имитация работы военной приемки Konvpr ; Освободить военную приемку q4_,,Met9 ; Готовые изделия-на склад

QUEUE

SEIZE

DEPART

ADVANCE

RELEASE

TRANSFER ; Сегмент счета блоков и изделий

Term7 TERMINATE ; Количество готовых изделий

Met14 SAVEVALUE P1+,1 ; Количество забракованных блоков всех типов

; Задание времени моделирования и расчет результатов моделирования

GENERATE Vrmod ; Задание времени моделирования

TEST L X$prog,TG1,Met10 ; Если X$Prog< содержимого счетчика завершений, то

40

TERMINATE Term5 TERMINATE

SAVEVALUE prog,TG1 ; записать в X$Prog содержимое счетчика завершений Met10 TEST E TG1,1,Met12 ; Если содержимое счетчика завершений равно 1, то расчет результатов моделирования

SAVEVALUE Kolizd,(INT(N$Term7/X$prog)) ; Количество готовых изделий
ASSIGN 1,0 ; Подготовка к циклу

Met15 ASSIGN 1+,1 ; Начало цикла по числу типов блоков

SAVEVALUE (10+P1),(INT(CH*1/X$Prog)) ; Количество готовых блоков всех типов, оставшихся на складах

SAVEVALUE P1,(INT(X*1/X$Prog)) ; Количество забракованных блоков всех типов

ASSIGN 11,(20+P1) ; Задание номера Х и запись его в Р11

TEST GE P1,TipBl,Met15 ; Все ли типы блоков? Met12 TERMINATE 1

Вариант 6 Постановка задачи

Предприятие имеет n1 цехов, производящих n1 типов блоков, т. е. каждый цех производит блоки одного типа. Интервалы выпуска блоков T1, T2, …, Tn1 — случайные. Из n1 блоков собирается одно изделие.

Перед сборкой каждый тип блоков проверяется на n11, n12, …, n1n соответ­ствующих постах. Длительности контроля одного соответствующего блока T11, T12, …, T1n — случайные. На каждом посту бракуется q11, q12, …, q1n % бло­ков соответственно. Эти блоки в дальнейшем процессе сборки не участвуют и удаляются с постов контроля.

Прошедшие контроль, т. е. не забракованные блоки поступают на один из n2 пунктов сборки. На каждом пункте сборки одновременно собирается только од­но изделие. Сборка начинается только тогда, когда имеются все необходимые n1 блоков различных типов. Время сборки Tc случайное.

После сборки изделие поступает на один из n3 стендов выходного контроля. На одном стенде одновременно проверяется только одно изделие. Время про­верки Tп случайное. По результатам проверки бракуется q2 % изделий.

Забракованное изделие направляется в цех сборки, где неработоспособные блоки заменяются новыми. Время замены Tc случайное. После замены блоков изделие вновь поступает на один из стендов выходного контроля.

Прошедшие стенд выходного контроля изделия поступают в отдел военной приемки. Время приемки Tпр одного изделия случайное. По результатам прием­ки бракуется q4 % изделий, которые направляются вновь на стенд выходного контроля.

Принятые военной приемкой изделия направляются на склад.

Исходные данные

n1 = 4; Rav(T1, Tо1) = Rav(19, 6); Exp(T2) = Exp(14); Rav(T3, Tо3) = Rav(15, 8); Exp(T4) = Exp(17);

n11 = 3; q11 = 2; Rav(T11, Tо11) = Rav(12, 6);

n12 = 2; q12 = 3; Exp(T12) = Exp(16);

n13 = 2; q13 = 4; Exp(T13) = Exp(21); Exp(T14) = Exp(17);

n2 = 2; Nor(Tс, Toc) = Nor(22, 2);

n3 = 2; Exp(Tп) = Exp(15);

q2 = 5; Nor(Tпр, Tопр) = Nor(18, 2);

q4 = 3.

41

Значения T1, T2, T3, Т4, Tc, Tп исследователь устанавливает самостоя­тельно. Результаты моделирования необходимо получить с точностью ε = 0,1 и доверительной вероятностью α = 0,95.

Задание на исследование

Разработать имитационную модель функционирования предприятия. Исследо­вать влияние интервалов выпуска блоков из цехов (T1, T2, T3, Т4), времени сборки (Тс) и проверки (Тп) на стенде выходного контроля на количество и среднее время подготовки изделий, принятых военной приемкой в течение не­дели (48 часов).

Сделать выводы о загруженности подразделений предприятия и необходимых мерах по повышению эффективности его функционирования.

Программа модели

; Вариант 6

; Модель функционирования предприятия

; Замена имен МКУ номерами

Kontr1 EQU 1 ;

Kontr2 EQU 2 ;

Kontr3 EQU 3 ;

Kontr4 EQU 4 ;

; Задание исходных данных

Замена имен МКУ номерами Замена имен МКУ номерами Замена имен МКУ номерами Замена имен МКУ номерами

EQU EQU EQU EQU EQU EQU

EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU

qll_ ql2_ ql3_ ql4_ q2_ q4_ TipBl VrMod Tl_ T01_ T2_ T3_ T03_ T4_ Tll_ T011_ T12_ T13_ T14_ Tc_ T0c_ Tp_ Tpr_ TOpr

0.02 ; Доля забракованных блоков на постах n11

0.03 ; Доля забракованных блоков на постах n12

0.04 ; Доля забракованных блоков на постах n13

0.06 ; Доля забракованных блоков на постах n14

0.05 ; Доля забракованных изделий на пункте выходного контроля

0.03 ; Доля забракованных изделий военной приемкой

EQU ; Мах количество типов блоков, изготавливаемых цехами

2880 ; Время моделирования, 1 ед. мод. вр. = 1 мин

19 ; Средний интервал выпуска блоков типа 1

6 ; Стандартное отклонение времени выпуска блоков типа 1

Среднее время контроля на постах n12

Среднее время контроля на постах n13

Среднее время контроля на постах n14

Среднее время сборки изделия

Стандартное отклонение времени сборки изделия

Среднее время проверки изделия

Среднее время приема изделия

Стандартное отклонение времени приема изделия

16

21

17

22

2

15

18

2

1. ; Средний интервал выпуска блоков типа 2 15 ; Средний интервал выпуска блоков типа 3 8 ; Стандартное отклонение времени выпуска блоков типа 3 18 ; Средний интервал выпуска блоков типа 4

2. ; Среднее время контроля на постах n11 6 ; Стандартное отклонение времени контроля на постах n11

Задание количества пунктов сборки и контроля

STORAGE STORAGE STORAGE STORAGE STORAGE STORAGE

Sbor

Kontrl

Kontr2

Kontr3

Kontr4

Kontsb

Количество пунктов сборки Количество постов n11 Количество постов n12 Количество постов n13 Количество постов n14 Количество пунктов сборки

;Сегмент имитации работы цеха 1 без постов контроля

GENERATE T1_,T01_

ASSIGN 1,1 ; Код 1 в параметре 1 транзакта - тип 1 блока

ASSIGN 2,((T11_-T011_)+2#T011_#(RN27/1000)) ; Розыгрыш времени контроля и запись в Р2

ASSIGN 9,q11_ ; Запись в Р9 доли брака блоков после постов контроля

42

TRANSFER ,Met1 ; Сегмент имитации работы цеха 2 без постов контроля

GENERATE (Exponential(32,0,T2_))

ASSIGN 1,2 ; Код 2 в параметре 1 транзакта - тип 2 блока

ASSIGN 2,(Exponential(23,0,T12_)) ; Розыгрыш времени контроля и запись в Р2

ASSIGN 9,q12_ ; Запись в Р9 доли брака блоков после постов контроля

TRANSFER ,Met1

; Сегмент имитации работы цеха 3 без постов контроля

GENERATE T3_,T03_

ASSIGN 1,3 ; Код 3 в параметре 1 транзакта - тип 3 блока

ASSIGN 2,(Exponential(22,0,T13_)) ; Розыгрыш времени контроля и запись в Р2

ASSIGN 9,q13_ ; Запись в Р9 доли брака блоков после постов контроля

TRANSFER ,Met1

; Сегмент имитации работы цеха 4 без постов контроля

GENERATE (Exponential(32,0,T4_))

ASSIGN 1,4 ; Код 4 в параметре 1 транзакта - тип 4 блока

ASSIGN 2,(Exponential(22,0,T14_)) ; Розыгрыш времени контроля и запись в Р2

Сегмент имитации

работы постов P1 P1 P1 P2 P1 10,0 10+,1

P10,P1,Met21 P9,,Met14 P1,FIFO

контроля блоков

Встать в очередь с номером в Р1 Занять МКУ с номером в Р1 Покинуть очередь с номером в Р1 Имитация контроля с временем в Р2 Освободить МКУ с номером в Р1 Подготовка к циклу Начало цикла по числу типов блоков Какой тип блока подготовлен? Отправить брак блоков к Met14 Готовые блоки на склад с номером в Р1

QUEUE

ENTER

DEPART

ADVANCE

LEAVE

ASSIGN

ASSIGN

TEST E

TRANSFER

LINK

Metl

Met21

ASSIGN 9,q14_ ; Запись в Р9 доли брака блоков после постов контроля

; Сегмент имитации сборки изделий

GENERATE ,,,1 Met3 ASSIGN 1,0 Met13 ASSIGN

TEST L

TEST NE

UNLINK

TEST G Met4 UNLINK

TRANSFER

Подготовка к циклу

1+,1

Pl,TipBl,Met4 CH*1,0 Pl,Term5,1 Pl,TipBl,Metl3 Pl,Met5,1 ,Met3

Начало цикла по числу типов блоков

Все ли типы блоков?

Есть на складе готовые блоки?

Да

Блоки всех типов есть? Если да, то

отправить блоки на сборку

для следующего изделия Met5 QUEUE Sborka

ENTER Sbor

DEPART Sborka

ADVANCE (Normal(15,Tc_,T0

LEAVE Sbor

Вернуться для проверки наличия всех типов блоков

Занять очередь на пункты сборки Занять пункт сборки Освободить очередь на пункт сборки _)) ; Имитация сборки Освободить пункт сборки

; Cегмент имитации работы стендов выходного контроля

Met9 QUEUE KontSbor ; Занять очередь на стенд выходного контроля

ENTER Kontsb ; Занять стенд выходного контроля

DEPART KontSbor ; Освободить очередь на стенд выходного контроля

ADVANCE (Exponential(11,0,Tp_)) ; Имитация работы стенда выходного контроля

LEAVE Kontsb ; Освободить стенд выходного контроля

сборки

; Сегмент имитации QUEUE SEIZE DEPART ADVANCE RELEASE TRANSFER

работы военной приемки
Ovpr ; Занять очередь в военную приемку

Konvpr ; Занять военную приемку
Ovpr ; Освободить очередь в военную приемку

(Normal(11,Tpr_,T0pr_)) ; Имитация работы военной приемки Konvpr ; Освободить военную приемку q4_,,Met9 ; Готовые изделия - на склад

; Сегмент счета блоков и изделий

TRANSFER q2_,,Met5 ; Направить в военную приемку, а брак - на замену на пункт

43

Term7 TERMINATE Met14 SAVEVALUE P1+,1

TERMINATE Term5 TERMINATE

; Количество готовых изделий ; Количество забракованных блоков всех типов

; Задание времени моделирования и расчет результатов моделирования

GENERATE Vrmod ; Задание времени моделирования

TEST L X$prog,TG1,Met10 ; Если X$Prog< содержимого счетчика завершений, то

SAVEVALUE prog,TG1 ; записать в X$Prog содержимое счетчика завершений

Met10 TEST E TG1,1,Met12 ; Если содержимое счетчика завершений равно 1, то

расчет результатов моделирования

SAVEVALUE Kolizd,(INT(N$Term7/X$prog)) ; Количество готовых изделий
ASSIGN 1,0 ; Подготовка к циклу

Met15 ASSIGN 1+,1 ; Начало цикла по числу типов блоков

SAVEVALUE (10+P1),(INT(CH*1/X$Prog)) ; Количество готовых блоков всех типов,

оставшихся на складах

SAVEVALUE P1,(INT(X*1/X$Prog)) ; Количество забракованных блоков всех типов

ASSIGN 11,(20+P1) ; Задание номера Х и запись его в Р11

TEST GE P1,TipBl,Met15 ; Все ли типы блоков?

SAVEVALUE TIzd,((AC1/X$Prog)/X$Kolizd); Среднее время подготовки одного изделия

Met12 TERMINATE 1

Вариант 7 Постановка задачи

Предприятие имеет n1 цехов, производящих n1 типов блоков, т. е. каждый цех производит блоки одного типа. Интервалы выпуска блоков T1, T2, …, Tn1 — случайные. Из n1 блоков собирается одно изделие.

Перед сборкой каждый тип блоков проверяется на n11, n12, …, n1n соответ­ствующих постах. Длительности контроля одного соответствующего блока T11, T12, …, T1n — случайные. На каждом посту бракуется q11, q12, …, q1n % бло­ков соответственно. Эти блоки в дальнейшем процессе сборки не участвуют и удаляются с постов контроля.