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

Результаты моделирования необходимо получить с точностью ε = 0,1 идоверительной вероятностью α = 0,95.41Задание на исследованиеРазработать имитационную модель функционирования предприятия. Исследовать влияние интервалов выпуска блоков из цехов (T1, T2, T3, Т4), временисборки (Тс) и проверки (Тп) на стенде выходного контроля на количество исреднее время подготовки изделий, принятых военной приемкой в течение недели (48 часов).Сделать выводы о загруженности подразделений предприятия и необходимыхмерах по повышению эффективности его функционирования.Программа модели; Вариант 6; Модель функционирования предприятия; Замена имен МКУ номерамиKontr1EQU1; Замена имен МКУ номерамиKontr2EQU2; Замена имен МКУ номерамиKontr3EQU3; Замена имен МКУ номерамиKontr4EQU4; Замена имен МКУ номерами; Задание исходных данныхq11_EQU0.02; Доля забракованных блоков на постах n11q12_EQU0.03; Доля забракованных блоков на постах n12q13_EQU0.04; Доля забракованных блоков на постах n13q14_EQU0.06; Доля забракованных блоков на постах n14q2_EQU0.05; Доля забракованных изделий на пункте выходного контроляq4_EQU0.03; Доля забракованных изделий военной приемкойTipBlEQU; Мах количество типов блоков, изготавливаемых цехамиVrModEQU2880; Время моделирования, 1 ед.

мод. вр. = 1 минT1_EQU19; Средний интервал выпуска блоков типа 1T01_EQU6 ; Стандартное отклонение времени выпуска блоков типа 1T2_EQU11; Средний интервал выпуска блоков типа 2T3_EQU15; Средний интервал выпуска блоков типа 3T03_EQU8 ; Стандартное отклонение времени выпуска блоков типа 3T4_EQU18; Средний интервал выпуска блоков типа 4T11_EQU12; Среднее время контроля на постах n11T011_EQU6 ; Стандартное отклонение времени контроля на постах n11T12_EQU16; Среднее время контроля на постах n12T13_EQU21; Среднее время контроля на постах n13T14_EQU17; Среднее время контроля на постах n14Tc_EQU22; Среднее время сборки изделияT0c_EQU2; Стандартное отклонение времени сборки изделияTp_EQU15; Среднее время проверки изделияTpr_EQU18; Среднее время приема изделияT0pr_EQU2; Стандартное отклонение времени приема изделия; ЗаданиеSborKontr1Kontr2Kontr3Kontr4Kontsbколичества пунктов сборки и контроляSTORAGE2; КоличествоSTORAGE3; КоличествоSTORAGE2; КоличествоSTORAGE2; КоличествоSTORAGE2; КоличествоSTORAGE2; Количествопунктов сборкипостов n11постов n12постов n13постов n14пунктов сборки;Сегмент имитации работы цеха 1 без постов контроляGENERATE T1_,T01_ASSIGN1,1; Код 1 в параметре 1 транзакта - тип 1 блокаASSIGN2,((T11_-T011_)+2#T011_#(RN27/1000)); Розыгрыш времени контроля изапись в Р2ASSIGN9,q11_ ; Запись в Р9 доли брака блоков после постов контроляTRANSFER ,Met1; Сегмент имитации работы цеха 2 без постов контроля42GENERATEASSIGNASSIGNASSIGNTRANSFER(Exponential(32,0,T2_))1,2; Код 2 в параметре 1 транзакта - тип 2 блока2,(Exponential(23,0,T12_)) ; Розыгрыш времени контроля и запись в Р29,q12_ ; Запись в Р9 доли брака блоков после постов контроля,Met1; СегментимитацииGENERATEASSIGNASSIGNASSIGNTRANSFERработы цеха 3 без постов контроляT3_,T03_1,3; Код 3 в параметре 1 транзакта - тип 3 блока2,(Exponential(22,0,T13_)) ; Розыгрыш времени контроля и запись в Р29,q13_ ; Запись в Р9 доли брака блоков после постов контроля,Met1; СегментимитацииGENERATEASSIGNASSIGNASSIGNработы цеха 4 без постов контроля(Exponential(32,0,T4_))1,4; Код 4 в параметре 1 транзакта - тип 4 блока2,(Exponential(22,0,T14_)) ; Розыгрыш времени контроля и запись в Р29,q14_ ; Запись в Р9 доли брака блоков после постов контроля; Сегмент имитации работы постов контроля блоковMet1QUEUEP1; Встать в очередь с номером в Р1ENTERP1; Занять МКУ с номером в Р1DEPARTP1; Покинуть очередь с номером в Р1ADVANCEP2; Имитация контроля с временем в Р2LEAVEP1; Освободить МКУ с номером в Р1ASSIGN10,0; Подготовка к циклуMet21ASSIGN10+,1; Начало цикла по числу типов блоковTEST EP10,P1,Met21; Какой тип блока подготовлен?TRANSFER P9,,Met14; Отправить брак блоков к Met14LINKP1,FIFO; Готовые блоки на склад с номером в Р1; Сегмент имитации сборки изделийGENERATE ,,,1Met3ASSIGN1,0; Подготовка к циклуMet13ASSIGN1+,1; Начало цикла по числу типов блоковTEST LP1,TipBl,Met4; Все ли типы блоков?TEST NECH*1,0; Есть на складе готовые блоки?UNLINKP1,Term5,1; ДаTEST GP1,TipBl,Met13; Блоки всех типов есть? Если да, тоMet4UNLINKP1,Met5,1; отправить блоки на сборкуTRANSFER ,Met3; Вернуться для проверки наличия всех типов блоковдля следующего изделияMet5QUEUESborka; Занять очередь на пункты сборкиENTERSbor; Занять пункт сборкиDEPARTSborka; Освободить очередь на пункт сборкиADVANCE(Normal(15,Tc_,T0c_)); Имитация сборкиLEAVESbor; Освободить пункт сборки; Cегмент имитации работы стендов выходного контроляMet9QUEUEKontSbor ; Занять очередь на стенд выходного контроляENTERKontsb; Занять стенд выходного контроляDEPARTKontSbor ; Освободить очередь на стенд выходного контроляADVANCE(Exponential(11,0,Tp_)) ; Имитация работы стенда выходного контроляLEAVEKontsb; Освободить стенд выходного контроляTRANSFER q2_,,Met5 ; Направить в военную приемку, а брак - на замену на пунктсборки; Сегмент имитации работы военной приемкиQUEUEOvpr; Занять очередь в военную приемкуSEIZEKonvpr; Занять военную приемкуDEPARTOvpr; Освободить очередь в военную приемкуADVANCE(Normal(11,Tpr_,T0pr_)) ; Имитация работы военной приемкиRELEASEKonvpr; Освободить военную приемкуTRANSFER q4_,,Met9; Готовые изделия - на склад; Сегмент счета блоков и изделий43Term7Met14Term5TERMINATESAVEVALUE P1+,1TERMINATETERMINATE; Количество готовых изделий; Количество забракованных блоков всех типов; Задание времени моделирования и расчет результатов моделированияGENERATE Vrmod; Задание времени моделированияTEST LX$prog,TG1,Met10 ; Если X$Prog< содержимого счетчика завершений, тоSAVEVALUE prog,TG1 ; записать в X$Prog содержимое счетчика завершенийMet10TEST ETG1,1,Met12; Если содержимое счетчика завершений равно 1, торасчет результатов моделированияSAVEVALUE Kolizd,(INT(N$Term7/X$prog)) ; Количество готовых изделийASSIGN 1,0; Подготовка к циклуMet15ASSIGN 1+,1; Начало цикла по числу типов блоковSAVEVALUE (10+P1),(INT(CH*1/X$Prog)); Количество готовых блоков всех типов,оставшихся на складахSAVEVALUE P1,(INT(X*1/X$Prog)); Количество забракованных блоков всех типовASSIGN11,(20+P1); Задание номера Х и запись его в Р11TEST GEP1,TipBl,Met15; Все ли типы блоков?SAVEVALUE TIzd,((AC1/X$Prog)/X$Kolizd); Среднее время подготовки одного изделияMet12TERMINATE 1Вариант 7Постановка задачиПредприятие имеет 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;n11 = 3;n12 = 2;n13 = 2;n2 = 2;Rav(T1, Tо1) = Rav(19,Rav(T3, Tо3) = Rav(15,q11 = 2;q12 = 3;q13 = 4;Exp(T13) =Nor(Tс, Toc) = Nor(22,6);8);Exp(T2) = Exp(14);Exp(T4) = Exp(17);Rav(T11, Tо11) = Rav(12, 6);Exp(T12) = Exp(16);Exp(21);Exp(T14) = Exp(17);2);44n3 = 2;q2 = 5;q4 = 3.Exp(Tп) = Exp(15);Nor(Tпр, Tопр) = Nor(18, 2);Значения T1, T2, T3, T4 и законы их распределения и q11 = q13, q12 = q14исследователь устанавливает самостоятельно.Результаты моделирования необходимо получить с точностью ε = 0,1 и доверительной вероятностью α = 0,95.Задание на исследованиеРазработать имитационную модель функционирования предприятия.

Исследовать влияние интервалов выпуска блоков из цехов (T1, T2, T3, Т4) и их качества (q11, q12, q13, q14) на время выпуска принятых военной приемкой 100изделий.Сделать выводы о загруженности подразделений предприятия и необходимыхмерах по повышению эффективности его функционирования.Программа модели; Вариант 7; Модель функционирования предприятия; Замена имен МКУ номерамиKontr1EQU1; Замена имен МКУ номерамиKontr2EQU2; Замена имен МКУ номерамиKontr3EQU3; Замена имен МКУ номерамиKontr4EQU4; Замена имен МКУ номерами; Задание исходных данныхq11_EQU0.02; Доля забракованных блоков на постахq12_q13_EQUEQU0.03; Доля забракованных блоков на постах n120.04; Доля забракованных блоков на постах n13q14_EQU0.06; Доля забракованных блоков на постах n14q2_EQU0.05; Доля забракованных изделий на пункте выходного контроляq4_EQU0.03; Доля забракованных изделий военной приемкойTipBlEQU4; Мах количество типов блоков, изготавливаемых цехамиVrModEQU2880; Время моделирования, 1 ед.

мод. вр. = 1 минT1_EQU19; Средний интервал выпуска блоков типа 1T01_EQU6; Стандартное отклонение времени выпуска блоков типа 1T2_EQU11; Средний интервал выпуска блоков типа 2T3_EQU15; Средний интервал выпуска блоков типа 3T03_EQU8; Стандартное отклонение времени выпуска блоков типа 345T4_EQU18; Средний интервал выпуска блоков типа 4T11_EQU12; Среднее время контроля на постах n11T011_EQU6; Стандартное отклонение времени контроля на постах n11T12_EQU16; Среднее время контроля на постах n12T13_EQU21; Среднее время контроля на постах n13T14_EQU17; Среднее время контроля на постах n14Tc_EQU2; Среднее время сборки изделияT0c_EQU2; Стандартное отклонение времени сборки изделияTp_EQU15; Среднее время проверки изделияTpr_EQU18; Среднее время приема изделияT0pr_EQU2; Стандартное отклонение времени приема изделияN_EQU100; Количество изделий, которое необходимо подготовить; Задание количества пунктов сборки и контроляSborKontr1Kontr2Kontr3Kontr4KontsbSTORAGESTORAGESTORAGESTORAGESTORAGESTORAGE232222;;;;;;КоличествоКоличествоКоличествоКоличествоКоличествоКоличествопунктов сборкипостов n11постов n12постов n13постов n14пунктов сборки;Сегмент имитации работы цеха 1 без постов контроляGENERATEASSIGNASSIGNзапись в Р2ASSIGNTRANSFER; СегментР2; Сегмент(Exponential(32,0,T2_))1,2; Код 2 в параметре 1 транзакта - тип 2 блока2,(Exponential(23,0,T12_)); Розыгрыш времени контроля и запись в Р29,q12_; Запись в Р9 доли брака блоков после постов контроля,Met1имитации работы цеха 3 без постов контроляGENERATEASSIGNASSIGNT3_,T03_1,3; Код 3 в параметре 1 транзакта - тип 3 блока2,(Exponential(22,0,T13_)); Розыгрыш времени контроля и запись вASSIGNTRANSFER9,q13_; Запись в Р9 доли брака блоков после постов контроля,Met1имитации работы цеха 4 без постов контроляGENERATEASSIGNASSIGNР29,q11_; Запись в Р9 доли брака блоков после постов контроля,Met1имитации работы цеха 2 без постов контроляGENERATEASSIGNASSIGNASSIGNTRANSFER; СегментT1_,T01_1,1; Код 1 в параметре 1 транзакта - тип 1 блока2,((T11_-T011_)+2#T011_#(RN27/1000)); Розыгрыш времени контроля и(Exponential(32,0,T4_))1,4; Код 4 в параметре 1 транзакта - тип 4 блока2,(Exponential(22,0,T14_)); Розыгрыш времени контроля и запись в46ASSIGN9,q14_; Запись в Р9 доли брака блоков после постов контроля; Сегмент имитации работыMet1Met21QUEUEENTERDEPARTADVANCELEAVEASSIGNASSIGNTEST ETRANSFERLINKпостов контроля блоковP1P1P1P2P110,010+,1P10,P1,Met21P9,,Met14P1,FIFO;;;;;;;;;;Встать в очередь с номером в Р1Занять МКУ с номером в Р1Покинуть очередь с номером в Р1Имитация контроля с временем в Р2Освободить МКУ с номером в Р1Подготовка к циклуНачало цикла по числу типов блоковКакой тип блока подготовлен?Отправить брак блоков к Met14Готовые блоки на склад с номером в Р1;;;;;;;;Подготовка к циклуНачало цикла по числу типов блоковВсе ли типы блоков?Есть на складе готовые блоки?ДаБлоки всех типов есть? Если да, тоотправить блоки на сборкуВернуться для проверки наличия всех типов блоков; Сегмент имитации сборки изделийGENERATE ,,,1ASSIGN1,0ASSIGN1+,1TEST LP1,TipBl,Met4TEST NECH*1,0UNLINKP1,Term5,1TEST GP1,TipBl,Met13Met4UNLINKP1,Met5,1TRANSFER ,Met3для следующего изделияMet3Met13Met5QUEUEENTERDEPARTADVANCELEAVESborka; Занять очередь на пункты сборкиSbor; Занять пункт сборкиSborka; Освободить очередь на пункт сборки(Normal(15,Tc_,T0c_)); Имитация сборкиSbor; Освободить пункт сборки; Cегмент имитации работы стендов выходного контроляMet9сборкиQUEUEENTERDEPARTADVANCELEAVETRANSFERKontSbor; Занять очередь на стенд выходного контроляKontsb; Занять стенд выходного контроляKontSbor; Освободить очередь на стенд выходного контроля(Exponential(11,0,Tp_)) ; Имитация работы стенда выходного контроляKontsb; Освободить стенд выходного контроляq2_,,Met5 ; Направить в военную приемку, а брак-на замену на пункт; Сегмент имитации работы военной приемкиQUEUESEIZEDEPARTADVANCERELEASETRANSFEROvpr; Занять очередь в военную приемкуKonvpr; Занять военную приемкуOvpr; Освободить очередь в военную приемку(Normal(11,Tpr_,T0pr_)) ; Имитация работы военной приемкиKonvpr; Освободить военную приемкуq4_,,Met9; Готовые изделия - на склад; Сегмент организации завершения моделирования и расчета результатов моделированияTEST LX$Prog,TG1,Met10 ; Если X$Prog< содержимого счетчика завершений, тоSAVEVALUE Prog,TG1 ; записать в X$Prog содержимое счетчика завершенийSAVEVALUE NIzd,0Met10SAVEVALUE NIzd+,1; Счет количества принятых военной приемкой изделийTEST EX$NIzd,N_,Term5 ; Если принято N_ изделий, зафиксировать один прогонTEST ETG1,1,Met12; Если содержимое счетчика завершений равно 1, торасчет результатов моделированияASSIGN 1,0; Подготовка к циклуMet15ASSIGN 1+,1; Начало цикла по числу типов блоков47SAVEVALUE (10+P1),(INT(CH*1/X$Prog))оставшихся на складахMet12Met14Term5; Количество готовых блоков всех типов,SAVEVALUE P1,(INT(X*1/X$Prog)); Количество забракованных блоков всех типовASSIGN11,(20+P1); Задание номера Х и запись его в Р11TEST GEP1,TipBl,Met15 ; Все ли типы блоков?SAVEVALUE TIzd,((AC1/X$Prog)/60); Время подготовки N_ изделий, часSAVEVALUE STIzd,((X$TIzd/N_)#60); Среднее время подготовки одного изделия, минSAVEVALUE NIzd,0; Обнуление X$NIzdTERMINATE 1SAVEVALUE P1+,1; Количество забракованных блоков всех типовTERMINATETERMINATE ; Вывод вспомогательных транзактовВариант 8Постановка задачиПредприятие имеет n1 цехов, производящих n1 типов блоков, т.