Xpdis function rn1,c24 ; экспоненц. Функция

;распределения

0,0/.1,.104/.2,.222/.3,.355/.4,.509/.5,.69/.6,.915/.7,1.2/.75,1.38.8,1.6/.84,1.83/.88,2.12/.9,2.3/.92,2.52/.94,2.81/.95,2.99/.96,3.2

.97,3.5/.98,3.9/.99,4.6/.995,5.3/.998,6.2/.999,7/.9998,8

4] ************************************************************************

SNOR FUNCTION RN1,C25; Нормальная функция

;распределения

0.0,-5/0.00003,-4/.00135,-3/.00621,-2.5/.02275,-2/.06681,-1.5 •11507,-1.2/.15866,-1/.2118б,-.8/.27425,-.6/.34458,-.4/.42074,-.2 5,0.0/.57926,.2/.65542,.4/.72575,.6/.78814,.8/.84134,1/.88493,1.2

.93319,1.5/.97125,2/.99379,2.5/.99865,3/.99997,4/1.0,5

91 ************************************************************************

100 TPL1 VARIABLE 360+60#FN$SNOR; Задание нормальных

105 TPL2 VARIABLE 480+60#FN$SNOR; законов распределений

ПО T_ARRIVAL VARIABLE 1140+180#FN$SNOR

}jj ***********************************************************************

TRANSIT TABLE Ml,1200,600,20

\\d ***********************************************************************

120 GENERATE V$T_ARRIVAL; Поступление заказа

SPLIT 2,COPY,1; Создание двух копий

; оригинала

126 ************************************************************************

Получение двигателя. В этом фрагменте проходит оригинал заказа

SEIZE MOTOR; Получение двигателя

135 ADVANCE 480,FN$XPDIS; Подготовка двигателя

; для сборки 140 RELEASE MOTOR; Освобождение устройства

TRANSFER,TRY; Переход к пробной

;сборке

146 ************************************************************************

147; Заказ и адаптация насоса. Этот фрагмент проходит копия 1 (pl=2)

150 COPY TESTE P1,2,BAS;pl=2?

SEIZE PUMPS; Получение насоса

ADVANCE 600,120; Заказ и адаптация насоса

PUMP MATCH PLATE; Ожидание готовности плиты основания

ADVANCE 300,60; Пробная подгонка насосак плите основания

RELEASE PUMPS; Освободить устройство

TRANSFER,TRY; Передать на пробную

; сборку \t}\ ************************************************************************

В AS SEIZE BASE; Получить устройство для изготовления плиты

ADVANCE 900; Изготовление плиты основания

PLATE MATCH PUMP; Ожидание готовности насоса

ADVANCE 300,60; Пробная подгонка наик к плите основания

RELEASE BASE; Освобождение устройства

221 ********************* Пробная подгонка *********************************

TRY GATHER 3; 3 части налицо

230 ADVANCE V$TPL1; Пробная подгонка

240 TESTE P1,1,FIN1; Это двигатель? (pl = l?)

241 ************************ Покраска двигателя *****************

SEIZE PAINT1; Занять 1 -е устройство покраски

ADVANCE 120,30; Покраска двигателя

RELEASE PA1NT1; Освободить 1-е устройство покраски

TRANSFER,BUILD; Отправить на окончательную сборку

266 ***********************j-[0KpaCKa плиты основания ***********

270 FIN1 TESTE P1,2,FIN2; Это насос? (pi =2?)

SEIZE PAINT2; Получить 2-е устройств покраски

285 ADVANCE 90,FN$XPDIS; Покраска насоса

RELEASE PAINT2; Освободить 2-е устройство покраски

TRANSFER,BUILD; Идти на окончательную сборку

296 ********************* Гальванизация плиты основания ********************

FIN2 SEIZE GALVA; Занять устройство гальванизации 305 ADVANCE 240; Гальванизация плитыоснования

310 RELEASE GALVA; Освободить устройство гальванизации **********************************************************************

BUILD ASSEMBLE 3; Ожидание готовности 3-х частей

ADVANCE VSTPL2; Сборка

TABULATE TRANSIT; Табулирование времени сборки

KON TERMINATE 1; Выход готового изделия

START 100; Сборка 100 насосов

В результате моделирования получена следующая статистика по устройствам.

FACILITY ENTRIES UTIL. AVE.TIME AVAIL. OWNER PEND INTER RETRY DELAY

MOTOR 106 0.385 446.794 1 0 0 0 0 0

PUMPS 101 0.983 1198.410 1 303 0 0 0 5

BASE 101 0.984 1198.843 1 304 0 0 0 5

PAINT1 100 0.097 119.469 1 0 0 0 0 0

PAINT2 100 0.082 101.107 1 0 0 0 0 0