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

Сообщение, передача которого была прервана, передается по включенному резервному каналу. Время Tпр1, Tпр2, …, Tпрn2 передачи случайное.Отказавший основной канал восстанавливается. Время Tв1, Tв2, …, Tвn1восстановления случайное. После восстановления резервный канал выключаетсяи восстановленный канал продолжает работу с передачи очередного сообщения.Резервные каналы также подвержены отказам. Интервалы времени Tотр1,Tотр2, …, Tотрn2 между отказами случайные. Отказавший резервный канал восстанавливается. Время Tвр1, Tвр2, …, Tврn2 восстановления случайное.

Дляпрерванного сообщения отыскивается возможность передачи по любому исправному и свободному каналу.В случае полного заполнения накопителя поступающие сообщения теряются.Исходные данныеn1 = 2;Exp(Tп1) = Exp (Тп2) = Exp(3.2);Exp(Tот1) = Exp(Tот2) = Exp(80);Exp(Tв1) = Exp(Tв1) = Exp(5.1);31n2 = 2;n3 = 3;Tвк1 = Tвк2 = 1;Exp (Tпр1) = Exp(Tпр2) = Exp(8.7);Exp(Tотр1) = Exp(Tотр2) = Exp(120);Exp(Tвр1) = Exp(Tвр2) = Exp(1.3);Exp(T1) = Exp(2.7);Rav(T2, Tо2) = Rav(3.8, 1.2);Exp(T3) = Exp(2.2).Емкость накопителя, значения интервалов времени T1, T2, T3 поступлениясообщений исследователь устанавливает от исходных самостоятельно.Результаты моделирования необходимо получить с точностью ε = 0,01 и доверительной вероятностью α = 0,95.Задание на исследованиеРазработать имитационную модель функционирования направления связи. Исследовать влияние емкости L накопителя, интервалов времени T1, T2, T3 поступления сообщений и количества каналов на вероятность отказа в передачесообщений от каждого источника и по направлению связи в целом.

Сделать выводы о загруженности каналов связи и необходимых мерах по повышению эффективности функционирования направления связи.Программа модели; Вариант 3; Модель направления связи; Задание исходных данныхEmkEQU5; Емкость накопителяVrModEQU3600; Время моделированияNKanOsnEQU2; Число основных каналовNKanRezEQU2; Число резервных каналовT1_EQU2.7 ; Средний интервал поступления сообщений от источника 1T2_EQU3.8 ; Средний интервал поступления сообщений от источника 2T02_EQU1.2 ; Стандартное отклонение времени поступления сообщений от источника 2T3_EQU2.2 ; Средний интервал поступления сообщений от источника 3Tposn1EQU3.2; Среднее время передачи по основному каналуTprez1EQU8.7; Среднее время передачи по резервному каналуTotosn1EQU80; Среднее время между отказами основного каналаTotrez1EQU120; Среднее время между отказами резервного каналаTvosn1EQU5.1; Среднее время восстановления основного каналаTvrez1EQU1.3; Среднее время восстановления резервного каналаTvk1EQU1; Время включения резервного канала в работу; Описание арифметических выражений вычисления вероятностейVer1VARIABLE (N$Term12+N$Term14)/N$Soob1 ; передачи сообщений потока 1Ver2VARIABLE (N$Term13+N$Term15)/N$Soob2 ; передачи сообщений потока 2Ver3VARIABLE (N$Term6+N$Term9)/N$Soob3 ; передачи сообщений потока 3VerVARIABLE (X$Ver1+X$Ver2+X$Ver3)/3 ; передачи сообщений всех потоковVOtkVARIABLE 1-X$Ver; отказа в передаче сообщенийVerOtkVARIABLE (AC1-X$VrOtk)/AC1; безотказной работы; Сегмент имитации источников сообщений; Первый источникGENERATE (Exponential(234,0,T1_)) ; Генерация сообщений потока 1Soob1ASSIGN1,1; Запись в P1 номера источникаASSIGN6,0; Обнуление Р6TRANSFER ,Spis; Отправка сообщения на основные каналы; Второй источникGENERATESoob2ASSIGNASSIGNT2_, T02_1,26,0; Генерация сообщений потока 2; Запись в P1 номера источника; Обнуление Р632TRANSFER; Третий источникGENERATESoob3ASSIGNASSIGNTRANSFER; СегментSpisPoiskOsnMet1Met2Met3Term1,Spis; Отправка сообщения на основные каналы(Exponential(234,0,T3_)) ; Генерация сообщений потока 31,3; Запись в P1 номера источника6,0; Обнуление Р6,Spis; Отправка сообщения на основные каналыимитации работы накопителя и основных каналовTEST LCH$Nak,Emk,Term1 ; Если нет места, то - на счет удаленныхASSIGN4,0 ; Подготовка к циклу поиска свободного и исправного каналаASSIGN4+,1 ;Начало цикла поиска свободного и исправного каналаGATE FVP4,Met2; Проверка канала на исправностьGATE UP4,Met3; Проверка канала на занятостьTEST GE P4,NKanOsn,Met1; Все ли каналы просмотрены?TEST EP6,1,PoiskRez; Сообщение было прервано? Тогда на резервный каналTEST LCH$Nak,Emk,Term1 ; Если нет места, то - на счет удаленныхLINKNak,FIFO ; Сообщение не было прервано? Тогда в накопительSEIZEP4; Занятие каналаADVANCE(Exponential(30,0,Tposn1)) ; Имитация передачи по каналуRELEASEP4; Освобождение каналаUNLINKNak,PoiskOsn,1 ;Из накопителя - на поиск основного каналаTRANSFER ,Term4; Переданное сообщение - на счетTERMINATE; Счет потерянных сообщений; Счет сообщений, переданных по основным каналамTerm4TRANSFER,(Term4+P1)Term12TERMINATE; Счет сообщений от источника 1Term13TERMINATE; Счет сообщений от источника 2Term9TERMINATE; Счет сообщений от источника 3; Сегмент имитации выхода из строя основных каналовGENERATE ,,,1Rozigr1ADVANCE(Exponential(11,0,(Totosn1/NKanOsn))) ; Время между отказамиSAVEVALUE 1,(RN317/1000); Обращение к RN и запись в Х1ASSIGN5,0; Подготовка к циклу определения отказавшего каналаOtkOsnASSIGN5+,1 ; Начало цикла определения отказавшего каналаTEST LEX1,(P5#(1/NKanOsn)),OtkOsn;Определение отказавшего каналаASSIGN4,P5; Занесение в P4 номера отказавшего каналаGATE FVP4,Rozigr1; Не является ли канал уже отказавшим?ASSIGN1,(Exponential(15,0,Tvosn1)) ; Время восстановления;Имитация отказов канала связиMet17FUNAVAIL P4,RE,Met4; Перевод канала P4 в недоступностьADVANCEP1; Имитация восстановления каналаSAVEVALUE VrOtk+,P1; Учет времени отказаFAVAILP4; Перевод восстановленного канала в доступностьTRANSFER ,Rozigr1; Отправить на розыгрыш очередного отказаMet4ASSIGN6,1; Занесение в P6 признака прерванного сообщенияRELEASEP4 ; Освободить канал, при передаче по которому произошел отказTRANSFER ,PoiskOsn ;Отправить сообщение на поиск свободного канала; Сегмент имитации работы резервных каналовPoiskRez ASSIGN4,NKanOsn; Подготовка к циклу поиска свободного и исправногоканалаMet5ASSIGN4+,1 ; Начало цикла поиска свободного и исправного каналаGATE FVP4,Met18; Проверка канала на исправностьGATE UP4,Met6; Проверка канала на занятостьMet18TEST GEP4,(NKanOsn+NKanRez),Met5; Все ли каналы просмотрены?TEST LCH$Nak,Emk,Term1 ; Если нет места, то - на счет удаленныхLINKNak,FIFO; Поместить в накопительMet6SEIZEP4; Занять канал с номером в Р4ADVANCETvk1; Имитация включения каналаADVANCE(Exponential(36,0,Tprez1)); Имитация работы каналаRELEASEP4; Освободить канал с номером в Р4UNLINKNak,PoiskOsn,1; Очередное сообщение на передачу33; Учет сообщений, переданных по резервным каналамTerm7TRANSFER ,(Term7+P1)Term14TERMINATE; Счет сообщений от источника 1Term15TERMINATE; Счет сообщений от источника 2Term6TERMINATE; Счет сообщений от источника 3; Сегмент имитации выхода из строя резервных каналовGENERATE ,,,1Rozigr2ADVANCE(Exponential(11,0,(Totrez1/NKanRez))) ; Время между отказамиSAVEVALUE 2,(RN415/1000); Обращение к RN и запись в Х2ASSIGN5,0; Подготовка к циклу определения отказавшего каналаOtkRezASSIGN5+,1; Начало цикла определения отказавшего каналаTEST LEX2,(P5#(1/NKanRez)),OtkRez ;Определение отказавшего каналаASSIGN4,(P5+NKanOsn); Занесение в P4 номера отказавшего каналаGATE FVP4,Rozigr2; Не является ли канал уже отказавшим?ASSIGN1,(Exponential(11,0,Tvrez1)) ; Розыгрыш времени восстановленияFUNAVAIL P4,RE,Met7; Перевод канала P4 в недоступностьADVANCEP1; Имитация восстановления каналаSAVEVALUE VrOtk+,P1; Учет времени отказаFAVAILP4; Перевод восстановленного канала в доступностьTRANSFER ,Rozigr2; Отправить на розыгрыш очередного отказаMet7ASSIGN6,1; Занесение в P6 признака прерванного сообщенияRELEASEP4 ; Освободить канал, при передаче по которому произошел отказTRANSFER ,Spis; Отправить непереданное сообщение в накопитель; СегментGENERATETEST ESAVEVALUESAVEVALUESAVEVALUESAVEVALUESAVEVALUESAVEVALUEMet19задания времени моделирования и вычисления результатовVrMod; Задание времени моделированияTG1,1,Met19; Если TG1=1, то расчет результатовVer1,V$Ver1; Вероятность передачи сообщений потока1Ver2,V$Ver2; Вероятность передачи сообщений потока2Ver3,V$Ver3; Вероятность передачи сообщений потока3Ver,V$Ver; Вероятность передачи сообщений всех потоковVOtk,V$VOtk; Вероятность отказав в передаче сообщенийVerOtk,V$VerOtk; Вероятность безотказной работыTERMINATE 1Вариант 4Постановка задачиНаправление связи состоит из n1 основных, n2 резервных каналов связи,общего накопителя емкостью на 2 сообщения, n3 источников.

Интервалы T1,T2, …, Tn поступления сообщений случайные. При нормальной работе сообщенияпередаются по основным каналам. Время Tп1, Tп2, …, Tпn передачи случайные.Основные каналы подвержены отказам. Интервалы времени Tот1, Tот2, …,Tотn1 между отказами случайные. Если отказ происходит во время передачи,отыскивается исправный и свободный основной канал. Если такого нет, включается один из резервных каналов, если он исправен и свободен.

Время Tвк1,Tвк2, …, Tвкn2 включения постоянное для соответствующего канала. Сообщение, передача которого была прервана, передается по включенному резервномуканалу. Время Tпр1, Tпр2, …, Tпрn2 передачи случайное. Отказавший основнойканал восстанавливается. Время Tв1, Tв2, …, Tвn1 восстановления случайное.После восстановления резервный канал выключается и восстановленный каналпродолжает работу с передачи очередного сообщения.Резервные каналы также подвержены отказам. Интервалы времени Tотр1,Tотр2, …, Tотрn2 между отказами случайные. Отказавший резервный канал восстанавливается.

Время Tвр1, Tвр2, …, Tврn2 восстановления случайное. Для34прерванного сообщения отыскивается возможность передачи по любому исправному и свободному каналу.Сообщения источника 1 обладают абсолютным приоритетом по отношению к сообщениям других источников. Вследствие этого, если при поступлении сообщения от источника 1 все каналы заняты также передачей сообщений от источника 1, то прерывания не происходит и заявка считается потерянной. Если жеесть передача сообщений от других источников, то передача любого из нихпрерывается и начинается передача сообщения от источника 1. Сообщения более низких категорий теряются.

В случае полного заполнения накопителя поступающие сообщения теряются.Исходные данныеn1 = 2;n2 = 2;n3 = 3;Exp(Tп1) = Exp (Тп2) = Exp(3.2);Exp(Tот1) = Exp(Tот2) = Exp(80);Exp(Tв1) = Exp(Tв1) = Exp(5.1);Tвк1 = Tвк2 = 1;Exp (Tпр1) = Exp(Tпр2) = Exp(8.7); Exp(Tотр1) = Exp(Tотр2)=Exp(120);Exp(Tвр1) = Exp(Tвр2) = Exp(1.3);Exp(T1) = Exp(2.7); Rav(T2, Tо2) = Rav(3.8, 1.2);Exp(T3) = Exp(2.2).Емкость накопителя, значения интервалов времени T1, T2, T3 поступлениясообщений исследователь устанавливает от исходных самостоятельно. Результаты моделирования необходимо получить с точностью ε = 0,01 и доверительной вероятностью α = 0,95.Задание на исследованиеРазработать имитационную модель функционирования направления связи.

Исследовать влияние емкости L накопителя, интервалов времени T1, T2, T3 поступления сообщений и количества каналов на вероятность отказа в передачесообщений от каждого источника и по направлению связи в целом.Сделать выводы о загруженности каналов связи и необходимых мерах по повышению эффективности функционирования направления связи.Программа модели; Вариант 4; Модель направления связи; Задание исходных данныхEmkEQU2; Емкость накопителяVrModEQU3600; Время моделированияNKanOsnEQU2; Число основных каналовNKanRezEQU2; Число резервных каналовT1_EQU2.7 ;Средний интервал поступления сообщений от источника1T2_EQU3.8 ;Средний интервал поступления сообщений от источника2T02_EQU1.2; Стандартное отклонение времени поступления сообщений от источника 2T3_EQU2.2 ;Средний интервал поступления сообщений от источника3Tposn1EQU3.2 ; Среднее время передачи по основному каналуTprez1EQU8.7 ; Среднее время передачи по резервному каналуTotosn1EQU80; Среднее время между отказами основного каналаTotrez1EQU120 ; Среднее время между отказами резервного каналаTvosn1EQU5.1 ; Среднее время восстановления основного каналаTvrez1EQU1.3 ; Среднее время восстановления резервного каналаTvk1EQU1; Время включения резервного канала в работу; Описание арифметических выражений вычисления вероятностейVer1VARIABLE (N$Term12+N$Term14)/N$Soob1;передачи сообщенийVer2VARIABLE (N$Term13+N$Term15)/N$Soob2;передачи сообщенийVer3VARIABLE (N$Term6+N$Term9)/N$Soob3;передачи сообщенийVerVARIABLE (X$Ver1+X$Ver2+X$Ver3)/3 ;передачи сообщений всех35потока1потока2потока3потоковVOtkVerOtkVARIABLEVARIABLE1-X$Ver(AC1-X$VrOtk)/AC1; отказа в передаче сообщений; безотказной работы; Сегмент имитации источников сообщений; Первый источникGENERATE (Exponential(234,0,T1_)),,1; Генерация сообщений потока 1Soob1ASSIGN1,1; Запись в P1 номера источникаASSIGN6,0; Обнуление Р6TRANSFER ,Spis; Отправка сообщения на поиск основного канала; Второй источникGENERATESoob2ASSIGNASSIGNTRANSFERT2_,T02_; Генерация сообщений потока 21,2; Запись в P1 номера источника6,0; Обнуление Р6,Spis ; Отправка сообщения на поиск основного канала; Третий источникGENERATESoob3ASSIGNASSIGNTRANSFER(Exponential(234,0,T3_)) ; Генерация сообщения потока 31,3; Запись в P1 номера источника6,0; Обнуление Р6,Spis; Отправка сообщения на поиск основного канала; СегментSpisPoiskOsnMet1Met2Met3Term1Met20имитации работы накопителя и основных каналовTEST LCH$Nak,Emk,Term1 ; Если нет места, то - на счет удаленныхASSIGN4,0 ; Подготовка к циклу поиска свободного и исправного каналаASSIGN4+,1; Начало цикла поиска свободного и исправного каналаGATE FVP4,Met2; Проверка канала на исправностьGATE UP4,Met3; Проверка канала на занятостьTEST EX*4,1,Met20; Если канал не занят источником 1, то прерватьTEST GE P4,NKanOsn,Met1; Все ли каналы просмотрены?TEST EP6,1,PoiskRez; Сообщение было прервано? Тогда на резервный каналTEST LCH$Nak,Emk,Term1 ; Если нет места, то - на счет удаленныхLINKNak,FIFO ; Сообщение не было прервано? Тогда в накопительSEIZEP4; Занятие каналаSAVEVALUE P4,P1; В Х с номером в Р4 номер источникаADVANCE(Exponential(30,0,Tposn1)) ; Имитация передачи по каналуRELEASEP4; Освобождение каналаSAVEVALUE P4,0; Обнулить Х с номером в Р4UNLINKNak,PoiskOsn,1 Из накопителя - на поиск основного каналаTRANSFER ,Term4; Переданное сообщение - на счетTERMINATE; Счет потерянных сообщенийPREEMPTSAVEVALUEADVANCERETURNSAVEVALUEP4,PR,Term1,,RE ; Прервать передачу сообщений с низким приоритетомP4,P1; Записать в Х с номером в Р4 номер источника(Exponential(30,0,Tposn1)) ; Имитация передачи по каналуP4; Освободить канал с номером в Р4P4,0; Обнулить Х с номером в Р4; Счет сообщений, переданных по основным каналамTerm4TRANSFER,(Term4+P1)Term12TERMINATE; Счет сообщений от источника 1Term13TERMINATE; Счет сообщений от источника 2Term9TERMINATE; Счет сообщений от источника 3; Сегмент имитации выхода из строя основных каналовGENERATE ,,,1Rozigr1ADVANCE(Exponential(11,0,(Totosn1/NKanOsn))) ; Розыгрыш времени между отказамиSAVEVALUE 1000,(RN317/1000); Обращение к RN и запись в Х1ASSIGN5,0 ; Подготовка к циклу определения отказавшего каналаOtkOsnASSIGN5+,1 ; Начало цикла определения отказавшего каналаTEST LEX1000,(P5#(1/NKanOsn)),OtkOsn ; Определение отказавшего каналаASSIGN4,P5 ; Занесение в P4 номера отказавшего каналаGATE FVP4,Rozigr1; Не является ли канал уже отказавшим?ASSIGN1,(Exponential(15,0,Tvosn1)) ; Розыгрыш времени восстановления36;Met17Имитация отказов канала связиFUNAVAIL P4,RE,Met4; Перевод канала P4 в недоступностьADVANCEP1; Имитация восстановления каналаSAVEVALUE VrOtk+,P1; Учет времени отказаFAVAILP4; Перевод восстановленного канала в доступностьTRANSFER ,Rozigr1 ; Отправить на розыгрыш очередного отказаMet4ASSIGN6,1 ; Занесение в P6 признака прерванного сообщенияRELEASEP4; Освободить канал, при передаче по которому произошел отказTRANSFER ,PoiskOsn ;Отправить сообщение на поиск свободного канала; Сегмент имитации работы резервных каналовPoiskRez ASSIGN4,NKanOsn; Подготовка к циклу поиска свободного и исправногоканалаMet5ASSIGN4+,1 ; Начало цикла поиска свободного и исправного каналаGATE FVP4,Met18; Проверка канала на исправностьGATE UP4,Met6; Проверка канала на занятостьTEST EX*4,1,Met21; Если канал не занят источником 1, то прерватьMet18TEST GEP4,(NKanOsn+NKanRez),Met5 ; Все ли каналы просмотрены?TEST LCH$Nak,Emk,Term1 ; Если нет места, то - на счет удаленныхLINKNak,FIFO; Поместить в накопительMet6SEIZEP4; Занять канал с номером в Р4SAVEVALUE P4,P1; В Х с номером в Р4 номер источникаADVANCETvk1; Имитация включения каналаADVANCE(Exponential(36,0,Tprez1)); Имитация работы каналаRELEASEP4; Освободить канал с номером в Р4SAVEVALUE P4,0; Обнулить Х с номером в Р4UNLINKNak,PoiskOsn,1; Очередное сообщение на передачу; Учет сообщений, переданных по резервным каналамTerm7TRANSFER ,(Term7+P1)Term14TERMINATE; Счет сообщений от источника 1Term15TERMINATE; Счет сообщений от источника 2Term6TERMINATE; Счет сообщений от источника 3Met21PREEMPTSAVEVALUEADVANCERETURNSAVEVALUETRANSFERP4,PR,Term1,,RE ; Прервать передачу сообщений с низким приоритетомP4,P1; Записать в Х с номером в Р4 номер источника(Exponential(30,0,Tposn1)) ; Имитация передачи по каналуP4; Освободить канал с номером в Р4P4,0; Обнулить Х с номером в Р4,Term7; Сегмент имитации выхода из строя резервных каналовGENERATE ,,,1Rozigr2ADVANCE(Exponential(11,0,(Totrez1/NKanRez))) ; Розыгрыш времени между отказамиSAVEVALUE 1001,(RN415/1000); Обращение к RN и запись в Х2ASSIGN5,0; Подготовка к циклу определения отказавшего каналаOtkRezASSIGN5+,1; Начало цикла определения отказавшего каналаTEST LEX1001,(P5#(1/NKanRez)),OtkRez ; Определение отказавшего каналаASSIGN4,(P5+NKanOsn) ; Занесение в P4 номера отказавшего каналаGATE FVP4,Rozigr2; Не является ли канал уже отказавшим?ASSIGN1,(Exponential(11,0,Tvrez1)) ; Розыгрыш времени восстановленияFUNAVAIL P4,RE,Met7; Перевод канала P4 в недоступностьADVANCEP1; Имитация восстановления каналаSAVEVALUE VrOtk+,P1; Учет времени отказаFAVAILP4; Перевод восстановленного канала в доступностьTRANSFER ,Rozigr2; Отправить на розыгрыш очередного отказаMet7ASSIGN6,1; Занесение в P6 признака прерванного сообщенияRELEASEP4; Освободить канал, при передаче по которому произошел отказTRANSFER ,Spis ; Отправить непереданное сообщение в накопитель; Сегмент задания времени моделирования и вычисления результатовGENERATEVrMod; Задание времени моделирования37Met19TEST ESAVEVALUESAVEVALUESAVEVALUESAVEVALUESAVEVALUESAVEVALUETERMINATETG1,1,Met19; Если TG1=1, то расчет результатовVer1,V$Ver1; Вероятность передачи сообщений потока1Ver2,V$Ver2; Вероятность передачи сообщений потока2Ver3,V$Ver3; Вероятность передачи сообщений потока3Ver,V$Ver; Вероятность передачи сообщений всех потоковVOtk,V$VOtk ; Вероятность отказа в передаче сообщенийVerOtk,V$VerOtk ; Вероятность безотказной работы12.2.