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

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

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

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

Время приемки Tпр одного изделия случайное. По результатам приемки бракуется q4 % изделий, которые направляются вновь на стенд выходногоконтроля. Принятые военной приемкой изделия направляются на склад.Исходные данныеn1 = 3;Exp(T1) = Exp(22);Rav(T3, Tо3) = Rav(27,n11 = 2; Exp(T11) = Exp(7);n13 = 2; Exp(T13) = Exp(10);n2 = 2; Nor(Tс, Tос) = Nor(18,q3 = 2; Exp(Tз) = Exp(12);Rav(T2, Tо2) = Rav(18, 4);5);n12 = 2;Rav(T12, Tо12) = Rav(9, 3);2);n3 = 2; Nor(Tп, Tоп) = Nor(12, 2);Nor(Tпр, Tопр) = Nor(15, 2).Величины брака q11, q12, q13 для n11, n12, n13 соответственно, q2 и q4исследователь устанавливает самостоятельно.

Результаты моделирования необходимо получить с точностью ε = 1 и доверительной вероятностью α = 0,99.48Задание на исследованиеРазработать имитационную модель функционирования предприятия. Исследовать влияние качества изготовления блоков q11, q12, q13 на количество принятых военной приемкой изделий в течение недели (48 часов).Сделать выводы о загруженности подразделений предприятия и необходимыхмерах по повышению эффективности его функционирования.Программа модели; Вариант 8; Модель функционирования предприятия; Изделия, забракованные на стендах выходного контроля из-за нескольких типов ;блоков,направляются на пункты сборки, где блоки заменяются.; После замены блоков изделие направляется на стенды выходного контроля,; блоки, прошедшие первичную замену, направляются на посты конроля цехов, а ;прошедшиевторичную замену - бракуются.; После военной приемки изделие вновь направляется на стенды выходного кон;троля.; Замена имен МКУ номерамиKontr1Kontr2Kontr3; Заданиеq11_q12_q13_q2_q4_q3_TipBlVrModT1_T2_T02_T3_T03_T11_T12_T012_T13_Tc_T0c_Tp_T0p_Tz_Tpr_T0pr_EQU1; Замена имен МКУ номерамиEQU2; Замена имен МКУ номерамиEQU3; Замена имен МКУ номерамиисходных данныхEQU0.01; Доля забракованных блоков на постах n11EQU0.03; Доля забракованных блоков на постах n12EQU0.05; Доля забракованных блоков на постах n13EQU0.05; Доля забракованных изделий на пункте выходного контроляEQU0.05; Доля забракованных изделий военной приемкойEQU2; Мах количество блоков в изделии для замены после контроляEQU3; Мах количество типов блоков, изготавливаемых цехамиEQU288; Время моделирования, 1 ед.

мод. вр. = 1 минEQU22; Средний интервал выпуска блоков типа 1EQU18; Средний интервал выпуска блоков типа 2EQU4; Стандартное отклонение времени выпуска блоков типа 2EQU27; Средний интервал выпуска блоков типа 3EQU5; Стандартное отклонение времени выпуска блоков типа 3EQU7; Среднее время контроля на постах n11EQU9; Среднее время контроля на постах n12EQU3; Стандартное отклонение времени контроля на постах n12EQU10; Среднее время контроля на постах n13EQU18; Среднее время сборки изделияEQU2; Стандартное отклонение времени сборки изделияEQU18; Среднее время проверки изделияEQU2; Стандартное отклонение времени проверки изделияEQU12; Время замены одного забракованного блокаEQU15; Среднее время приема изделияEQU2; Стандартное отклонение времени приема изделия; ЗаданиеSborKontr1Kontr2Kontr3Kontsbколичества пунктов сборки и контроляSTORAGE2; КоличествоSTORAGE2; КоличествоSTORAGE2; КоличествоSTORAGE2; КоличествоSTORAGE2; Количествопунктов сборкипостов n11постов n12постов n13пунктов сборки;Сегмент имитации работы цеха 1 без постов контроляGENERATE (Exponential(32,0,T1_))ASSIGN1,1; Код 1 в параметре 1 транзакта - тип 1 блока49Р2ASSIGN2,(Exponential(23,0,T11_))ASSIGNTRANSFER9,q11_; Запись в Р9 доли брака блоков после постов контроля,Met1; СегментимитацииGENERATEASSIGNASSIGNзапись в Р2ASSIGNTRANSFER; СегментР2; Розыгрыш времени контроля и запись вработы цеха 2 без постов контроляT2_,T02_1,2; Код 2 в параметре 1 транзакта - тип 2 блока2,((T12_-T012_)+2#T012_#(RN27/1000)); Розыгрыш времени контроля и9,q12_; Запись в Р9 доли брака блоков после постов контроля,Met1имитацииGENERATEASSIGNASSIGNработы цеха 3 без постов контроляT3_,T03_1,3; Код 3 в параметре 1 транзакта - тип 3 блока2,(Exponential(22,0,T13_)); Розыгрыш времени контроля и запись вASSIGN9,q13_; Запись в Р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,Met4TEST 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(Normal(11,Tp_,T0p_)); Имитация работы стенда выходного контроляLEAVEKontsb; Освободить стенд выходного контроляTRANSFER q2_,,Met6; Направить в военную приемку, а брак-на замену; Сегмент имитации работы военной приемкиQUEUEOvpr; Занять очередь в военную приемкуSEIZEKonvpr; Занять военную приемкуDEPARTOvpr; Освободить очередь в военную приемкуADVANCE(Normal(11,Tpr_,T0pr_)) ; Имитация работы военной приемкиRELEASEKonvpr; Освободить военную приемкуTRANSFER q4_,,Met9; Готовые изделия-на склад; Сегмент счета блоков и изделий50Term7Met14TERMINATE; Количество готовых изделийSAVEVALUE P1+,1; Количество забракованных блоков всех типовTERMINATE; Сегмент имитации замены блоков на пунктах сборки;Определение количества блоков, подлежащих заменеMet6ASSIGN6,(RN713/1000); Обращение к RN и запись в P6ASSIGN 3,0; Подготовка к циклуMet7ASSIGN 3+,1; Начало цикла по количеству блоков, подлежащих заменеTEST LEP6,(P3#(1/q3_)),Met7; Если условие выполняется, тоASSIGN5,P3; занести в Р5 количество блоков, подлежащих замене;сборкиОпределение типов блоков, подлежащих замене, и имитация их замены на пунктахASSIGN7,0 ; Подготовка к внешнему циклу по числу блоков, подлежащих заменеASSIGN7+,1 ; Начало внешнего цикла по числу блоков, подлежащих заменеASSIGN 6,(RN73/1000); Обращение к RN и запись в P6ASSIGN3,0 ; Подготовка к внутреннему циклу по числу типов блоковMet8ASSIGN3+,1; Начало внутреннего цикла по числу типов блоковTEST LEP6,(P3#(1/TipBl)),Met8 ; Если условие выполняется, то тип блока определен и он в Р3ASSIGN4,0; Подготовка к циклу по числу типов блоковMet17ASSIGN4+,1; Начало цикла по числу типов блоковTEST EP3,P4,Met17 ; При выполнении условия тип блока определенTEST NE CH*3,0 ; Есть ли готовые блоки этого типа? Если есть,ASSIGN 6,(Exponential(47,0,Tz_)) ; Разыграть время замены блокаPRIORITY 1; Дать более высокий приоритетQUEUESborka; Встать в очередь на пункты сборкиENTERSbor; Занять пункт сборкиDEPARTSborka; Покинуть очередь на пункты сборкиADVANCEP6; Замена блокаLEAVESbor; Освободить пункт сборкиUNLINKP3,Met19,1; Замененный блокMet16TEST GEP7,P5,Met11 ; Если условие выполняется, то все типы блоков замененыTRANSFER ,Met9 ; Направить изделие после замены блоков на стенды выходногоконтроляMet19ASSIGN8+,1; Код 1 - признак того, что этот блок один раз былотправлен на посты контроля цехаTEST EP8,2,Met1; Если код 1, направить замененный блок на постыконтроля цехаMet20ASSIGN10,(20+P1)SAVEVALUE P10+,1; Запись признака первой замены блокаTERMINATE; Блоки с кодом 2, т.

е. вторично, не направляютсяна посты контроля цехаTerm5TERMINATEMet11; Задание времени моделирования и расчет результатов моделирования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)); Количество забракованных блоков всех типовTEST GEP1,TipBl,Met15Met12TERMINATE 151Вариант 9Постановка задачиПредприятие имеет n1 цехов, производящих n1 типов блоков, т.