Модель работы касс в банке (GPSS World)

В банке имеется n касс. Приход клиентов в банк описывается пуассоновским потоком с интенсивностью . Время обслуживания клиентов – экспоненциальное со средним значением . Если в момент входа клиента в банк хотя бы один кассир свободен, клиент сразу же попадает к этому кассиру. В противном случае клиент присоединяется к любой очереди, которая на текущий момент является кратчайшей. Обслуживание клиентов в очереди осуществляется по принципу “первым пришёл – первым обслужен”. После обслуживания клиент уходит из банка. Разработать GPSS – модель для анализа работы банка в течении 8 ч. Оценить, как изменятся характеристики очереди клиентов и загрузка кассиров при увеличении числа n на единицу. Исходные данные: n=7, =200 чел/час, =45 чел/ч.

Листинг программы:

Kass VARIABLE 7 ;колво касс
 INITIAL X$Cikl,1 ;переменная цикла
 
 GENERATE (Poisson(1,18)) ;генерация потока
 ASSIGN 1,1 ;сравним очередь 1
 ASSIGN 2,2 ;и очередь 2
 ;цикл проверки
 LabB TEST G Q*1,Q*2,LabD1 ; если 1 > 2, то
 ASSIGN 1,P2 ;запомним в 1 номер 2
 LabD1 SAVEVALUE Cikl+,1 ;увеличим счётчик цикла
 TEST E X$Cikl,V$Kass,LabD2 ;если цикл достигнут
 SAVEVALUE Cikl,1 ;сделать счётчик = 1
 LabD2 ASSIGN 2+,1 ;перейти к следующей очереди
 TEST NE X$Cikl,1,LabO ;если не конец цикла
 TRANSFER ,LabB ;перейти в начало цикла
 
 LabO QUEUE *1 ;занять нужную очередь
 SEIZE *1 ;занять нужную кассу
 DEPART *1 ;освободить нужную очередь
 ADVANCE (Exponential(1,0,80)) ;имитация обслуживания
 RELEASE *1 ;освободить нужную кассу
 TERMINATE ;уничтожить
 
 GENERATE 3600 ;сегмент таймера
 TERMINATE 1 
 START 8 ;на 8 часов