ФЛП: GPSS

Наткнулся я тут случайно на свою курсовую полугодичной давности по gpss. Сделал я её тогда за ночь )) Пусть висит )

Надо было смоделировать такую карусель:

Автобус совершает в день N рейсов между пунктами A и B. В течение дня с вероятностью a возможно появление дефекта, при котором автобус может продолжать движение. На устранение дефекта необходимо затратить время одного рейса. Если дефект не устранить, то с вероятностью b возникает поломка, на устранение которой уходит весь оставшийся день.
У водителя, в случае появления дефекта, есть выбор:
1. Устранить дефект.
2. Продолжить движение.

При каком b предпочтителен тот или иной вариант?
a = 0.2, N = 25

Реализовал я это так:

10 INITIAL LS$POLOMKA 0 ; инициализация флага

20 TAB_RES TABLE P1 10 15 2 ; создание таблицы

30 GENERATE 30,,,25 ;генерация N транзактов

40 GATE LR POLOMKA SLOMAN ;проверка флага и соотв. переход

50 TRANSFER .2,,DEFECT ;переход с вероятностью a в DEFECT

60 SUCCESS ASSIGN 1 1 ;запись в параметр успешного значения

70 TABULATE TAB_RES ;запись параметра в таблицу

80 TERMINATE 1 ;завершение

100 DEFECT TRANSFER .1,,LOMAETSA ;переход с вероятностью b в LOMAETSA

110 TRANSFER ,SUCCESS ;переход в SUCCESS

120 LOMAETSA LOGIC S POLOMKA ;поднятии флага POLOMKA

130 SLOMAN ASSIGN 1,25 ;запись в параметр неудачного значения

140 TABULATE TAB_RES ;запись параметра в таблицу

150 TERMINATE 1 ;завершение

Вот, довольно лаконично.