poddergrukovodstkp (538827), страница 12
Текст из файла (страница 12)
Программа модели
; Вариант 11
; Модель вычислительного комплекса коммутации сообщений
; Задание исходных данных
VrMod | EQU |
NCan | EQU |
Tl | EQU |
T2 | EQU |
T02 | EQU |
7200 ; Время моделирования, 1 ед. мод. вр. = 1с
3 ; Число каналов
132.5; Средний интервал времени поступления сообщений от источника 1 165.2; Средний интервал времени поступления сообщений от источника 2 13;Среднеквадратическое отклонение интервала времени ; поступления сообщений от источника 2
T3_ EQU 85.1; Средний интервал времени поступления сообщений от источника 3
T4_ EQU 142.4 ; Средний интервал времени поступления сообщений от источника 4
p1_ EQU 0.6 ; Вероятность поступления сообщений 1 категории
Q_ EQU 3600 ; Производительность ВККС, оп/c
V_ EQU 5000 ; Скорость передачи, бит/с
60
Рс | EQU | 0.7 |
LI | EQU | 2500000 |
L2 | EQU | 5 |
TOtkl | EQU | 3600 |
TOtk2 | EQU | 1800 |
TVostl | EQU | 3.7 |
TVost2 | EQU | 4.2 |
Вероятность потери сообщений при отказе ВККС Емкость накопителя ВККС, байт
; Описание арифметических выражений вычисления
DL VARIABLE INT(NORMAL(114,FN$S_,FN$So_)); Длины (вычислительной сложности) сообщения
VrPer VARIABLE (P2/V_)#8 ; Времени передачи сообщения
VrObr VARIABLE P2/Q_ ; Времени обработки сообщения
Емкость накопителя каналов связи Среднее время между отказами ВККС Среднее время между отказами каналов Среднее время восстановления ВККС Среднее время восстановления каналов
;Вероятность передачи и потери сообщений
VPerS1 VARIABLE N$Ter1/N$Met1 ;Вероятность передачи сообщений 1 категории
VPerS2 VARIABLE N$Ter2/N$Met2 ;Вероятность передачи сообщений 2 категории
VPerS3 VARIABLE N$Ter3/N$Met3 ;Вероятность передачи сообщений 3 категории
VPotS1 VARIABLE N$Ter4/N$Met1 ;Вероятность потери сообщений 1 категории
VPotS2 VARIABLE N$Ter5/N$Met2 ;Вероятность потери сообщений 2 категории
VPotS3 VARIABLE N$Ter6/N$Met3 ;Вероятность потери сообщений 3 категории
Kat FUNCTION RN34,D3 ;Вероятности видов категорий
.3,1/.5,2/1,3
S_ FUNCTION P1,D3; Средние вычислительные сложности сообщений (длина), оп (байт)
1,53000/2,86000/3,66000
; Среднеквадратические отклонения вычислительных сложностей со-
So_ FUNCTION P1,D3
общений (длин), оп (байт)
; Сегмент имитации сообщений от абонента 1 GENERATE (Exponential(11,0,T1_)) ; Источник 1 сообщений Розыгрыш категории сообщения ; Код категории в Р1 Met4 | ASSIGN | l,FN$Kat |
Numl | TRANSFER | ,(Numl+Pl) |
Metl | TRANSFER | ,Met02 |
Met2 | TRANSFER | ,Met02 |
Met3 | TRANSFER | ,Met02 |
; | Имитация | сообщений |
Met02 | ASSIGN | 2,V$DL ; Занесение |
ASSIGN | 3,V$VrPer ; | |
ASSIGN | 8,V$VrObr ; | |
ASSIGN | 7,0 ; | |
TEST E | Pl,l,Metlll ; | |
PRIORITY | 1 ; | |
TRANSFER | ,Metlll ; |
1,6100/2,5000/3,7000
Занесение в Р2 длины (вычислительной сложности) сообщения Занесение в Р3 времени передачи сообщения Занесение в Р8 времени обработки сообщения Код 0 - признак попадания в накопитель ВККС Если сообщение 1 категории, то сообщению 1 категории - высокий приоритет Отправить сообщение на ВККС
;Сегмент имитации сообщений от абонента 2
GENERATE T2_,T02_ ; Источник 2 сообщений
TRANSFER ,Met4 ; Отправить для розыгрыша категории
;Сегмент имитации сообщений от абонента 3
GENERATE (Exponential(11,0,T3_)) ; Источник 3 сообщений
TRANSFER ,Met4 ; Отправить для розыгрыша категории
;Сегмент имитации сообщений от абонента 4
;Сегмент работы накопителя и ВККС
Met111 GATE FV Vkks,Met5 ; Проверка ВККС на исправность GATE U Vkks,Met17 ; Проверка ВККС на занятость TEST LE P2,(L1_-X$TEmk),Met5 ; Есть ли место в накопителе ВККС? SAVEVALUE TEmk+,P2 ; Увеличение текущей емкости накопителя на длину сообщения LINK SVkks,PR ; Поместить сообщение в накопитель ВККС
GENERATE (Exponential(11,0,T4_)) ; Источник 4 сообщений
TRANSFER ,Met4 ; Отправить для розыгрыша категории
61
ASSIGN SEIZE ADVANCE RELEASE TEST E
7,1; Признак - сообщение поступило на ВККС, минуя накопитель
SVkks,Met14,1 ; Очередное сообщения из накопителя ВККС на обработку
Metl7 Metl4
Vkks P8 Vkks
P7,0,Met1 SAVEVALUE TEmk-,P2 обработанного сообщения
Metl
UNLINK
; Занять ВККС ; Имитация обработки ; Освобождение ВККС ; Если Р7 =0, то ; уменьшить текущую емкость
накопителя ВККС на длину
; Сегмент имитации Met15 ASSIGN
работы каналов связи
4,0 ; Подготовка к циклу
ASSIGN
GATE FV
GATE U
TEST GE
TEST L
LINK
SEIZE
ADVANCE
RELEASE
UNLINK
TRANSFER
Metl6
4+,; Начало цикла поиска исправного и свободного канала
P4,Met23 ; Исправен ли канал? Если да, то
Met23
Есть ли место в накопителе каналов? Поместить сообщение в накопитель каналов Занять канал с номером в Р4 Имитация передачи сообщения Освобождение канала с номером в Р4 ; Очередное сообщения из буфера каналов на передачу ; Счет переданных сообщений
CH$Spis,L2_,Met5
Spis,PR
P4
P3
P4
Spis,Metl5,1
,MetlO
Met21
;Сегмент имитации о GENERATE
тказов ВККС
,,,1
(Exponential(237,0,
1,(RN35/1000) ;
Pl,Pc_,Met50 ;
Vkks,RE,Metll5 ;
(Exponential(237,0,
Vkks ;
,Met49 ;
Vkks ;
P7,0,Met5 ; TEmk-,P2 ; умень
,Met5 ;
Spis,Met5,ALL ;
SVkks,Met5,ALL ;
TEmk,0 ;
,Met51 ; Отправить
Met49 Met51
Met115
терянного Met50
P4,Met21 ; занят ли канал? Если нет, на Met21-занять канал P4,NCan,Met16 ;Все ли каналы просмотрены? Если нет,продолжить поиск
ADVANCE
ASSIGN
TEST LE
FUNAVAIL
ADVANCE
FAVAIL
TRANSFER
RELEASE
TEST E
SAVEVALUE
сообщения
TRANSFER
UNLINK
UNLINK
SAVEVALUE
TRANSFER
TOtk1)); Розыгрыш времени до очередного отказа Обращение к датчику RN Все ли сообщения в накопителях теряются? Перевод ВККС в неисправное состояние TVost1)) ; Имитация восстановления Перевод ВККС в исправное состояние Отправить для розыгрыша очередного отказа Освобождение ВККС прерванным сообщением Если Р7 =0, то
шить текущую емкость накопителя ВККС на длину по-Отправить в накопитель каналов Потеря всех сообщений из накопителя ВККС Потеря всех сообщений из буфера каналов Значение текущей емкости =0 для перевода ВККС в неисправное состояние
;Сегмент имитации отказов 1 канала связи
GENERATE
SAVEVALUE
ASSIGN
ADVANCE
GATE FV
FUNAVAIL
ADVANCE
FAVAIL
TRANSFER
RELEASE
TEST E
,,,NCan
1+,1 4,X1
(Exponential(237, P4,Met19 P4,RE,Met112 (Exponential(237, P4
,Met19; Отправить P4 P1,1,Met5
Metl9
; Число транзактов - по числу кканалов связи ; Занести в Х последовательно 1, 2, ..., NCan ; Занести в P4 последовательно 1, 2, ..., NCan 0,TOtk2)) ; Розыгрыш времени до очередного отказа ; Канал уже неисправен? Тогда новый розыгрыш ; Перевод канала в неисправное состояние 0,TVost2)); Имитация восстановления канала
; Перевод в исправное состояние для розыгрыша очередного отказа
Metll2
; Освобождение канала с номером 1
; Если сообщение 1 категории, то
TRANSFER ,Met15 Сегмент имитации отказов 2 канала связи ,(Met10+P1) MetlO | TRANSFER |
Terl | TERMINATE |
Ter2 | TERMINATE |
Ter3 | TERMINATE |
Met5 | TRANSFER |
Ter4 | TERMINATE |
Ter5 | TERMINATE |
; отправить на повторную передачу
,(Met5+Pl)
;Переданные сообщения 1 категории ;Переданные сообщения 2 категории ;Переданные сообщения 3 категории
;Потерянные сообщения 1 категории ;Потерянные сообщения 2 категории
62
Ter6 TERMINATE
;Потерянные сообщения 3 категории
; Время моделирования
GENERATE VrMod
TEST E TG1,1,Met40
SAVEVALUE VPerS1,V$VPerS1
SAVEVALUE VPerS2,V$VPerS2
SAVEVALUE VPerS3,V$VPerS3
SAVEVALUE VPotS1,V$VPotS1
SAVEVALUE VPotS2,V$VPotS2
SAVEVALUE VPotS3,V$VPotS3
Met40 TERMINATE 1
Задание времени моделирования Если TG1=1, то расчет результатов Вероятность передачи сообщений 1 категории Вероятность передачи сообщений 2 категории Вероятность передачи сообщений 3 категории Вероятность потери сообщений 1 категории Вероятность потери сообщений 2 категории Вероятность потери сообщений 3 категории
Вариант 12 Постановка задачи
На вычислительный комплекс коммутации сообщений (ВККС) поступают сообщения от n1 абонентов с интервалами времени T1, T2, …, Tn1. Сообщения могут быть n2 категорий с вероятностями р1, р2, …, рn2 (p1+p2+...+pn2 = 1) и вычислительными сложностями S1, S2,... , Sn2 операций (оп) соответственно. Вычислительные сложности случайные. ВККС имеет входной накопитель емкостью L1 байт для хранения сообщений, ожидающих передачи. Сообщения 1-й категории обладают относительным приоритетом по отношению к сообщениям остальных категорий при обработке на ВККС. В буфере сообщения размещаются в соответствии с приоритетом.