poddergrukovodstkp (538827), страница 18
Текст из файла (страница 18)
Модель ремонта средств связи Задание номеров матрицам
Матрица ожидаемой прибыли СС типа 1
Матрица коффициентов ожидаемой прибыли СС типа
Матрица коффициентов использования СС типа 1
Матрица ожидаемой прибыли СС типа 2
Матрица коффициентов ожидаемой прибыли СС типа
Матрица коффициентов использования СС типа 2
Матрица ожидаемой прибыли СС типа 3
Матрица коффициентов ожидаемой прибыли СС типа
Матрица коффициентов использования СС типа 3
Матрица ожидаемой прибыли СС типа 4
Матрица коффициентов ожидаемой прибыли СС типа
Матрица коффициентов использования СС типа 4
Матрица ожидаемой прибыли СС типа 5
Матрица коффициентов ожидаемой прибыли СС типа
Матрица коффициентов использования СС типа 5
Матрица коффициентов использования Rem
, имитирующих дежурство СС
Задание номера МКУ СС типа 1
Задание номера МКУ СС типа 2
Задание номера МКУ СС типа 3
Задание номера МКУ СС типа 4
Задание номера МКУ СС типа 5
ых
Количество типов СС, находящихся на дежурстве
1
2
3
4
5
находящихся на дежурстве находящихся на дежурстве находящихся на дежурстве находящихся на дежурстве находящихся на дежурстве
Количество СС типа 1,
Количество СС типа 2,
Количество СС типа 3,
Количество СС типа 4,
Количество СС типа 5,
Количество резервных СС типа 2
Время моделирования, 1 ед. мод. вр. = 1 час
час час час час час
Среднее время наработки до отказа СС типа 1,
Среднее время наработки до отказа СС типа 2,
Среднее время наработки до отказа СС типа 3,
Среднее время наработки до отказа СС типа 4,
Среднее время наработки до отказа СС типа 5,
Среднее время ремонта СС типа 1, час
час час час час
Среднее время ремонта СС типа 2,
Среднее время ремонта СС типа 3,
Среднее время ремонта СС типа 4,
Среднее время ремонта СС типа 5,
Номер строки матрицы
Номер столбца матрицы
Стоимость одного резервного СС
Убыток в случае отсутствия на дежурстве одного СС
1
2
79
Доход от одного СС, находящегося на дежурстве Матрица ожидаемой прибыли СС типа 1 Матрица коффициентов ожидаемой прибыли СС типа Матрица коффициентов использования СС типа 1 Матрица ожидаемой прибыли СС типа 2 Матрица коффициентов ожидаемой прибыли СС типа Матрица коффициентов использования СС типа 2 Матрица ожидаемой прибыли СС типа 3 Матрица коффициентов ожидаемой прибыли СС типа 3
KZen3 | MATRIX | r ~-> r u i |
Prib4 | MATRIX | |
KPr4 | MATRIX | |
KZen4 | MATRIX | |
Prib5 | MATRIX | |
KPr5 | MATRIX | |
KZen5 | MATRIX | |
KRem | MATRIX | |
Pribil | MATRIX | |
SrKPrib MATRIX | ||
SrKIsp | MATRIX |
CC1_ STORAGE
CC2_ STORAGE
CC3_ STORAGE
CC4_ STORAGE
CC5_ STORAGE
Rem STORAGE
Матрица коффициентов использования СС типа 3 Матрица ожидаемой прибыли СС типа 4 Матрица коффициентов ожидаемой прибыли СС типа 4 Матрица коффициентов использования СС типа 4 Матрица ожидаемой прибыли СС типа 5 Матрица коффициентов ожидаемой прибыли СС типа 5 Матрица коффициентов использования СС типа 5 Матрица коффициентов использования Rem Матрица суммарной прибыли Матрица средних коэффициентов прибыли за СС всех типов Матрица коффициентов использования СС всех типов 35; Емкость МКУ по количеству СС типа 1, находящихся на дежурстве 100 ; Емкость МКУ по количеству СС типа 2, находящихся на дежурстве 60 ; Емкость МКУ по количеству СС типа 3, находящихся на дежурстве 45 ; Емкость МКУ по количеству СС типа 4, находящихся на дежурстве 60 ; Емкость МКУ по количеству СС типа 5, находящихся на дежурстве 5 ; Емкость МКУ по количеству мастеров-ремонтников ; Описание арифметических выражений DoxMax VARIABLE VrMod#n21_#S1_ ; Максимальный доход от дежурства СС типа 1
Ubitok типа 1 DoxPol StoRem
VARIABLE VrMod#n21_#(1-SR*1/1000)#S2_ ; Убыток от отсутствия на дежурстве СС
VARIABLE X$DoxMax-X$Ubitok ; Полученный доход от дежурства СС типа 1
VARIABLE (VrMod#SM$Rem#FN$StoMast)#(SR$Rem/1000) ; Стоимость ремонта неисправных СС
ZatrResSS VARIABLE S4_#n4_#VrMod ; Затраты на содержание резервных СС типа 1 SumPrib VARIABLE X$DoxPol-(X$StoRem+X$ZatrResSS) ; Ожидаемая прибыль KoefPr VARIABLE MX*3(Stroka,Stolbez)/X$DoxMax ; Коэффициент прибыли StoMast FUNCTION P1,D5 ; Стоимость оплаты работы одного мастера 1,7/2,8/3,6/4,10/5,8
; Cегмент постановки на дежурство СС типа 1
GENERATE ,,,1
SPLIT (n21_-1) ; Размножение транзактов: число СС+число резервных СС
ASSIGN 1,1 ; Код 1 - признак СС типа 1
ASSIGN 2,(Exponential(30,0,T21_)) ; Занесение в Р2 времени наработки на отказ, час
ASSIGN 3,(Exponential(31,0,T1_)) ; Занесение в Р3 времени ремонта СС типа 1
TRANSFER ,Met1
; Cегмент постановки на дежурство СС типа 2 GENERATE ,,,1
SPLIT (n22_-1) ; Размножение транзактов: число СС типа 2
ASSIGN 1,2 ; Код 2 - признак СС типа 2
ASSIGN 2,(Exponential(30,0,T22_)) ; Занесение в Р2 времени наработки на отказ,
час
ASSIGN 3,(Exponential(31,0,T2_)) ; Занесение в Р3 времени ремонта СС типа 2 TRANSFER ,Met1
; Cегмент постановки на дежурство СС типа 3 GENERATE ,,,1
SPLIT (n23_+n4_-1) ; Размножение транзактов: число СС типа 3
ASSIGN 1,3 ; Код 3 - признак СС типа 3
ASSIGN 2,(Exponential(30,0,T23_)) ; Занесение в Р2 времени наработки на отказ,
час
; Cегмент постановки на дежурство СС типа 4 GENERATE ,,,1
SPLIT (n24_-1) ; Размножение транзактов: число СС типа 4
ASSIGN 1,4 ; Код 4 - признак СС типа 4
ASSIGN 2,(Exponential(30,0,T24_)) ; Занесение в Р2 времени наработки на отказ,
час
ASSIGN 3,(Exponential(31,0,T4_)) ; Занесение в Р3 времени ремонта СС типа 4 TRANSFER ,Met1
80
ASSIGN 3,(Exponential(31,0,T3_)) ; Занесение в Р3 времени ремонта СС типа 3 TRANSFER ,Met1
; Cегмент постановки на дежурство СС типа 5 GENERATE ,,,1
SPLIT (n25_-1) ; Размножение транзактов: число СС типа 5
ASSIGN 1,5 ; Код 5 - признак СС типа 5
ASSIGN 2,(Exponential(30,0,T25_)) ; Занесение в Р2 времени наработки на отказ,
час
ASSIGN 3,(Exponential(31,0,T5_)) ; Занесение в Р3 времени ремонта СС типа 5 TRANSFER ,Met1
QUEUE P1; Встать в очередь на дежурство СС типа, номер которого в Р1
ENTER P1 ; Встать на дежурство СС типа, номер которого в Р1
DEPART P1; Покинуть очередь на дежурство СС типа, номер которого в Р1
ADVANCE P2 ; Имитация выхода СС типа из строя, номер которого в Р2
LEAVE P1 ; Снятие с дежурства из-за выхода из строя СС типа, номер которого
Metl
; Сегмент имитации дежурства СС
в Р1
; Сегмент имитации ремонтного подразделения
ENTER Rem ; Занять одного мастера
ADVANCE P3 ; Имитация ремонта
LEAVE Rem ; Конец ремонта
TRANSFER ,Met1 ; Направить исправное СС на дежурство или в резерв
; Сегмент задания GENERATE TEST E ASSIGN ASSIGN ASSIGN
Met23 ASSIGN ASSIGN ASSIGN SAVEVALUE SAVEVALUE SAVEVALUE SAVEVALUE SAVEVALUE
времени моделирования и расчета результатов
VrMod
TG1,1,Met2
3,-2
1,0
2,0
2+,1
1+,1
; Подготовка к циклу
; Подготовка к циклу
; Подготовка к циклу
; Начало цикла изменения номеров матриц
; Начало цикла изменения типов СС 3+,3 ; Начало цикла изменения номеров матриц, хранящих прибыль DoxMax,V$DoxMax ; Максимально возможный доход от дежурства СС Ubitok,V$Ubitok ; Убыток
DoxPol,V$DoxPol ; Полученный доход от дежурства СС StoRem,V$StoRem ; Затраты на ремонт ZatrResSS,V$ZatrResSS ; Затраты на резервные СС
; Расчет ожидаемой прибыли
MSAVEVALUE *2,Stroka,Stolbez,V$SumPrib ; Прибыль по типу СС
SAVEVALUE 10,V$SumPrib
MSAVEVALUE Pribil+,Stroka,Stolbez,X10 ; Суммарная прибыль по СС всех типов
ASSIGN 2+,1
MSAVEVALUE *2,Stroka,Stolbez,V$KoefPr ; Коэфициент прибыли
MSAVEVALUE SrKPrib+,Stroka,Stolbez,(V$KoefPr/5) ; Средний коэффициент прибыли по СС всех типов
ASSIGN 2+,1
MSAVEVALUE *2,Stroka,Stolbez,(SR*1/1000) ; Коэффициент использования типа CC
MSAVEVALUE SrKIsp+,Stroka,Stolbez,(SR*1/(1000#5)) ; Средний коэффициент использования CC всех типов
TEST GE P1,n2_,Met23
MSAVEVALUE 16,Stroka,Stolbez,(SR$Rem/1000); Коэффициент использования Rem Met2 TERMINATE 1
START | 2000,NP | |
Stolbez | EQU RESET | 2 |
START | 2000,NP | |
Stolbez | EQU RESET | 3 |
START | 2000,NP | |
Stolbez | EQU RESET | 4 |
START | 2000,NP | |
Stolbez | EQU | 5 |
; Неделя 2: Резервных СС=3, мастеров=5 ; Неделя 3: Резервных СС=3, мастеров=5 ; Неделя 4: Резервных СС=3, мастеров=5
; Неделя 1: Резервных СС=3, мастеров=5
81
RESET | |||
START | 2000, | NP | |
n4 | EQU | 4 | |
Rem | STORAGE | 6 | |
Stroka | EQU | 2 | |
Stolbez | EQU | 1 | |
CLEAR | OFF | ||
START | 2000, | NP | |
Stolbez | EQU | 2 | |
CLEAR | OFF | ||
START | 2000 | ,NP | |
Stolbez | EQU | 3 | |
CLEAR | OFF | ||
START | 2000 | ,NP | |
Stolbez | EQU RESET | 4 | |
START | 2000, | NP | |
Stolbez | EQU RESET | 5 | |
START | 2000, | NP | |
n4 | EQU | 5 | |
Rem | STORAGE | 7 | |
Stroka | EQU | 3 | |
Stolbez | EQU | 1 | |
CLEAR | OFF | ||
START | 2000, | NP | |
Stolbez | EQU | 2 | |
CLEAR | OFF | ||
START | 2000 | ,NP | |
Stolbez | EQU | 3 | |
CLEAR | OFF | ||
START | 2000 | ,NP | |
Stolbez | EQU RESET | 4 | |
START | 2000, | NP | |
Stolbez | EQU RESET | 5 | |
START | 2000 |
; Неделя 5: Резервных СС=3, мастеров=5
; Неделя 1: Резервных СС=4, мастеров=6