Форум на Исходниках.RU

GPSS

Betelgeuse — Fri, 21 Jul 2023 06:37:05 +0000

Betelgeuse: https://cyberforum7.rssing.com/chan-5994357...rticle6289.html

GPSS

pretttymom — Thu, 01 Dec 2022 14:40:03 +0000

pretttymom:

Цитата spring @ 27.10.12, 10:40

Помогите сделать программу, горит фпроектнвя работа:
на обработку по равномерному закону в устройство поступает 2 потока заготовок деталей первый - со временем 5+-2 мин, а второй - 25+-2 мин. Второй поток прерывает изготовление деталей первого потока. Время обработки деталей первого потока 7+-2 мин, второго 11+-2 мин. Смоделировать процесс обработки 100 деталей, образующих 2 потока

GPSS

Cameroon — Mon, 04 Apr 2016 20:40:57 +0000

Cameroon: Сделал так. Результат получился правильный.

MEM STORAGE 10

GENERATE 10,2,300

QUEUE SSS1

ENTER MEM,1

DEPART SSS1

RRR1 TRANSFER BOTH,CPU1,CPU2

CPU1 SEIZE PROC1

ADVANCE 14,FN$XPdis

RELEASE PROC1

TRANSFER ,RRR2

CPU2 SEIZE PROC2

ADVANCE 37,FN$XPdis

RELEASE PROC2

RRR2 TRANSFER 0.39,RRR3,printer

printer TRANSFER 0.143,CCC2,CCC1

CCC2 TRANSFER 0.167,CCC4,CCC3

CCC4 TRANSFER 0.2,CCC6,CCC5

CCC6 TRANSFER 0.25,CCC8,CCC7

CCC8 TRANSFER 0.333,CCC10,CCC9

CCC10 TRANSFER 0.5,CCC12,CCC11

CCC1 QUEUE BBB1

SEIZE printer1

DEPART BBB1

ASSIGN 1,printer1

ADVANCE 12,FN$XPdis

TRANSFER ,CCC15

CCC3 QUEUE BBB2

SEIZE printer2

DEPART BBB2

ASSIGN 1,printer2

ADVANCE 12,FN$XPdis

TRANSFER ,CCC15

CCC5 QUEUE BBB3

SEIZE printer3

DEPART BBB3

ASSIGN 1,printer3

ADVANCE 12,FN$XPdis

TRANSFER ,CCC15

CCC7 QUEUE BBB3

SEIZE printer4

DEPART BBB3

ASSIGN 1,printer4

ADVANCE 12,FN$XPdis

TRANSFER ,CCC15

CCC9 QUEUE BBB3

SEIZE printer5

DEPART BBB3

ASSIGN 1,printer5

ADVANCE 12,FN$XPdis

TRANSFER ,CCC15

CCC11 QUEUE BBB3

SEIZE printer6

DEPART BBB3

ASSIGN 1,printer6

ADVANCE 12,FN$XPdis

TRANSFER ,CCC15

CCC12 QUEUE BBB3

SEIZE printer7

DEPART BBB3

ASSIGN 1,printer7

ADVANCE 12,FN$XPdis

CCC15 QUEUE BBB4

SEIZE CAN

DEPART BBB4

ADVANCE 1

RELEASE CAN

RELEASE P1

TRANSFER ,RRR1

RRR3 LEAVE MEM,1

TERMINATE 1

GPSS

Cameroon — Sat, 26 Mar 2016 15:28:55 +0000

Cameroon: Всем привет, можете помочь с решение следующей задачи?
Промоделировать решение задач в двухпроцессорной ЭВМ с общей памятью, разделенной на 10 блоков. Каждой задаче отводится при её решении один блок. Интервалы времени между поступлениями задач распределены по нормальному закону с параметрами: . Время обработки порции информации подчинено экспоненциальному закону с интенсивностью в первом процессоре и интенсивностью во втором процессоре. Между обработкой с вероятностью, равной 0,39, возможно обращение к устройству вывода графической информации, состоящему из 7 принтеров. Запросы на вывод равновероятны. Интервалы времени между запросами распределены по экспоненциальному закону с интенсивностью.

Как правильно доделать?

MEM STORAGE 8

GENERATE 10,2,300

QUEUE SSS1

ENTER MEM,1

DEPART SSS1

RRR1 TRANSFER BOTH,CPU1,CPU2

CPU1 SEIZE PROC1

ADVANCE 20,FN$XPdis

RELEASE PROC1

TRANSFER ,RRR2

CPU2 SEIZE PROC2

ADVANCE 50,FN$XPdis

RELEASE PROC2

RRR2 TRANSFER 0.6,RRR3,DISK

DISK TRANSFER 0.333,CCC2,CCC1

CCC2 TRANSFER 0.5,CCC4,CCC3

CCC1 QUEUE BBB1

SEIZE DISK1

DEPART BBB1

ASSIGN 1,DISK1

ADVANCE 10,FN$XPdis

TRANSFER ,CCC5

CCC3 QUEUE BBB2

SEIZE DISK2

DEPART BBB2

ASSIGN 1,DISK2

ADVANCE 10,FN$XPdis

TRANSFER ,CCC5

CCC4 QUEUE BBB3

SEIZE DISK3

DEPART BBB3

ASSIGN 1,DISK3

ADVANCE 10,FN$XPdis

CCC5 QUEUE BBB4

SEIZE CAN

DEPART BBB4

ADVANCE 1

RELEASE CAN

RELEASE P1

TRANSFER ,RRR1

RRR3 LEAVE MEM,1

TERMINATE 1

GPSS

Savandei — Tue, 03 Nov 2015 11:54:31 +0000

Savandei: veamin здраствуййте,вы нашли ответ на ваш вопрос?

GPSS

julya92 — Mon, 11 Aug 2014 08:32:06 +0000

julya92:

Цитата julya92 @ 11.08.14, 04:25

Dispose разобралась

GPSS

julya92 — Mon, 11 Aug 2014 04:25:17 +0000

julya92: Команду Split(разъединять) в GPSS, чем заменить в Arena? быть может Dispose? у меня установлен только пакет Basic Process в Arena для Student..нужны дополнительные?

GPSS

bombadil — Thu, 19 Dec 2013 17:31:27 +0000

bombadil: Поток покупателей распределён по экспоненциальному закону Tср=8мин, Тmin=5мин.
Есть 2 зала, Вероятность покупки 1зал= 65% 2зал=78%
Время покупки 1зал= 10 ± 4 2зал=12 ± 2
Кол-во товаров, шт 1зал= 4 ± 2 2зал=2 ± 1
Время оформление товара 0.5мин

TovarA Function RN1,D5
.2,2/.4,3/.6,4/.8,5/1,6

TovarB Function RN1,D3
.33,1/.66,2/1,3

T_oformlenia Fvariable (FN$TovarA+FN$TovarB)#0.5

Generate (Exponential(1,8,5))
TRANSFER .35,,zal2
Advance 10,4
Zal2 TRANSFER .22,,cassa
Advance 12,2
Cassa Queue ochered
Seize casa
Depart ochered
Advance V$T_oformlenia
Release casa
Terminate
Generate 840
Terminate 1
Start 1

результат
FACILITY ENTRIES UTIL. AVE. TIME AVAIL. OWNER PEND INTER RETRY DELAY
CASA 63 0.221 2.944 1 64 0 0 0 0

QUEUE MAX CONT. ENTRY ENTRY(0) AVE.CONT. AVE.TIME AVE.(-0) RETRY
OCHERED 1 0 63 57 0.012 0.157 1.653 0

как определит например среднее время подбора товара или число покупок в течении дня ибо в отчёте этого нету?

GPSS

nexusOk — Mon, 09 Dec 2013 15:25:49 +0000

nexusOk: Cadmusесли у тебя получилось сделать задание на gpss можешь дать исходник?

GPSS

Kykyryza:* — Thu, 14 Nov 2013 12:32:45 +0000

Kykyryza:*: Помогите кто-нибууудь решить задачу в GPSS:В офис приходят клиенты через 8±3 мин.,причем 45% клиентов приходят к менеджеру,с которым общаются в течении 10±2 мин.,а остальные приходят на оформление документов ,кот. длится 15±4 мин.После чего все клиенты идут на кассу.Определить количество кассиров,при которых длина очереди будет не более 4-X человек.

GPSS

Alex 11 — Sat, 22 Jun 2013 09:24:37 +0000

Alex 11: Помогите пожалуйста решить задачу по GPSS, если не трудно.
Условие: В парикмахерскую в среднем заходит 10 клиентов в час. В парикмахерской работают два мастера, причем если оба они заняты, то клиент уходит. Среднее время обслуживания одного клиента составляет 20 минут. Содержание одного рабочего места обходится 150руб в час. Доход от обслуживания одного клиента - 150руб. Определить Р0, Ротк, Qотн, А, Кср, общий доход за один час (Д) и прибыль

GPSS

Timur2013 — Sun, 05 May 2013 10:51:52 +0000

Timur2013: Здравствуйте. В моей проге выдается ошибка

05/05/13 14:50:17 Model Translation Begun.
05/05/13 14:50:17 Ready.
05/05/13 14:50:17 Error Stop.
05/05/13 14:50:17 Halt.
05/05/13 14:50:17 Clock:0.000000.
05/05/13 14:50:17 Operand A. Invalid expression.
05/05/13 14:50:17 Datum has not been initialized.

Вот сам код:
INITIAL ZAPOMINAEM,0

EVM STORAGE 12

GENERATE (EXPONENTIAL(1,0,160))
QUEUE 1
SEIZE terminal
DEPART 1
ENTER EVM,3
ADVANCE 10
LEAVE EVM,3
ENTER EVM,4
TEST E EVM,0,Met1
SAVEVALUE ZAPOMINAEM+,1
Met1 ADVANCE 10
LEAVE EVM,4
ENTER EVM,12
ADVANCE 10
LEAVE EVM,12
ENTER EVM,6
ADVANCE 10
LEAVE EVM,6
RELEASE terminal
TERMINATE 1

GENERATE (EXPONENTIAL(1,0,160))
QUEUE 2
SEIZE terminal
DEPART 2
ENTER EVM,3
ADVANCE 10
LEAVE EVM,3
ENTER EVM,4
TEST E EVM,0,Met2
SAVEVALUE ZAPOMINAEM+,1
Met2 ADVANCE 10
LEAVE EVM,4
ENTER EVM,12
ADVANCE 10
LEAVE EVM,12
ENTER EVM,6
ADVANCE 10
LEAVE EVM,6
RELEASE terminal
TERMINATE 1

GENERATE (EXPONENTIAL(1,0,160))
QUEUE 3
SEIZE terminal
DEPART 3
ENTER EVM,3
ADVANCE 10
LEAVE EVM,3
ENTER EVM,4
TEST E EVM,0,Met3
SAVEVALUE ZAPOMINAEM+,1
Met3 ADVANCE 10
LEAVE EVM,4
ENTER EVM,12
ADVANCE 10
LEAVE EVM,12
ENTER EVM,6
ADVANCE 10
LEAVE EVM,6
RELEASE terminal
TERMINATE 1

GENERATE (EXPONENTIAL(1,0,160))
QUEUE 4
SEIZE terminal
DEPART 4
ENTER EVM,3
ADVANCE 10
LEAVE EVM,3
ENTER EVM,4
TEST E EVM,0,Met4
SAVEVALUE ZAPOMINAEM+,1
Met4 ADVANCE 10
LEAVE EVM,4
ENTER EVM,12
ADVANCE 10
LEAVE EVM,12
ENTER EVM,6
ADVANCE 10
LEAVE EVM,6
RELEASE terminal

Generate 14400
Terminate 1
start 1

Что нужно исправить в коде, чтоб он работал?

GPSS

darks1de — Mon, 29 Apr 2013 18:57:04 +0000

darks1de: Помогите решить задачу, пожалуйста!

Исходные данные:
На некотором городском маршруте по кольцевому маршруту с десятью остановками работают пять 11-местных и десять 14-местных микроавтобусов. Время движения между остановками имеет равномерное распределение в интервале 5±8 мин. На каждую остановку в соответствии с экспоненциальным за-коном распределения со средним значением 2 мин прибывают пассажиры и ждут микроавтобуса. Микроавтобус подъезжает к остановке и забирает столько пассажиров, сколько имеется свободных мест. Если свободных мест больше, чем пассажиров, то микроавтобус забирает всех. Если на остановке никто не выходит и в микроавтобусе нет свободных мест, он не останавливается. Вероятность того, что пассажир проедет некоторое количество остановок, задана в таблицы.Стоимость проезда - 30 руб.

Вероятность
0,1 0,15 0,2 0,25 0.3
Количество остановок
3 4 5 6 7

Промоделировать работу микроавтобусов на протяжении 16 ч.

Цели моделирования:
Оценить загруженность микроавтобусов, распределение времени поездки пассажиров и выручку со всех микроавтобусов.

GPSS

willburninhell — Mon, 22 Apr 2013 00:18:44 +0000

willburninhell: Приветствую

Есть следующая задача:
На вход некоторого обрабатывающего цеха, состоящего из трех участков, поступает случайный поток деталей. Интервалы поступления распределены экспоненциально со средним значением времени 4 мин. Поступающая деталь с вероятностью 0,65 имеет тип 1, с вероятностью 0,35 - тип 2. Сначала детали поступают на участок 1, где обрабатываются последовательно одна за другой, время обработки распределено равномерно на интервале от 2 до 5 мин. Детали второго типа имеют больший приоритет при обработке, чем детали первого типа.
Далее, после обработки на участке 1, детали 1-го типа поступают на участок 2, а детали 2-го типа - на участок 3. На участке 2 имеется 3 идентичных станка, время обработки детали станком распределено экспоненциально со средним значением 11 мин. На участке 3 имеется 2 станка (время обработки на каждом из них распределено экспоненциально со средним значением 7 мин). Промоделировать работу цеха в течение 40 часов со сбором статистики об очереди деталей перед вторым и третьим участком.

; начальные условия

DEV2 STORAGE 3 ; три станка на втором участке

DEV3 STORAGE 2 ; два станка на третьем участке

GENERATE (Exponential(1,0,4)) ; случайный поток деталей, экспоненциальное распределение со средним значением 4 минуты

TRANSFER .35,TYPE1,TYPE2 ; вероятность детали первого или второго типа

TYPE1 PRIORITY 1 ; устанавливаем низкий приоритет для детали первого типа

SEIZE DEV1 ; деталь попадает на первый участок

ADVANCE 3.5,1.5 ; деталь обрабатывается от 2 до 5 минут

RELEASE DEV1 ; деталь покидает первый участок

PRIORITY 0

TRANSFER ,ROOM2 ; отправляем на второй участок

TYPE2 PRIORITY 2 ; устанавливаем высокий приоритет для детали второго типа

SEIZE DEV1 ; деталь попадает на первый участок

ADVANCE 3.5,1.5 ; деталь обрабатывается от 2 до 5 минут

RELEASE DEV1 ; деталь покидает первый участок

PRIORITY 0

TRANSFER ,ROOM3 ; отправляем на третий участок

ROOM2 QUEUE QU2 ; очередь перед участком 2

ENTER DEV2 ; попадает на второй участок

DEPART QU2 ; покидает очередь перед участком 2

ADVANCE (Exponential(1,0,11)) ; время обработки, экспоненциальное распределение, ср. значение - 11 минут

LEAVE DEV2 ; покидает второй участок

TRANSFER ,EXT ; отправляем на выход

ROOM3 QUEUE QU3 ; очередь перед участком 3

ENTER DEV3 ; попадает на третий участок

DEPART QU3 ; покидает очередь перед участком 3

ADVANCE (Exponential(1,0,7)) ; время обработки, экспоненциальное распределение, ср. значение - 7 минут

LEAVE DEV3 ; покидает третий участок

TRANSFER ,EXT ; отправляем на выход

EXT TERMINATE

GENERATE 2400 ; время симуляции 40 часов

TERMINATE 1

START 1

Вот такое решение у меня получилось, но я сомневаюсь в его правильности, а потому решил спросить ваше мнение, как более опытных в GPSS товарищей
Заранее благодарен за помощь

GPSS

Anjel — Tue, 02 Apr 2013 16:25:21 +0000

Anjel: В цехе производится обработка деталей на 3 различных станках с числовым программным управлением(каждый станок настроен на выполнение определенных автоматических операцией).Часть деталей обработывается только на 1станке, часть на 2станках, часть на всех 3станках,Порядок станке деталей на 1 или на 2 станках не имеет значения, но на третьем станке деталь должна быть обработана только после того как будет обработана на первых двух станках,Время поступления заготовки через каждые А±В минут, время обработки на каждом станке Ск±Dk минут, где k номер станка.Задать времена поступления заготовок и обработки и на соотвествующих станках, а так же доли деталей, которые обрабатываются только на 1станке, на 2станках и на 3станках.помогите пожалуйста(((

GPSS

kriiisenish — Fri, 15 Mar 2013 08:58:06 +0000

kriiisenish: Ребята, че тут у меня ошибку постоянно выдает на 15 строке. не знаю в чем дело(((
мож кто нить поймет

GENERATE 50,10
QUEUE Overhaul
TRANSFER Mstr1,Mstr2,Mstr3
Mstr1 SEIZE Mstr1
DEPART Overhaul
ADVANCE 20,5
RELEASE Mstr1
TRANSFER ,Mstr1
Mstr2 SEIZE Mstr2
GENERATE 1.5,0.5
QUEUE Spot
PREEMPT Maintenance
DEPART Spot
ADVANCE 10,3
RELEASE Mstr2
TRANSFER Mstr2
Mstr3 SEIZE Mstr
GENERATE 15,5
QUEUE Service
PREEMPT Maintenance
DEPART Service
ADVANCE 5,1
RELEASE Mstr3
TRANSFER ,Mstr3

GENERATE 120
TERMINATE 1
START 1

GPSS

kriiisenish — Sat, 09 Mar 2013 16:10:18 +0000

kriiisenish:

Цитата Eugen @ 09.03.13, 13:15

примерно так должно быть DSCN5418.jpg (, : 1193)

Спасибо большое за направление) теперь все понятно) буду сидеть дорабатывать)

GPSS

Eugen — Sat, 09 Mar 2013 13:15:31 +0000

Eugen: примерно так должно быть DSCN5418.jpg (, : 1193)

GPSS

kriiisenish — Sat, 09 Mar 2013 09:04:03 +0000

kriiisenish: Доброго дня ребята. Курсач горит, а я тут дубом просто :fool: Помогите чем сможете. :'(

Задание 7. В ремонтную мастерскую тракторов ООО «Салют» на капитальный ремонт поступают тракторы каждые 50 ± 10 дн., ремонт длится 20 + 5 дн. Текущий ремонт (замена и ремонт топливного насоса, замена свечей, колес и т.д.) производится за 1,5 ± 0,5 дн. Необходимость в текущем ремонте возникает в среднем каждые 10 ± 3 дн. В мастерскую поступают также машины работников аппарата управления хозяйством через 15 ± 5 дн., которые имеют более высокий приоритет обслуживания, чем капитальный ремонт, но ниже, чем текущий. Их ремонт производится обычно за 5 ± 1 дн. Необходимо:
1)Смоделировать работу мастерской в течение полугода.
2)Определить коэффициент использования мастерской.
Мастерская функционирует по принципу хозрасчета. Если капитальный ремонт трактора дает чистый доход в размере 5 0 00 р., а текущий - 3 000, то каков будет чистый доход от проведения ремонта за период моделирования?
Если покупка нового оборудования для ремонта увеличит скорость текущего ремонта тракторов с 1,5 до 0,7 дн., существенно ли это отразится на уменьшении очереди. Оценить статистически.

GPSS

4er — Wed, 14 Nov 2012 06:14:24 +0000

4er: Здравствуйте, возникла проблема: в институте дали задание.

Задание:
На решение в процессор поступает поток программ.
Интервалы времени в потоке распределены по экспоненциальному закону со средним временем, распределенным равномерно от 20 до 40 единиц времени.
Время решения программ распределено по равномерному закону в диапазоне от 15 до 55 единиц времени.
При поступлении на процессор время обработки программы неизвестно (оно становится известно только после окончания ее обработки).
Представить модель обработки программ, когда в первую очередь обрабатываются программы с меньшим временем решения.
ОПРЕДЕЛИТЬ:
1.Написать модель на языке GPSS/PC-2.

Написал 2 рабочие версии: 1 с использованием приоритетов, сказал можно проще и сделать по-другому без приоритетов. 2 с использованием Link/unlink, опять же сказал, что мы на лекциях линки не проходили и написать модель без использования их.
Подскажите, пожалуйста, еще варианты решения данной задачи? :wub:

GPSS

spring — Sat, 27 Oct 2012 11:55:13 +0000

spring: Ребят, ну ответьте пожалуйста!!!!

GPSS

spring — Sat, 27 Oct 2012 10:40:48 +0000

spring: Помогите, пожалуйста, доработать программу,
необходимо чтобы выходила гистограмма с такими значениями:

λ 1 1.3 1.68 1.7 1.9 2
p 0,000028 0,00007 0,00019 0,00028 0,00038 0,00056

Operator STORAGE 5;
GENERATE (Exponential(1,0,0.5));
TEST g R$Operator,0,met
QUEUE Other;
ENTER Operator;
DEPART Other;
ADVANCE (Exponential(1,0,1));
LEAVE Operator;
TERMINATE ;
MET TERMINATE;
GENERATE 3600;
TERMINATE 1;
START 1;

GPSS

Cadmus — Tue, 26 Jun 2012 06:43:52 +0000

Cadmus: Здравствуйте. Задали задачу по GPSS, бьюсь довольно долго.

Специализированное вычислительное устройство, работающее в режиме реального времени, имеет в своем составе два процессора, соединенные с общей оперативной памятью. В режиме нормальной эксплуатации задания выполняются на первом процессоре, а второй является резервным. Первый процессор характеризуется низкой надежностью и работает безотказно лишь в течение 150+-20 минут. Если отказ происходит во время решения задания, в течение 2 минут производится включение второго процессора, который продолжает решение прерванного задания, а также решает и последующие задания до восстановления первого процессора. Это восстановление происходит за 20+-10, после чего выключается. Задания поступают каждые 10+-5 минут и решаются за 5+-2 минут. Надежность резервного процессора считается идеальной.

Смоделировать: процесс работы устройства в течение 50ч; Подсчитать число решенных заданий, число отказов процессора и число прерванных заданий. Определить максимальную длину очереди заданий и коэффициент загрузки резервного процессора.

Я набросал логику, как мне кажется это должно работать

tштрих это текущее модельное время, t0 время в которое было зафиксирована предыдущая поломка первого процессора
x - это число в диапазоне (150+-20) которое определяет наступило время поломки или нет
xштрих - это число в диапазоне (20+-10) которое определяет произошло восстановление первого процессора или нет

Первый вопрос, как сохранить в переменную случайное значение в интервале (150+-20)?

Я нашел вот эту формулу Х=А-В+RN1*(2B+1) и попробовал сделать такое выражение

FAIL VARIABLE (130+(-40)+RN1#(2#40+1))) - правильно ли это? Ошибок вроде не выдает

GPSS

Костя030392 — Sun, 03 Jun 2012 19:08:13 +0000

Костя030392: Здравствуйте помогите пожалуйста ..

Тема. Решение задачи сетевого планирования средствами имитационного моделирования.
Логическая взаимосвязь работ, подлежащих выполнению в ходе технического обслуживания средств вычислительной техники, представлена на рис. Для обозначения каждого вида работы используется пара вершин графа, соединенных дугой. Числа, записанные над дугами, означают продолжительность соответствующих работ в часах. Необходимо построить модель, позволяющую получить распределение времени всего комплекса работ. Найти вероятность того, что все работы будут выполнены не более, чем за 70 часов. Найти наиболее вероятное время завершения технического обслуживания.
____________________.docx (, : 330)

GPSS

katenokcat — Wed, 30 May 2012 14:04:30 +0000

katenokcat: TEMENb, спасибо! Вы были правы :)

GPSS

qwert-chan — Tue, 29 May 2012 21:37:11 +0000

qwert-chan: Черт, а я всю ночь ошибку ищу. Спасибо вам большое.)) =)

GPSS

TEMENb — Tue, 29 May 2012 21:35:04 +0000

TEMENb:

Цитата qwert-chan @ 29.05.12, 21:28

Здравствуйте.
Подскажите пожалуйста, если у меня есть фрагмент программы

TARR1 VARIABLE 0
GENERATE 1
TEST E V$TARR1,0,MET1
SAVEVALUE TARR1,4
TEST E V$TARR1,4,MET1
SAVEVALUE TARR1,8
MET1 TERMINATE 1
START 1

то почему по завершению программы значение TARR1 - 4, а не 8?

Версия GPSS - 4.1.3

потому что
V$TARR1 всегда равно нулю и аж никак не четырем

наблюдая за ходом ваших мыслей, думаю ваша программа должна выглядеть так
initial x$TARR1,0
GENERATE 1
TEST E x$TARR1,0,MET1
SAVEVALUE TARR1,4
TEST E x$TARR1,4,MET1
SAVEVALUE TARR1,8
MET1 TERMINATE 1
START 1

и сразу дополнение. скачайте версию посвежее и больше не путайте переменные с сохраняемыми величинами.

GPSS

qwert-chan — Tue, 29 May 2012 21:28:14 +0000

qwert-chan: ...и сразу дополнение: почему в аналогичной программе переменная себя так необычно ведет? если я правильно понимаю - в первый проход я сравниваю ее с нулем, она увеличивается до четырех - затем я сравниваю четыре с четырем и получается что это неверно(!), а затем, на втором проходе - четыре снова увеличивается на четыре и дает восемь.

TARR1 VARIABLE 0

GENERATE 2

TEST E V$TARR1,0,MET1

SAVEVALUE TARR1+,4

TEST E V$TARR1,4,MET1

SAVEVALUE TARR1+,3

MET1 TERMINATE 1

START 2

GPSS

qwert-chan — Tue, 29 May 2012 21:15:31 +0000

qwert-chan: Здравствуйте.
Подскажите пожалуйста, если у меня есть фрагмент программы

TARR1 VARIABLE 0
GENERATE 1
TEST E V$TARR1,0,MET1
SAVEVALUE TARR1,4
TEST E V$TARR1,4,MET1
SAVEVALUE TARR1,8
MET1 TERMINATE 1
START 1

то почему по завершению программы значение TARR1 - 4, а не 8?

Версия GPSS - 4.1.3

GPSS

TEMENb — Tue, 29 May 2012 10:38:11 +0000

TEMENb: prototype, вам нужно добавить параметр в initial, что бы определить время приохда
кроме того вставить блок таймера.

GPSS

Ghza — Tue, 29 May 2012 08:05:48 +0000

Ghza:

Цитата TEMENb @ 29.05.12, 07:21

Спасибо большое, теперь дошло:)

GPSS

TEMENb — Tue, 29 May 2012 07:21:02 +0000

TEMENb: Ghza, ну в чем проблема провести маленький эксперимент? ))

ttt table rn1,0,5,12

generate 1

tabluate ttt

terminate 1

start 1000

TABLE MEAN STD.DEV. RANGE RETRY FREQUENCY CUM.%

TTT 499.794 298.497 0

_ - 0.000 4 0.40

0.000 - 5.000 8 1.20

5.000 - 10.000 9 2.10

10.000 - 15.000 7 2.80

15.000 - 20.000 7 3.50

20.000 - 25.000 4 3.90

25.000 - 30.000 3 4.20

30.000 - 35.000 5 4.70

35.000 - 40.000 4 5.10

40.000 - 45.000 3 5.40

45.000 - 50.000 6 6.00

50.000 - _ 940 100.00

как видите получили 10 полноценных интервала, + два интервала от минусбесконечности до нуля и от 50 до плюс бесконечности.

Добавлено 29.05.12, 07:23
кстати, стоит заметить, что 0 попадает в интервал (минус бесконечность; ноль]
ну и остальные числа аналогично.

GPSS

Ghza — Mon, 28 May 2012 22:20:21 +0000

Ghza:

Цитата TEMENb @ 28.05.12, 20:35

katenokcat, у вас несколько неправильно построена логика работы.
Если транзакт создаст затор, то вы изымаете его из очереди и уничтожаете. в условии вашей задачи не сказано, что его надо уничтожать
статистику по сумарному времени можно снять, используя mark и m1, запоминая время, если транзакт создавал затор, а вот по продолжительности затора - надо расчиплять первый и крайний транзакт.. примерно так, как вы это делаете, только не перенаправлять, а именно расчиплять. что б родитель продолжил движение по маршруту.

Добавлено 28.05.12, 21:32
Ghza, да подбирают их.
я, например, стандартно ставлю 0,1,1000
потом подганяю, что б небыло лишних интервалов.

Цитата Ghza @ 28.05.12, 09:57

PARIK TABLE M1,0,5,12 ; формирование таблицы (0 - левая граница, 5 - это шаг, 12 - число интервалов (получается 5*12=60, т.е. правая граница, согласно заданию)

тут вы немного ошибаетесь в суждениях. интервалов на самом деле не 12.. а 10, если память мне не изменяет. т.е. на один или два меньше, чем ожидается. вот ну не помню точно. а лезть проверять - лень :rolleyes:

Теперь вообще потерялась:(
Ибо в задании где параметры для построения таблицы распределения были [0,50],с шагом 5 в исходнике было указано
TABLE M1,0,5,10

Почитала литературу:

num TABLE A, B, C, D, E

где num – имя или номер таблицы (это понятно)
А – поле, в котором может быть записан либо аргумент таблицы (это M1)
B – верхняя граница нижнего интервала; (это 0)
C – ширина интервала; (это шаг 5)
D – число интервалов; (ну тут чисто логически определила, что пять раз по 10 - выйдет 50)

В общем непонятно. И как подбирать тоже:( Я понимаю, что не понимаю (простите за тавтологию)самого принципа построения таблиц. И стремаюсь жутко, потому что наверняка задаю тут тупые вопросы), но мне надо писать курсач. Потому очень хочу разобраться:(
Помогите кто-нить, а:(

GPSS

TEMENb — Mon, 28 May 2012 20:35:45 +0000

TEMENb: katenokcat, у вас несколько неправильно построена логика работы.
Если транзакт создаст затор, то вы изымаете его из очереди и уничтожаете. в условии вашей задачи не сказано, что его надо уничтожать
статистику по сумарному времени можно снять, используя mark и m1, запоминая время, если транзакт создавал затор, а вот по продолжительности затора - надо расчиплять первый и крайний транзакт.. примерно так, как вы это делаете, только не перенаправлять, а именно расчиплять. что б родитель продолжил движение по маршруту.

Добавлено 28.05.12, 21:32
Ghza, да подбирают их.
я, например, стандартно ставлю 0,1,1000
потом подганяю, что б небыло лишних интервалов.

Цитата Ghza @ 28.05.12, 09:57

GPSS

Ghza — Mon, 28 May 2012 09:57:52 +0000

Ghza: Доброго времени суток форумчане!
Помогите пожалуйста разобраться с лабораторной, а именно с определением таблиц.

Была задача:

В парикмахерскую с одним креслом приходят клиенты; интервалы времени между ними случайны и распределены равномерно в интервале [35±15] минут. Время обслуживания также распределено равномерно на интервале [13±4] минут. Клиенты, приходящие в парикмахерскую, обслуживаются в порядке очереди «первый пришел – первым обслужен».
Задание: необходимо разработать и отладить имитационную модель парикмахерской в системе моделирования GPSS; модель должна обеспечить получение статистических данных об очереди.

Параметры для построения таблицы равномерного распределения [0,60] шаг 5.

Таблица в модели будет выглядеть следующим образом:

PARIK TABLE M1,0,5,12 ; формирование таблицы (0 - левая граница, 5 - это шаг, 12 - число интервалов (получается 5*12=60, т.е. правая граница, согласно заданию)

Правильно ли я рассуждаю?

Так вроде бы понятно, но при рассмотрении другого примера моделирования никак не могу понять откуда взялись параметры TABLE:

Задача:
Переговорный пункт имеет одно помещение с тремя кабинами для переговоров. Если посетитель застает свободной хотя бы одну кабину, то он оплачивает будущий разговор в кассе, затем ждет соединения и ведет переговоры, после чего покидает переговорный пункт. Если посетитель застает все кабины занятыми, он ждет освобождения одной из них у входа в переговорный пункт.
Интервал времени между приходами посетителей – случайный, распределенный по равномерному закону, составляет 1,5±0,4 мин. Время ожидания соединения – 3,5±1,1 мин., время разговора посетителя по телефону – 4,4±1,35 мин. Длительность разговора и время ожидания соединения – случайные величины, подчиняются равномерному распределению.

Сам текст:
; Вместимость переговорного пункта
Punkt STORAGE 3 ; емкость переговорного пункта
Transit TABLE M1,.5,1,30 ; формирование таблицы
; Имитация прихода посетителей
GENERATE 1.85,1 ; приход посетителей
Povtor GATE SNF Punkt,Zanyt ; регулируется поток посетителей
; Имитация работы переговорного пункта
ENTER Punkt ; войти на переговорный пункт
QUEUE Ocher_kassir ; включение в очередь
SEIZE Kassir ; обращение к кассиру
DEPART Ocher_kassir ; выход из очереди
ADVANCE 1.5,0.4 ; оплата за разговор
RELEASE Kassir ; освобождение кассира
ADVANCE 4.4,1.35 ; время разговора посетителей
LEAVE Punkt ; оставить переговорный пункт
TABULATE Transit ; табулировать переговорный пункт
TERMINATE ; уход посетителей
Zanyt ADVANCE 3.5,1.1 ; время ожидания освобождения телефона
TRANSFER ,Povtor ; переход к оператору с меткой Povtor
; Задание времени моделирования
GENERATE 480 ; время работы модели
TERMINATE 1 ; уменьшение общего времени моделирования на 1 мин
START 1 ; пропускаются по одному посетителю

Вот откуда взялись эти значения M1,.5,1,30? Это высчитывается как-то? Ткните носом конкретно на этом примере, а то не доперает до меня и все(

GPSS

SenslideR — Sun, 27 May 2012 14:51:24 +0000

SenslideR: TEMENb, спасибо, теперь это надо заставить работать =\ а завтра уже сдать! х_Х

GPSS

TEMENb — Sun, 27 May 2012 09:31:49 +0000

TEMENb: Lazio, вообщем я этой формулы не знаю, результат деления (0,66 на 0,22) позволяют мне думать, что это коим то образом связанно с трехканальностью рассматриваемого устройства.
Больше помочь ничем не могу. так глубоко анализ не учили.

GPSS

Lazio — Sun, 27 May 2012 09:18:41 +0000

Lazio: См. среднее число требовании вы очереди на обслуживание.
131213.png (, : 1056)

GPSS

TEMENb — Sun, 27 May 2012 08:53:38 +0000

TEMENb: SenslideR, ну это зделать можно по этой модели

Цитата

SAVEVALUE RETRY VALUE
PS 0 1000.000
PPC 0 868.000
PP 0 224.000

Выходит что на одного сотрудника должно приходится 0,868 компов и 0,224 единицы доп оборудования

GPSS

SenslideR — Sun, 27 May 2012 03:47:18 +0000

SenslideR:

Цитата TEMENb @ 26.05.12, 08:18

в задаче мало данных и не совсем четкое условие.
воможно первая реальзация может выглядеть так

Данных больше нету... =( А условие: определить оптимальное число сотрудников, компов и оборудования.

GPSS

TEMENb — Sat, 26 May 2012 21:10:20 +0000

TEMENb: Lazio, а по какой формуле вы считали среднюю длинну очереди?

Скрытый текст

Цитата Lazio @ 26.05.12, 20:32

SELECT MIN 1,1,P_COUNT,,Q

ASSIGN 2,RN1
MET1 ASSIGN 2,(P2@P_COUNT)
ASSIGN 2,(P2+1)
TEST E Q*2,Q*1,MET1

давно я не видел подобной реализации.
это пятерочка. :rolleyes:

GPSS

Lazio — Sat, 26 May 2012 20:32:25 +0000

Lazio: Подаскажите по моей проге:

P_COUNT EQU 3

GENERATE (EXPONENTIAL(1,0,4))

SELECT MIN 1,1,P_COUNT,,Q

ASSIGN 2,RN1
MET1 ASSIGN 2,(P2@P_COUNT)
ASSIGN 2,(P2+1)
TEST E Q*2,Q*1,MET1

QUEUE P2
SEIZE P2
DEPART P2
ADVANCE (EXPONENTIAL(1,0,10/3))
RELEASE P2

OUT TERMINATE

GENERATE 2400
TERMINATE 1

start 1

В итоге выдает средняя длина очереди 0.066 хотя в теории это значение 0.022 ? GPSS как то не так считает или я ?

GPSS

TEMENb — Sat, 26 May 2012 08:18:28 +0000

TEMENb:

Цитата SenslideR @ 26.05.12, 05:33

Всем доброго времени суток!

Имеется задачка:
Студия выполняет поток заданий (100%) по трем направлениям

I. S + PC + P , V=20 , 30%
II. S + PC , V=8 , 45%
III. S , V=4 , 25%

, где S - сотрудники, PC - компьютеры, P - дополнительное оборудование для компьютеров, V - время выполнения работы.
Время выполнения по распределению Пуассона со средним значением для заданий.

Необходимо создать модель в GPSS World.

Заранее спасибо!

в задаче мало данных и не совсем четкое условие.
воможно первая реальзация может выглядеть так

Скрытый текст

initial x$ps,0

initial x$ppc,0

initial x$pp,0

generate 1

transfer .203,,mfirst

transfer .845,,msec

transfer ,mthird

mfirst savevalue pp+,1

msec savevalue ppc+,1

mthird savevalue ps+,1

terminate 1

start 1000

GPSS

BSU_Dashka — Thu, 24 May 2012 14:33:36 +0000

BSU_Dashka: честно..пока даже не представляю как это делается..((

Добавлено 24.05.12, 14:40
как бы теоретически просто надо как-то выдернуть из ADVANCE время задержки..либо просто взять всё время работы ремонтного цеха..но откуда извлечь эту информацию я не знаю..

GPSS

TEMENb — Thu, 24 May 2012 13:53:14 +0000

TEMENb:

Цитата

1 GENERATE ,,,52
CLEAR

Это зачем? ))

Добавлено 24.05.12, 13:53
BSU_Dashka, поторопился. реализация похожа на правильную.
сбило с толку generate 51
это вроде как 50 основных и одна резервная?
и уберите все остальные дженерейты, кроме блока с таймером.

Цитата

reset
clear
start 1

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

Добавлено 24.05.12, 14:02

Скрытый текст

REM STORAGE 1
NOWON STORAGE 50
initial x$n,1
GENERATE ,,,x$n
transfer ,met1
GENERATE ,,,50
met1 ENTER NOWON
ADVANCE 157,25
LEAVE NOWON
ENTER REM
ADVANCE 7,3
LEAVE REM
TRANSFER ,met1

GENERATE 4160
TERMINATE 1
START 1
initial x$n,2
reset
CLEAR
START 1
initial x$n,3
reset
CLEAR
START 1
initial x$n,4
reset
CLEAR
START 1
initial x$n,5
reset
CLEAR
START 1

Добавлено 24.05.12, 14:03
если допишете реализацию расходов за ремонт, я подскажу как писать реализацию расходов за резерв ;)

GPSS

BSU_Dashka — Thu, 24 May 2012 13:43:59 +0000

BSU_Dashka: Помогите разобраться
задача
На трикотажной фабрике N швейных машин работают по 8 часов в день и по 5 дней в неделю. В резерве имеется М машин. Время безотказной работы машины распределено по равномерному закону в интервале [а1, b1]. Если машина выходит из строя, ее заменяют резервной либо сразу в случае, когда она имеется в наличии, либо по мере ее появления. Тем временем сломанную машину отправляют в ремонтную мастерскую, где ее чинят и возвращают в цех, но уже в качестве резервной. На ремонт швейной машины уходит время, равномерно распределенное на интервале [а2, b2].
Разработать GPSSV - модель системы с целью минимизации стоимости производства.
Первоначальный перечень экспериментов: N = 50, 1 < M < 5, оплата ремонта машины 3.75 руб/час. За машину, находящуюся в резерве, нужно платить 30 руб/день, а1 = 132, b1 = 182, а2 = 4, b2 = 10.

мой код

Скрытый текст

SIMULATE
REM STORAGE 1
NOWON STORAGE 50

1 GENERATE ,,,51
2 ENTER NOWON
ADVANCE 157,25
LEAVE NOWON
ENTER REM
ADVANCE 7,3
LEAVE REM
TRANSFER ,2

GENERATE 4160
TERMINATE 1
START 1
1 GENERATE ,,,52
CLEAR
START 1
1 GENERATE ,,,53
CLEAR
START 1
1 GENERATE ,,,54
CLEAR
START 1
1 GENERATE ,,,55
CLEAR
START 1

вроде что-то делает..вопрос.правильно ли делает? и как мне дальше определить какое количество резервной техники выгоднее?
если будут какие-то советы по коду- рада выслушать.
Заранее спасибо.

GPSS

SergeStudent — Thu, 24 May 2012 12:21:13 +0000

SergeStudent: Здравствуйте все.
Помогите решить задание, Очень надо на завтра.

На обрабатывающую участок цеха поступают детали в среднем через 50 мин. Первичная обработка деталей производится на одном из двух станков. Первый станок обрабатывает деталь в среднем 40 мин и имеет до 4% брака, второй соответственно 60 мин и 8% брака. Все бракованные детали возвращаются на повторную обработку на второй станок. Все интервалы времени распределены по экспоненциальному закону.
Детали, которые попали в бракдвичи считаются отходами.
Смоделировать обработку на участке 500 деталей. Определить загрузки второго станка на вторичной обработке и вероятность появления отходов.

Работаем в : GPSS World Student Version

Помогите пожалуйста.

GPSS

TEMENb — Wed, 23 May 2012 12:15:43 +0000

TEMENb: Orjanruusu, напишите мне в скайп 400852874

GPSS

Orjanruusu — Wed, 23 May 2012 12:11:12 +0000

Orjanruusu: Всем доброго времени суток! :)

Помогите, пожалуйста, разобраться!

Такой вопрос: есть программа, через которую я запускаю GPSS модель в BATCH режиме и получаю sim-файл с отчетом. Также программа генерирует Plus-процедуры дисперсионного анализа.

Так вот, в sim файле я получаю только отчет о создании процесса моделирования (Create simulation), а сами наблюдения (Run'ы) вообще не генерируются. Добавление в модель команды CONDUCT ExperimentName() желаемого результата не принесло - выдает ошибку:

**** Experiment in Progress. ****
05/23/12 20:04:03 Error Stop.
05/23/12 20:04:03 Halt.
05/23/12 20:04:03 Clock:0.000000.
05/23/12 20:04:03 Reference to a non-existent Matrix entity.
05/23/12 20:04:03 Identifier: ExperimentName_RESULTS.
05/23/12 20:04:03 Error in Argument 1, calling DATATYPE().
05/23/12 20:04:03 Error in Argument 1, calling STRINGCOMPARE().
05/23/12 20:04:03 ExperimentName, Line 44.
05/23/12 20:04:03 Experiment ended.
05/23/12 20:04:03 Error Stop.
05/23/12 20:04:03 Halt.
05/23/12 20:04:03 Clock:0.000000.
05/23/12 20:04:03 System error. Internal exception.

На 44-ой строке: IF (StringCompare(DataType(ExperimentName_Results[1,1]),"UNSPECIFIED")'E'0)

Хотя, если вызывать команду по F11 или из меню, все работает. С GPSS знакома очень поверхностно. Подскажите, правильно ли я действую, почему не генерируются Run'ы? Ну или направьте где что нужно почитать :)

GPSS

TEMENb — Sat, 19 May 2012 11:18:58 +0000

TEMENb: Lazio, я не выполнял модель ни разу ))

GPSS

Lazio — Sat, 19 May 2012 10:17:42 +0000

Lazio: :-? а можно мне ваш отчетик.

GPSS

TEMENb — Sat, 19 May 2012 06:40:51 +0000

TEMENb: один транзакт находится внутри кассы.
собственно цифра - это его порядковый номер.
будьте уверены, ваш и мой отчеты отличаются, я могу не увидеть этого овнера. жпсс генерирует немного разные отчеты на разных машинах.

GPSS

Lazio — Fri, 18 May 2012 18:35:02 +0000

Lazio: а то что OWNER 577 и 576 в двух кассах а в другой 0 это что значит? и ещё у нас сгенерировано 577 транзактов а в кассы дошло на один меньше.

GPSS

1never1 — Fri, 18 May 2012 17:54:18 +0000

1never1: Нужна помощь в решении задачи, отчет, код, ну и скрины результатов моделирования, оплату гарантирую, возможно предоплата! 365574850 моя аська или scype n1ver1986

GPSS

TEMENb — Fri, 18 May 2012 11:14:36 +0000

TEMENb:

Цитата Lazio @ 18.05.12, 09:46

TRANSFER BOTH,XX,MM
MM TRANSFER BOTH,YY,ZZ

неверно построена выборка.
я бы написал так

Цитата

TEST E 0,((Q$OCHER3 TEST L Q$OCHER1,Q$OCHER2,YY

ну или так

Цитата

TEST L Q$OCHER1,Q$OCHER2,MET1
TEST L Q$OCHER1,Q$OCHER3,ZZ
TRANSFER ,XX
MET1 TEST L Q$OCHER2,Q$OCHER3,ZZ
TRANSFER ,YY

Но правильней всего будет использовать оператор SELECT
например вот так

Цитата

OCHER1 EQU 1
OCHER2 EQU 2
OCHER3 EQU 3

GENERATE (EXPONENTIAL(1,0,4))

ASSIGN 1,XX
ASSIGN 2,YY
ASSIGN 3,ZZ

SELECT MIN NUM,1,3,,Q
TRANSFER ,P*NUM

XX QUEUE OCHER1
SEIZE KASSA1
DEPART OCHER1
ADVANCE (EXPONENTIAL(1,0,10/3))
RELEASE KASSA1
TRANSFER ,OUT

YY QUEUE OCHER2
SEIZE KASSA2
DEPART OCHER2
ADVANCE (EXPONENTIAL(1,0,10/3))
RELEASE KASSA2
TRANSFER ,OUT

ZZ QUEUE OCHER3
SEIZE KASSA3
DEPART OCHER3
ADVANCE (EXPONENTIAL(1,0,10/3))
RELEASE KASSA3
TRANSFER ,OUT

OUT TERMINATE

GENERATE 2400
TERMINATE 1

Добавлено 18.05.12, 11:16
или даже вот так

Цитата

GENERATE (EXPONENTIAL(1,0,4))

SELECT MIN 1,1,3,,Q

QUEUE P1
SEIZE P1
DEPART P1
ADVANCE (EXPONENTIAL(1,0,10/3))
RELEASE P1

OUT TERMINATE

GENERATE 2400
TERMINATE 1

start 1

Добавлено 18.05.12, 11:20
а вот вариант на отлично )

Цитата

P_COUNT EQU 3

GENERATE (EXPONENTIAL(1,0,4))

SELECT MIN 1,1,P_COUNT,,Q

ASSIGN 2,RN1
MET1 ASSIGN 2,(P2@P_COUNT)
ASSIGN 2,(P2+1)
TEST E Q*2,Q*1,MET1

QUEUE P2
SEIZE P2
DEPART P2
ADVANCE (EXPONENTIAL(1,0,10/3))
RELEASE P2

OUT TERMINATE

GENERATE 2400
TERMINATE 1

start 1

GPSS

Lazio — Fri, 18 May 2012 09:46:33 +0000

Lazio: Помогите разобраться в задаче: есть три билетные кассы (работают параллельно). К ним приходят люди по эксп. закону со средним 4. Обслуживание каждой кассы 3.333 в среднем по тому же закону. Проблема в том, что код (см. ниже) работает как то некорректно. Надо чтобы люди приходили и занимали свободную кассу ну или ту в которой очередь меньше (если возможно)

SIMULATE
GENERATE (EXPONENTIAL(1,0,4))

TRANSFER BOTH,XX,MM
MM TRANSFER BOTH,YY,ZZ

XX QUEUE OCHER1
SEIZE KASSA1
DEPART OCHER1
ADVANCE (EXPONENTIAL(1,0,10/3))
RELEASE KASSA1
TRANSFER ,OUT

YY QUEUE OCHER2
SEIZE KASSA2
DEPART OCHER2
ADVANCE (EXPONENTIAL(1,0,10/3))
RELEASE KASSA2
TRANSFER ,OUT

ZZ QUEUE OCHER3
SEIZE KASSA3
DEPART OCHER3
ADVANCE (EXPONENTIAL(1,0,10/3))
RELEASE KASSA3
TRANSFER ,OUT

OUT TERMINATE

GENERATE 2400
TERMINATE 1

GPSS

TEMENb — Fri, 18 May 2012 08:18:36 +0000

TEMENb: selflessslaeyr, вы забыли про транзакты, которые пришли с метки MACHINE1. у них первый параметр не задан.

GPSS

selflessslaeyr — Thu, 17 May 2012 16:19:34 +0000

selflessslaeyr: Здравствуйте.
Проблема такая.
Вот код программы.

GENERATE 10,5

QUEUE myq
TRANSFER 0.5,MACHINE1,MACHINE2
DEPART myq

MACHINE1 SEIZE mach1
ADVANCE 15,5
RELEASE mach1
TRANSFER ,TST

MACHINE2 SEIZE mach2
ASSIGN 1,1
ADVANCE 3,2
RELEASE mach2

TST TEST E P1,1,TABUL

MACHINE3 SEIZE mach3
ADVANCE 3,2
RELEASE mach3

TABUL TERMINATE
GENERATE 100000
TERMINATE 1
START 1

Выдает ошибку в строке TEST E P1,1,TABUL ("reference to a non-existent parameter").
Значение параметру транзакта P1 задается в строке ASSIGN 1,1.
Что сделано неправильно?

GPSS

TEMENb — Mon, 30 Apr 2012 19:01:27 +0000

TEMENb: ETQW, вопервых.
нет нужды специально показывать, как устройство курсирует по очереди.
вот такой код вполне соответствует условию

Цитата

Рассмотрим систему массового обслуживания с заданным числом устройств обслуживания п= 5, действующих параллельно и использующих одну общую очередь. Интервалы времени между поступлениями требований экспоненциально распределены со средним значением 5 (все интервалы времени в этой задаче измеряются в минутах). Требование, поступившее, когда в системе есть свободное устройство, немедленно поступает на обслуживание, Требование, поступившее, когда все устройства заняты, становится в очередь.

Ustr storage 5 ;Задаем 5-устройств действующих параллельно

generate (Exponential(1,0,5)) ;поступление требований экспонециально в среднем 5 мин

ustr1 queue Ustr

enter Ustr ;вход в устройство

depart Ustr

...

Добавлено 30.04.12, 19:04
ETQW, не хочу сказать, что этот код не верен

advance 2.4,0.4

но настоятельно советую воздержаться от дробных значений времени. Исторически жпсс всегда имел дискретное время. советую придежриваться этого правила и далее.
т.е. моделлирвоать в секундах.

Добавлено 30.04.12, 19:09
итого.
задача должна выглядеть так

объявление емкости мку

генерация транзактов

стать в глобальную очередь, для получения общей статистики пребывания транзактов в системе (это избавляет нас от кучи ненужных счетчиков)

поступление в очередь

поступление в мку

задержка на время выполнения

выход из мку

с определенной вероятностью отправляем обратно в очередь

покинуть глобальную очередь

транзакт покидает систему

generate 480 ;генерация в течение 480 мин

terminate 1 ;уменьшение счетчика конца моделирования на 1

start 1 ;задание значения счетчика моделирования равным 1

вам осталось только заменить мой русский текст на жпсс операторы построчно и нести к преподу.
удачи.

GPSS

ETQW — Wed, 25 Apr 2012 15:08:59 +0000

ETQW: Всем доброго времени суток. Прошу вашей помощи в следующей задаче (Нет, не очередной ловец халявы: я уже попытался написать код, но мой преподаватель говорит, что не правильно )
Прошу помощи в этом нелегком деле :3

Постановка задачи: Рассмотрим систему массового обслуживания с заданным числом устройств обслуживания п= 5, действующих параллельно и использующих одну общую очередь. Интервалы времени между поступлениями требований экспоненциально распределены со средним значением 5 (все интервалы времени в этой задаче измеряются в минутах). Требование, поступившее, когда в системе есть свободное устройство, немедленно поступает на обслуживание, Требование, поступившее, когда все устройства заняты, становится в очередь. Когда тре-бование (первый раз) попадает на обслуживание, время его обслуживания равномерно распределено между а = 2 и b = 2,8. Но по завершении первого обслуживания может оказаться, что требование не удовлетворено (вероят¬ность возникновения такой ситуации p = 0,2). Если обслуживание было удов-летворительным, требование покидает систему, в противном случае обслу-живание будет продолжаться. Удовлетворено ли требование обслуживанием, следует определять по его завершении. Если требование не удовлетворено завершившимся обслуживанием и в очереди больше нет других требований, начинается повторное обслуживание этого требования на том же устройстве. Если же по завершении неудовлетворительного обслуживания в очереди еще имеются требования, неудовлетворенное требование должно присоединиться к очереди.
В исходном состоянии в системе нет требований и устройства являются свободными. Моделирование должно выполняться в течение 480 мин. Вычислите среднее и максимальное общее время в системе (включая задержки в очереди и время обслуживания требования) и число удовлетворенных об¬служиванием требований, покинувших систему в процессе моделирования. Кроме того, вычислите среднюю и максимальную длину очереди, среднее по времени и максимальное число занятых устройств обслуживания.
Считаете ли вы работу системы рациональной? Если нет, то предложите пути улучшения ее эффективности. Обоснуйте свой ответ.

GPSS

slawkaqwerty — Fri, 17 Feb 2012 12:28:17 +0000

slawkaqwerty: kant1288 Здаров,можеш скинуть свой курсач потвоему варианту,а то у меня оч похож

GPSS

Adam_di — Sun, 05 Feb 2012 19:20:33 +0000

Adam_di: Всем привет, вообщем такая проблема:
С интервалом времени 5 ± 2 мин детали поштучно поступают к станку на обработку и до начала обработки хранятся на рабочем столе, который вмещает 3 детали. Если свободных мест на столе нет, вновь поступающие детали укладываются в тележку, которая вмещает 5 деталей. Если тележка заполняется до нормы, ее увозят к другим станкам, а на ее место через 8 ± 3 мин ставят порожнюю тележку. Если во время отсутствия тележки поступает очередная деталь и не находит на столе места, она переправляется к другому станку. Рабочий берет детали на обработку в первую очередь из тележки, а если она пуста — со стола. Обработка деталей производится за 10 ± 5 мин.

Смоделировать процесс обработки на станке 100 деталей. Подсчитать число деталей поштучно переправленных к другому станку.
Показал преподу этот код, говорит тут минимум 2 generat'a должно быть, но как так не понимаю где, или понимаю но при построение схемы незнаю как её строить с ними.
[Spoiler]
generate 300,120

test L q$table_q,3,cart
queue table_q
assign 5,1
transfer ,meet

cart test L q$cart_q,5,clear_cart
queue cart_q
priority 5
assign 5,2
transfer ,meet

clear_cart gate LR 1,other
logic s 1
advance 480,180
depart cart_q,q$cart_q
logic r 1
terminate 0

meet seize proc
test E p5,2,dep_1
test G q$cart_q,1,adv
depart cart_q
adv advance 600,300
release proc
terminate 1

dep_1 depart table_q
transfer ,adv

other savevalue other_advanced+,1
terminate 0

start 100

GPSS

RE_RoRsChaCh — Sat, 21 Jan 2012 19:42:15 +0000

RE_RoRsChaCh: Здавствуйте есть задача, нужна помощь.
ЭВМ обслуживает три терминала по круговому циклическому алгоритму, предоставляя каждому терминалу 30 с. Если в течение этого времени задание обрабатывается, то обслуживание завершается; если нет, то остаток задачи становится в специальную очередь, которая использует свободные циклы терминалов, т. е. задача обслуживается, если на каком-либо тер-минале нет заявок. Заявки на терминалы поступают через 30±5 с и имеют длину 300±50 знаков. Скорость обработки заданий ЭВМ равна 10 знаков/с.
Смоделировать 5 ч работы ЭВМ. Определить загрузку ЭВМ, параметры очереди неоконченных заданий. Определить величину цикла терминала, при которой все заявки будут обслужены без специальной очереди.

Вот код но я не понимаю где тут длин знаков и скорость обработки ЭВМ указаны подскажи пожалуйста.

generate 30,5 ;terminal 1

link 1,fifo

generate 30,5 ;terminal 2

link 2,fifo

generate 30,5 ;terminal 3

link 3,fifo

met1 queue och1 ;ставим заявку в очередь

seize EOM ;занимаем устройство ЕОМ

depart och1 ;выводи заявку из очереди

assign 1,(25+10#rn1/1000) ;задаем время обработки как первый параметр

test le p1,30,met2 ;проверяем время обработки, если >30 идем в met2, если <=30 входим в блок test

advance p1 ;задержка транзакта на время р1

release EOM ;освобождение устройства ЕОМ

terminate 1 ;удаление транзакта

met2 advance 30 ;задержка транзакта на 30с

assign 1-,30 ;вычитание из р1 30с

release EOM ;освобождение устройства ЕОМ

link och,fifo ;помещаем транзакт в список пользователя och

generate ,,,1

assign 1,0

met assign 1,((p1@3)+1)

test g ch*1,0,met4 ;проверка длины списка пользователя, если >0 входим в блок test, если <=0 переходим на met4

unlink p1,met1,1 ;вывод транзакта из списка пользователя

transfer ,met5

met4 test g CH$och,0,met5 ;проверка длины списка och, если >0 входим в блок test, если <=0 переходим на met5

unlink och,met1,1

met5 advance 1

transfer ,met

GENERATE 18000 ;время моделирования 5 часов

TERMINATE 1

START 1

GPSS

olsheu — Mon, 26 Dec 2011 12:11:12 +0000

olsheu: отписался на почту

GPSS

DimanEWM — Mon, 26 Dec 2011 11:57:24 +0000

DimanEWM: Допускаю что ошибки есть... код взят с GPSS .. ребя очень надо откоментить, послде завтра уже экзамен, завтра надо сдать курсач

GPSS

olsheu — Mon, 26 Dec 2011 11:54:19 +0000

olsheu: Откуда Вы взяли цифры в блоках generate
Generate 30,25 - откуда взяли 30 и 25
Generate 70,5,,,1 - откуда 70 и 5
Generate 60,2,,100,2 - откуда 60 и 2

GPSS

DimanEWM — Mon, 26 Dec 2011 10:20:17 +0000

DimanEWM: Народ кто нито сможет откоментить прогу? блин очень надо завтра сдавать надо(
Вот прога :
Generate 30,25
queue CPU
seize display
advance 50,30
release display
seize CP
advance 100,50
release CP
depart CPU
advance 30,10
advance 60,20
savevalue 1+,1
terminate

Generate 70,5,,,1
queue CPU
seize display
advance 50,30
release display
preempt CP,PR
advance 100,50
return CP
depart CPU
advance 30,10
advance 60,20
savevalue 2+,1
terminate

Generate 60,2,,100,2
queue CPU
seize display
advance 50,30
release display
preempt CP,PR
advance 100,50
return CP
depart CPU
advance 30,10
advance 60,20
savevalue 3+,1
terminate

generate 12000
TERMINATE 1
start 1

Задание :
В специализированной вычислительной системе периодически выполняется три вида заданий, которые характеризуются уровнями приоритета: нулевым, первым и вторым. Каждый новый запуск задания оператор производит при помощи дисплея, работая на нем 50+-30 секунд. После запуска задания оно требует для своего выполнения 100+-50 секунд времени работы процессора, причем задания более высокого приоритета прерывают выполнение задач более низкого приоритета. Результаты обработки задания выводятся на печать без прерываний в течение 30+-10 секунд, после чего производится их анализ в течение 60+-20 секунд, и задание запускается снова. Можно считать, что при работе дисплея и при выводе результатов на печать процессор не используется.
Смоделировать процесс работы системы при условии, что задание второго уровня приоритета выполняется 100 раз. Подсчитать число циклов выполнения остальных заданий и определить коэффициенты загрузки технических средств системы.

GPSS

Erravielle — Sat, 17 Dec 2011 07:28:18 +0000

Erravielle: Или может быть кто-нибудь подскажет как реализовать несколько источников транзактов???

GPSS

Erravielle — Sat, 17 Dec 2011 05:33:29 +0000

Erravielle: Здравствуйте форумчане,
очень нужна помощь в моделировании ремонтных работ. GPSS недавно начал осваивать.

Задачка:

Два специалиста по ремонту обслуживают пять агрегатов, расположенных в механическом цехе завода. Неисправности возникают у каждого из агрегатов в соответствии с пуассоновским законом распределения вероятностей со средней частотой 3 неисправности в час. Продолжительности ремонтных работ в расчете на один агрегат распределены экспоненциально со средним временем, равным 15 мин.
Задание по моделированию:
1 Смоделировать работу по ремонту агрегатов в течение 8 часов.
2 Определить вероятность того, что оба механика окажутся незагруженными ремонтными работами.
3 Определить коэффициент загрузки каждого механика в течение 8 ч.

Я не прошу решить ее за меня, а прошу помочь разобраться. Мне хотя бы структурную схему процесса правильно составить или обобщенную схему моделирующего алгоритма.
Если здесь есть понимающие люди, прошу откликнуться )

P.S. а если примеры подобных программ подкинете, то вообще замечательно )))

GPSS

strk — Thu, 15 Dec 2011 21:56:13 +0000

strk: подскажите плз, как можно определить вероятность переполнения входных накопителей??

GPSS

Xapek88s — Thu, 15 Dec 2011 11:18:36 +0000

Xapek88s: РЕБЯЯЯЯЯЯТ можете пожалуйста проверить, и подправить? Завтра здавать курсач =(
Или вдруг у кого есть правильное решение - поделитесь, умоляю..

Система автоматизации проектирования (САПР) создана на базе ЭВМ, функционирующей в режиме множествен¬ного доступа. Пятеро инженеров-проектировщиков с помощью своих дисплеев одновременно и независимо проводят диалог с ЭВМ, определяя очередной вариант расчета. Каждый диалог состоит из 10 циклов ввода-вывода данных. Во время одного цикла происходит следующее: за 10 ± 5с инженер обдумывает и вводит текст строки; в течение 2 с работает процессор ЭВМ, подготавливая текст ответа; в течение 5 с текст ответа выводится на дисплей. После ввода 11-й строки начинается работа процессора по расчету конструкции и продолжается 30± 10 с. За 5 с результат расчета выводится на экран, после чего инженер в течение 15 ± 5 с анализирует его и начинает новый диалог. Операции по подготовке текста ответа имеют абсолютный приоритет над расчетными, т. е. прерывают выполнение последних.
Смоделировать процесс работы САПР при условии, что расчет вариантов конструкции повторяется 100 раз. Определить среднее время выполнения диалога и расчетных операций, а также коэффициент загрузки процессора.

Текст программы:
Generate 10,5; генерируются транзакты

Queue EVM; занятие очереди
Depart EVM; обеспечивает освобождение в очереди
Seize EVM; занятие устройства
DIS STORAGE 5;
ENTER DIS; вхождение транзакта в накопитель
Advance 2,0; задерживает транзакт на время 2,0
Advance 5,0; задерживает транзакт на время 5,0
Priority 1; присваивает входящему транзакту приоритет
Test E DIS,11,C; проверяет соотношение

C Advance 30,10; задерживает транзакт на время 30,10
Advance 5,0; задерживает транзакт на время 5,0
Advance 15,5; задерживает транзакт на время 15,5;
LEAVE DIS; освобождение памяти
Release EVM; освобождает усройство с 10 циклами
Transfer 10,T; изменяет направление движения транзактов согласно режиму САПР

T Terminate 1; уничтожение транзактов

start 100

Добавлено 15.12.11, 11:23
В тырнете вот такой вариант нашёл, он правильный вроде?..

010 SIMULATE
020 TAB1 TABLE M1,0,250,14
030 Q_TAB2 QTABLE Q_TAB2,10,10,20
040 TAB2 TABLE QX$Q_TAB2,25,5,19
050 MTRX MATRIX ,1,5
060 INITIAL MX$MTRX(1,1),0
070 INITIAL MX$MTRX(1,2),0
080 INITIAL MX$MTRX(1,3),0
090 INITIAL MX$MTRX(1,4),0
100 INITIAL MX$MTRX(1,5),0
110 INITIAL LS1,1
120 INITIAL LS2,1
130 INITIAL LS3,1
140 INITIAL LS4,1
150 INITIAL LS5,1
160 GENERATE 150,,,,1
170 ASSIGN 1,0
180 SPLIT 4,MET,1
190 MET GATE LS P1
200 LOGIC R P1
210 VVOD SEIZE P1
220 ADVANCE 10,5
230 RELEASE P1
240 MSAVEVALUE MTRX+,1,P1,1
250 TEST NE MX$MTRX(1,P1),11,RASCH
260 PREEMPT PROC
270 ADVANCE 2
280 RELEASE PROC
290 SEIZE P1
300 ADVANCE 5
310 RELEASE P1
320 TRANSFER ,VVOD
330 RASCH MSAVEVALUE MTRX,1,P1,0
340 TABULATE TAB1
350 PRIORITY 0
360 QUEUE Q_TAB2
370 SEIZE PROC
380 ADVANCE 30,10
390 TABULATE TAB2
400 RELEASE PROC
410 DEPART Q_TAB2
420 SEIZE P1
430 ADVANCE 5
440 RELEASE P1
450 ADVANCE 15,5
460 LOGIC S P1
470 SAVEVALUE PRC,FR$PROC
480 TERMINATE 1
490 START 100
500 WINDOW TABLES

GPSS

Candyman — Sun, 11 Dec 2011 14:46:44 +0000

Candyman: Помогите пожалуйста с GPSS моделью

Задание.
Распределенный банк данных системы сбора информации организован на базе ЭВМ, соединенных дуплексным каналом связи. Поступающий запрос обрабатывается на первой ЭВМ
и с вероятностью 50% необходимая информация обнаруживается на месте. В противном случае необходима посылка на вторую ЭВМ. Запросы поступают через каждые 10 ± 3 с. , первичная обработка запроса занимает 2 сек., выдача ответа требует 18 ± 2 с, передача по каналу связи занимает 3 сек. Временные характеристики первой ЭВМ аналогичны первой. Смоделировать прохождение 400 запросов. Определить необходимую ёмкость накопителей перед ЭВМ, обеспечивающую безотказную работу системы, и функцию распределения времени обслуживания заявки.

Вот что есть, но не работает:

Цитата

evm1 Storage 1
evm2 Storage 2

Generate 10, 3 ;3 сек
QUEUE OCH ;очередь на обслуживание
TEST G (R$evm1 + R$evm2),0 ;число свободных приборов> 0
TRANSFER BOTH, ,label2 ; если может занять место на первом приборе - занимает,
; Иначе на метку label2 и занимает там место
ENTER evm1
DEPART OCH
ADVANCE 2,0 ;время обработки заявки
LEAVE evm1
ADVANCE 2 ;ответ по перовму прибору
LEAVE evm1
TERMINATE
; Работа второго прибора
ADVANCE 3,0 ; Время на передачу заявки от 1-го прибора до 2-го
label2 ENTER evm2
DEPART OCH
ADVANCE 18,2 ;время обработки заявки
LEAVE evm2
ADVANCE 2 ;время ответа по второму прибору
LEAVE evm2
TERMINATE

GENERATE 400 ; для 400 заявок
TERMINATE 1
START 1

GPSS

SteAlzzer — Thu, 08 Dec 2011 09:21:40 +0000

SteAlzzer: и вот допустим есть код обработки очереди:

...

SetQueue QUEUE TrainQueue

GATE SNF Train,SetQueue

DEPART TrainQueue

TRANSFER ,EnterTheTrain

...

Он же по идее зациклиться и все. Как это сделать по человечестки?
Мне просто ничего в голову не приходит, кроме как сделать задержку какую-нибудь после проверки. Что-то типа:

...

SetQueue QUEUE TrainQueue

Check GATE SNF Train,GetQueueAwaiting

DEPART TrainQueue

TRANSFER ,EnterTheTrain

GetQueueAwaiting ADVANCE 1

TRANSFER ,Check

...

Но мне кажется это весьма некрасиво

GPSS

SteAlzzer — Thu, 08 Dec 2011 04:19:25 +0000

SteAlzzer: dimoon67, на сколько я понимаю, этот блок отвечает за общее время моделирования. Т.е. в моем листинге моделирование происходит в течении 480 единиц времени.
Я думаю, что тут возможна ошибка из-за того, что я неправильно организовал обработку очереди, т.к. как-то уж не очень выглядит логика этого куска кода.