На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Участники Календарь Избранное RSS
msm.ru
  
> задача в GPSS
    Предприятие имеет транспортный цех, который обслуживает три филиала A, B и C. Грузовики перевозят изделия из A в B и из B в C, возвращаясь затем в A без груза. Погрузка в A занимает 20 мин. (экспоненциальный закон), переезд из A в B длится 30 мин. со стан-дартным отклонением 9 мин. (нормальный закон распределения), раз-грузка и погрузка в B – 40 мин. со стандартным отклонением 12 мин. (нормальный закон распределения), переезд в C - 20мин. (экспонен-циальный закон), разгрузка в C – от 20 до 30 мин. и переезд в A – от 20 до 25 мин. Если к моменту погрузки в A и B отсутствовали изде-лия, грузовики уходят дальше по маршруту. Изделия в A выпускают-ся партиями по 1000 шт. через 23 мин. (экспоненциальный закон), в B - такими же партиями через 2+-5 мин. На линии работает 8 грузови-ков, каждый перевозит 1000 изделий. В начальный период все грузо-вики находятся в A.
    Смоделировать работу транспортного цеха объединения в течение 1000ч. определить частоту пустых перегонов грузовиков между A и B, B и C и сравнить с характеристиками, полученными при равномерном начальном распределении грузовиков между филиалами и операциями.
    как я понял 1000 часов это много и он просто не выдает отчет, поэтому там 100часов. суть проблемы в другом, есть код который я с горем по палам наваял, но она не правильно работает


    EMPTY VARIABLE N3-N4+N12-N13; число пустых перегонов
    GENERATE 8; выход 8-ми грузовиков
    ASSIGN 1,0; помечаем грузовики как пустые
    BEG TEST G X1,0,GOTOB ;проверка наличия груза в филиале А
    SAVEVALUE 1-,1; забрать груз для погрузки
    ADVANCE (EXPONENTIAL (1,0,20)); погрузка 20 мин
    ASSIGN 1,1; помечаем: грузовик с грузом
    GOTOB ADVANCE (NORMAL(1,30,3)) ; 30+-3 мин переезд в филиал В
    RAZGR TEST G P1,0,POGR; проверка: нужно разгружаться?
    ADVANCE (NORMAL(1,20,3)); разгрузка 20+-3 мин
    ASSIGN 1,0; помечаем: грузовик пуст
    POGR TEST G X2,0,GOTOC ; проверка наличия груза в филиале В
    SAVEVALUE 2-,1; забрать груз для погрузки
    ADVANCE (NORMAL(1,20,3)); погрузка 20+-3 мин
    ASSIGN 1,1; помечаем: грузовик с грузом
    GOTOC ADVANCE (EXPONENTIAL (1,0,20)); 20 минпереездвфилиалС
    TEST E P1,0,GOTOA; проверка: нужно разгружаться?
    ADVANCE 25,5; разгрузка 20-30 мин
    ASSIGN 1,0; помечаем: грузовик пуст
    GOTOA ADVANCE 22.5,2.5; 20-25 мин переезд в филиал А
    TRANSFER ,BEG; начинаем новый круг
    GENERATE (EXPONENTIAL(1,0,23)); выпуск партий в филиале А
    SAVEVALUE 1+,1; число партий - в ячейке X1
    TERMINATE
    GENERATE 2; выпуск партий в филиале В
    SAVEVALUE 2+,1; число партий - в ячейке X2
    TERMINATE; Таймер для останова процесса моделирования:
    GENERATE 6000; 100 часов = 6000 минут
    TERMINATE 1
    START 1

    помогите исправить
    0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)
    0 пользователей:


    Рейтинг@Mail.ru
    [ Script execution time: 0,0198 ]   [ 15 queries used ]   [ Generated: 6.12.22, 20:50 GMT ]