fork download
copy 
  1. ; GPSS World Sample File - SAMPLE1.GPS
  2. **********************************************************************
  3. *                                                                    *
  4. *              Barber Shop Simulation                                *
  5. *                                                                    *
  6. **********************************************************************
  7. ;         GENERATE  300,100             ;Create next customer.
  8. ;    	QUEUE     Barber              ;Begin queue time.
  9. ;   	SEIZE     Barber              ;Own or wait for barber.
  10. ;  	DEPART    Barber              ;End queue time.
  11. ;	ADVANCE   400,200             ;Haircut takes a few minutes.
  12. ;	RELEASE   Barber              ;Haircut done. Give up the barber.
  13. ;	TERMINATE 1                   ;Customer leaves.
  14. ;
  15.  
  16. SERV      STORAGE 1                             ;количество серверов
  17.  
  18. GENERATE  .465,FN$EXPON,,7000                   ;поступление заявок(2.15 заявок в секунду), всего 7000 заявок
  19.  
  20. QUEUE     ocher                                 ;занятие очереди на сервер
  21. ENTER     SERV                                  ;поступление заявки на сервер
  22. DEPART    ocher                                 ;уход из очереди
  23. ADVANCE   .408,FN$EXPON                         ;время обработки заявки(2.45 заявок в секунду)
  24. LEAVE   SERV                                  ;завершение обработки заявки на сервере
  25. TERMINATE
  26. GENERATE  3300
  27. TERMINATE 1
  28.  
  29. EXPON       FUNCTION     RN2,C24               ;описание функции EXPON
  30. 0,0/0.1,0.104/0.2,0.222/0.3,0.355/0.4,0.509
  31. 0.5,0.69/0.6,0.915/0.7,1.2/0.75,1.38/.8,1.6
  32. .84,1.83/.88,2.12/.9,2.3/.92,2.52/.94,2.81
  33. .95,2.99/.96,3.2/.97,3.5/.98,3.9/.99,4.6
  34. .995,5.3/.998,6.2/.999,7/.9998,8
  35.  
  36.  
Success #stdin #stdout #stderr 0.01s 5292KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
Standard output is empty
stderr
copy 
Error: near line 1: near "GPSS": syntax error
Error: near line 16: near "SERV": syntax error
https://ideone.com/gI0q9V
language:
SQLite (sqlite 3.27.2)
created:
4 days ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!