На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Участники Календарь Избранное RSS
msm.ru
  
> GPSS, ребята помогите построить гистограмму , несложное задание для вас
    было дано задание:

    На сборочный участок цеха через экспоненциально распределенные ин¬тервалы времени со средним значением T1=21 минут поступают партии, каждая из которых состо-ит из n=3 деталей. Равновероятно детали проходят одну из предва¬рительных обработок (ПО):
    • П01 - на протяжении экспоненциально распределенного интервала времени со средним значением T2=10 минут;
    • П02 - на протяжении TЗ=9±3 минут (равномерное распределение).
    В результате обработки возможно появление k=12 процентов бракованных деталей, которые не поступают на дальнейшую сборку, а снова направляются на соответствующую предварительную обработку. На сборку поступает одна де¬таль, которая прошла ПО1, и одна деталь, прошедшая ПО2. Процесс сборки за¬нимает Т4=5±1,5 минут. В каждый мо-мент времени может происходить сборка только одного изделия (состоящего из двух де-талей). Потом собранное изделие посту¬пает на регулировку, которая длится T5=7±1,5. минут. В каждый момент времени мо¬жет проводиться регулировка только одного изделия.
    Прибыль от производства одного изделия составляет S1=95 единиц стоимо¬сти. Ес-ли деталь изделия, которая прошла ПО1, находилась в цеху более Т=50 ми¬нут, стоимость изделия уменьшается вдвое.
    Уменьшение уровня брака до значения (k-r) требует r*S2 (r*3) единиц стоимо¬сти на каждую деталь (r<=k). Уменьшение средней продолжительности опера¬ций сборки и регу-лировки на m минут требует дополнительного вложения m*S3 (m*8) единиц стоимости на одно изделие. Длительность этих операций может изменяться независимо, при этом ми-нимально возможная длительность операций сборки и регулировки составляет 3 минуты.
    Определить, при каких уровнях снижения брака r и длительности операций сборки и регулировки достигается максимальная экономическая эффективность.

    Вот к нему программа:
    [ code ] clear
    * * *
    taPO1 table mp4,0,1,50
    taPO2 table mp5,0,1,20
    taReg table mp6,7,0.1,30
    taVCehI table mp7,1,200,40
    taVCehII table mp8,1,1,30
    taPrih table x$totab,1,2,50
    * * *
    initial x$brakM,0 ;уровень уменьшения брака
    initial x$sborkaM,0 ;уменьшение времени сборки
    initial x$regulM,0 ;уменьшение времени регулировки

    * * *
    sborka storage 2 ;сборочное устройство
    * * *
    generate (60#16#360) ;отсчет времени моделирования - 1 год 16 часов в
    сутки
    terminate 1
    * * *
    generate (exponential(1,0,21)) ; приход деталей в цех
    savevalue totab,(c1-x$last)
    tabulate taPrih
    savevalue last,c1

    split 2,next ;приходят 3 детали
    next transfer .5,PO1,PO2 ;случайное распределение между ПО1 и ПО2 (рав-новероятно)
    * * *

    PO1 seize obrab1 ;предварительная обработка1
    mark 4
    advance (exponential(2,0,10)) ;
    tabulate taPO1
    release obrab1 ;
    transfer ((12-x$brakM)/100),,PO1 ;отправка бракованных изделий на повторную обра-ботку

    mark 7
    ;проверка лог. условий перед началом монти-
    рования
    gate lr ftype ;есть ли деталь первого типа? если нет –
    проходим дальше
    logic s ftype ;включаем ключ ftype - наличие детали
    первого типа
    gate ls stype ;ждем деталь второго типа

    tabulate taVCehI
    enter sborka ;начинаем сборку
    advance (5-x$sborkaM),1.5 ;сборка
    leave sborka ;покидаем сборку

    logic r ftype ;выключаем лог. ключи
    logic r stype
    mark TIMEinCEX ;засекаем время выхода из обработки

    transfer ,regul ;переход на регулировку

    * * *

    PO2 seize obrab2 ;предварительная обработка 2
    mark 5
    advance 9,3 ;
    tabulate taPO2
    release obrab2 ;
    transfer ((12-x$brakM)/100),,PO2 ;отправляем бракованную деталь на повторную об-работку

    mark 8
    ;проверка лог. условий перед началом монтирова-ния
    gate lr stype ;есть ли деталь второго типа? если нет - прохо-дим дальше
    logic s stype ;включаем ключ stype - наличие детали второго типа
    gate ls ftype ;ждем деталь превого типа

    tabulate taVCehII

    enter sborka ;начинаем сборку
    advance (5-x$sborkaM),1.5 ;сборка
    leave sborka ;покидаем сборку

    transfer ,kill

    * * *
    regul seize regulirovka ;занимем устройство регулировки
    mark 6
    advance (7-x$regulM),1.5 ;регулировка
    tabulate taReg
    release regulirovka ;покидаем регулировку
    savevalue pribBYone,95 ;начинаем рассчет прибыли от
    одного изделия
    test ge mp$TIMEinCEX,50,step2 ;если деталь в цехе больше 50
    мин уменьшаем стоимость вдвое
    savevalue pribBYone,47.5 ;
    step2 savevalue pribBYone-,(x$brakM#3) ;корректируем прибыль, вычитая
    затраты на сокращение брака
    savevalue pribBYone-,(x$sborkaM#8+x$regulM#8) ;корректируем прибыль, вычитая
    затраты на сокращение сборки и регулировки

    savevalue Prib+,x$pribBYone ;суммируем с общей прибылью

    transfer ,kill ;выход транзакта из модели

    * * *
    kill terminate 0
    * * *
    start 1
    [ /code ]

    Задание второе:
    построить гистограмму суммарного времени пребывания не бракованной детали в цеху (9+- 1,5 + 7 = 18)
      ctrl+alt+s
      window -> simulation window -> table window
        эм...вы задание читали?!
        в общем я и сама справилась...пока дождешься помощи...
          для начала можно было бы создать вопрос в соответствующей теме, а не плодить новые.
          в следующий раз пишите вопрос на бумаге и прячте под ковер.
          кому надо обязательно найдет и ответит.
          1 пользователей читают эту тему (1 гостей и 0 скрытых пользователей)
          0 пользователей:


          Рейтинг@Mail.ru
          [ Script execution time: 0.0523 ]   [ 14 queries used ]   [ Generated: 23.09.26, 00:48 GMT ]