VIII. Appendix of Source Codes [All]

 

 A. Computer Manufacturing Model

0$ CREATE, size:expo(97),norm(50,2);
46$ COUNT: totalin,1;
1$ ASSIGN: arrtime=tnow: picture=order;
10$ GROUP, arrtime:size,Last;
12$ COUNT: order#,1; Configuration ASSIGN: ProcessorType=DISC(0.33,1,0.66,2,1.0,3): Board#=DISC(0.5,1,1.0,2): monitor=DISC(0.5,1,1.0,2);
23$ QUEUE, Order_Arrq;
24$ SCAN: nq(OrderProc_q)==0;
13$ FINDJ, 1,2:min(nr(assemblers(j))+nq(lineqs(j)));
14$ ASSIGN: lineqnum=j;OrderProc_qlbl QUEUE, OrderProc_q;
15$ SCAN: nq(lineqs(lineqnum))==0;
11$ SPLIT: lineqnum, *;
48$ ASSIGN: picture=cabinet;
2$ QUEUE, lineqs(lineqnum);
3$ SEIZE, 1: assemblers(lineqnum),1;
52$ BRANCH, 1: If,lineqnum==1,d1,Yes: If,lineqnum==2,d2,Yes;
d1 DELAY: norm(12,1);
4$ RELEASE: assemblers(lineqnum),1;
9$ STATION, linestn;
5$ ROUTE: 0,electricalstn;
d2 DELAY: norm(11,2):NEXT(4$);
6$ STATION, departstn;
7$ TALLY: systime,tnow-arrtime,1;
50$ BRANCH, 1: If,lineqnum==1,8$,Yes: Else,51$,Yes;
8$ COUNT: Line1total,1:NEXT(OrderType);
OrderType BRANCH, 1: If,ProcessorType==1,P1,Yes: If,ProcessorType==2,P2,Yes: Else,P3,Yes;
P1 BRANCH, 1: If,Board#==1,p1b1lbl,Yes: Else,p1b2lbl,Yes;
p1b1lbl BRANCH, 1: If,monitor==1,p1b1m1lbl,Yes: Else,p1b1m2lbl,Yes;
p1b1m1lbl COUNT: p1b1m1,1;
47$ DISPOSE;
p1b1m2lbl COUNT: p1b1m2,1:NEXT(47$);
p1b2lbl BRANCH, 1: If,monitor==1,p1b2m1lbl,Yes: Else,p1b2m2lbl,Yes;
p1b2m1lbl COUNT: p1b2m1,1:NEXT(47$);
p1b2m2lbl COUNT: p1b2m2,1:NEXT(47$);
P2 BRANCH, 1: If,Board#==1,p2b1lbl,Yes: Else,p2b2lbl,Yes;
p2b1lbl BRANCH, 1: If,monitor==1,p2b1m1lbl,Yes: Else,p2b1m2lbl,Yes;
p2b1m1lbl COUNT: p2b1m1,1:NEXT(47$);
p2b1m2lbl COUNT: p2b1m2,1:NEXT(47$);
p2b2lbl BRANCH, 1: If,monitor==1,p2b2m1lbl,Yes: Else,p2b2m2lbl,Yes;
p2b2m1lbl COUNT: p2b2m1,1:NEXT(47$);
p2b2m2lbl COUNT: p2b2m2,1:NEXT(47$);
P3 BRANCH, 1: If,Board#==1,p3b1lbl,Yes: Else,p3b2lbl,Yes;
p3b1lbl BRANCH, 1: If,monitor==1,p3b1m1lbl,Yes: Else,p3b1m2lbl,Yes;
p3b1m1lbl COUNT: p3b1m1,1:NEXT(47$);
p3b1m2lbl COUNT: p3b1m2,1:NEXT(47$);
p3b2lbl BRANCH, 1: If,monitor==1,p3b2m1lbl,Yes: Else,p3b2m2lbl,Yes;
p3b2m1lbl COUNT: p3b2m1,1:NEXT(47$);
p3b2m2lbl COUNT: p3b2m2,1:NEXT(47$);
51$ COUNT: line2total,1:NEXT(OrderType);
16$ STATION, electricalstn;
22$ QUEUE, electricalqs(lineqnum);
17$ SEIZE, 1: electrical_lines(lineqnum),1;
18$ DELAY: norm(5,1);
19$ RELEASE: electrical_lines(lineqnum),1;
20$ STATION, electrical_endstn;
21$ ROUTE: 0.5,loadstn;
25$ STATION, loadstn;
37$ QUEUE, loadqs(lineqnum);
27$ SEIZE, 1: loads(lineqnum),1;
28$ DELAY: norm(15,2);
29$ RELEASE: loads(lineqnum),1;
30$ STATION, loadendstn;
31$ ROUTE: 0.5,finalstn;
26$ STATION, finalstn;
38$ QUEUE, finalqs(lineqnum);
35$ SEIZE, 1: finals(lineqnum),1;
36$ DELAY: norm(5,1);
32$ RELEASE: finals(lineqnum),1;
33$ STATION, finalendstn;
34$ ROUTE: 0.5,packagingstn;
39$ STATION, packagingstn;
45$ QUEUE, packqs(lineqnum);
43$ SEIZE, 1: packs(lineqnum),1;
44$ DELAY: norm(5,1);
40$ RELEASE: packs(lineqnum),1;
49$ ASSIGN: picture=computer;
41$ STATION, pack_endstn;
42$ ROUTE: 0.5,departstn;

ATTRIBUTES: lineqnum: arrtime: Board#: ProcessorType: monitor;

QUEUES: OrderProc_q,FirstInFirstOut: load2q,FirstInFirstOut: electricalq1,FirstInFirstOut: load1q,FirstInFirstOut: electricalq2,FirstInFirstOut: Order_Arrq,FirstInFirstOut: lineq1,FirstInFirstOut: lineq2,FirstInFirstOut: final2q,FirstInFirstOut: final1q,FirstInFirstOut: packq1,FirstInFirstOut: packq2,FirstInFirstOut;

PICTURES: cabinet: computer: order;

RESOURCES: electrical_line1,Capacity(1,),-,Stationary: electrical_line2,Capacity(1,),-,Stationary: pack1,Capacity(1,),-,Stationary: pack2,Capacity(1,),-,Stationary: load1,Capacity(1,),-,Stationary: load2,Capacity(1,),-,Stationary: assembler1,Capacity(1,),-,Stationary: assembler2,Capacity(1,),-,Stationary: final1,Capacity(1,),-,Stationary: final2,Capacity(1,),-,Stationary;

STATIONS: electricalstn: electrical_endstn: finalendstn: pack_endstn: OrderProc_stn: loadendstn: finalstn: Order_Arrstn: departstn: packagingstn: loadstn: linestn;

COUNTERS: line2total,,Replicate: line1total,,Replicate: order#,,Replicate: p1b1m1,,Replicate: p1b1m2,,Replicate: p1b2m1,,Replicate: p2b1m1,,Replicate: totalin,,Replicate: p1b2m2,,Replicate: p2b1m2,,Replicate: p2b2m1,,Replicate: p3b1m1,,Replicate: p2b2m2,,Replicate: p3b1m2,,Replicate: p3b2m1,,Replicate: p3b2m2,,Replicate;

TALLIES: systime;

DSTATS: nc(p1b1m1),type1: nc(order#),Number of Orders: nq(lineq2),numinlineq2: nc(line2total),Num of comp from line2: nc(line1total),Num of comp from line1: nr(assembler2)*100,assem2: nr(final2)*100: nq(lineq1),numinlineq1: nr(assembler1)*100,assem1: nr(final1)*100: nr(load2)*100: nr(electrical_line2)*100: nr(load1)*100: nr(electrical_line1)*100: nc(p3b2m2),type12: nc(p3b2m1),type11: nc(p3b1m2),type10: nc(p2b2m2),type8: nc(p3b1m1),type9: nc(p2b2m1),type7: nc(p2b1m2),type6: nc(p1b2m2),type4: nq(OrderProc_q)+nq(Order_Arrq),average orders in queue: nc(p2b1m1),type5: nc(p1b2m1),type3: nc(p1b1m2),type2;

REPLICATE, 1,0.0,1000,Yes,Yes,0.0;

EXPRESSIONS: size,unif(5,40);

SETS: electricalqs,electricalq1,electricalq2: electrical_lines,electrical_line1,electrical_line2: packs,pack1,pack2: lineqs,lineq1,lineq2: loadqs,load1q,load2q: loads,load1,load2: assemblers,assembler1,assembler2: packqs,packq1,packq2: finals,final1,final2: finalqs,final1q,final2q;

Back to Table of Contents

 

 B. Automobile Manufacturing Model

0$ CREATE, 1:0.53 + 0.471 * BETA(1.44, 0.24):MARK(TIMEIN);
147$ BRANCH, 1: With,0.25,148$,Yes: With,0.25,149$,Yes: With,0.5,150$,Yes;
148$ ASSIGN: jobtype=1;
151$ COUNT: WAGONS,1;
1$ ASSIGN: NS=1: PICTURE=CHASIS2: M=ENTER;
2$ ROUTE: 1,SEQ;
149$ ASSIGN: jobtype=2;
152$ COUNT: HARDTOPS,1:NEXT(1$);
150$ ASSIGN: jobtype=3;
153$ COUNT: SEDANS,1:NEXT(1$);
3$ STATION, STATIONSET;
4$ ASSIGN: SETINDEX=MEMIDX(STATIONSET,M);
5$ QUEUE, QUEUESET(SETINDEX);
6$ SEIZE, 1: RESOURCESET(SETINDEX),1;
8$ BRANCH, 1: If,JOBTYPE==3,7$,Yes: Else,9$,Yes;
7$ DELAY: OPTIME;
10$ RELEASE: RESOURCESET(SETINDEX),1;
11$ ROUTE: 1,SEQ;
9$ DELAY: WORKTIME:NEXT(10$);
12$ STATION, EXITSYSTEM;
13$ TALLY: T1,INT(TIMEIN),1;
145$ COUNT: TOTALCARS,1;
146$ DISPOSE;
14$ CREATE, 1:0.53 + 0.471 * BETA(1.44, 0.24);
19$ ASSIGN: PICTURE=CHASIS1;
15$ STATION, SG1;
16$ ROUTE: 1,SG2;
18$ STATION, SG2;
20$ QUEUE, QG1;
21$ SEIZE, 1: RG1,1;
17$ DELAY: 0.52 + 0.471 * BETA(1.44, 0.24);
22$ RELEASE: RG1,1;
23$ DISPOSE;
24$ CREATE, 1:0.53 + 0.471 * BETA(1.44, 0.24);
132$ BRANCH, 1: If,TNOW>=1.05,29$,Yes: Else,133$,Yes;
29$ ASSIGN: PICTURE=TYRE;
25$ STATION, SG3;
26$ ROUTE: 0.2,SG4;
133$ DISPOSE;
28$ STATION, SG4;
30$ QUEUE, QG2;
31$ SEIZE, 1: RG2,1;
27$ DELAY: 0.52 + 0.471 * BETA(1.44, 0.24);
32$ RELEASE: RG2,1:NEXT(23$);
33$ CREATE, 1:0.53 + 0.471 * BETA(1.44, 0.24);
134$ BRANCH, 1: If,TNOW>=2.7,38$,Yes: Else,133$,Yes;
38$ ASSIGN: PICTURE=ENG;
34$ STATION, SG5;
35$ ROUTE: 0.3,SG6;
37$ STATION, SG6;
39$ QUEUE, QG3;
40$ SEIZE, 1: RG3,1;
36$ DELAY: 0.52 + 0.471 * BETA(1.44, 0.24);
41$ RELEASE: RG3,1:NEXT(23$);
42$ CREATE, 1:0.53 + 0.471 * BETA(1.44, 0.24);
135$ BRANCH, 1: If,TNOW>=3.5,47$,Yes: Else,133$,Yes;
47$ ASSIGN: PICTURE=GEARB;
43$ STATION, SG7;
44$ ROUTE: 0.3,SG8;
46$ STATION, SG8;
48$ QUEUE, QG4;
49$ SEIZE, 1: RG4,1;
45$ DELAY: 0.52 + 0.471 * BETA(1.44, 0.24);
50$ RELEASE: RG4,1:NEXT(23$);
51$ CREATE, 1:0.53 + 0.471 * BETA(1.44, 0.24);
136$ BRANCH, 1: If,TNOW>=4.5,56$,Yes: Else,133$,Yes;
56$ ASSIGN: PICTURE=RADIATOR1;
52$ STATION, SG9;
53$ ROUTE: 0.3,SG10;
55$ STATION, SG10;
57$ QUEUE, QG5;
58$ SEIZE, 1: RG5,1;
54$ DELAY: 0.52 + 0.471 * BETA(1.44, 0.24);
59$ RELEASE: RG5,1:NEXT(23$);
60$ CREATE, 1:0.53 + 0.471 * BETA(1.44, 0.24);
137$ BRANCH, 1: If,TNOW>=5.5,65$,Yes: Else,133$,Yes;
65$ ASSIGN: PICTURE=SEAT;
61$ STATION, SG11;
62$ ROUTE: 0.3,SG12;
64$ STATION, SG12;
66$ QUEUE, QG6;
67$ SEIZE, 1: RG6,1;
63$ DELAY: 0.52 + 0.471 * BETA(1.44, 0.24);
68$ RELEASE: RG6,1:NEXT(23$);
69$ CREATE, 1:0.53 + 0.471 * BETA(1.44, 0.24);
138$ BRANCH, 1: If,TNOW>=7.0,74$,Yes: Else,133$,Yes;
74$ ASSIGN: PICTURE=ELECTRICALSTUFF1;
70$ STATION, SG13;
71$ ROUTE: 0.3,SG14;
73$ STATION, SG14;
75$ QUEUE, QG7;
76$ SEIZE, 1: RG7,1;
72$ DELAY: 0.52 + 0.471 * BETA(1.44, 0.24);
77$ RELEASE: RG7,1:NEXT(23$);
78$ CREATE, 1:0.53 + 0.471 * BETA(1.44, 0.24);
139$ BRANCH, 1: If,TNOW>=8.0,83$,Yes: Else,133$,Yes;
83$ ASSIGN: PICTURE=MAINBODY2;
79$ STATION, SG15;
80$ ROUTE: 0.3,SG16;
82$ STATION, SG16;
84$ QUEUE, QG8;
85$ SEIZE, 1: RG8,1;
81$ DELAY: 0.52 + 0.471 * BETA(1.44, 0.24);
86$ RELEASE: RG8,1:NEXT(23$);
87$ CREATE, 1:0.53 + 0.471 * BETA(1.44, 0.24);
140$ BRANCH, 1: If,TNOW>=9.0,92$,Yes: Else,133$,Yes;
92$ ASSIGN: PICTURE=WINDSHIELD1;
88$ STATION, SG17;
89$ ROUTE: 0.3,SG18;
91$ STATION, SG18;
93$ QUEUE, QG9;
94$ SEIZE, 1: RG9,1;
90$ DELAY: 0.52 + 0.471 * BETA(1.44, 0.24);
95$ RELEASE: RG9,1:NEXT(23$);
96$ CREATE, 1:0.53 + 0.471 * BETA(1.44, 0.24);
141$ BRANCH, 1: If,TNOW>=10.0,101$,Yes: Else,133$,Yes;
101$ ASSIGN: PICTURE=WIPER1;
97$ STATION, SG19;
98$ ROUTE: 0.3,SG20;
100$ STATION, SG20;
102$ QUEUE, QG10;
103$ SEIZE, 1: RG10,1;
99$ DELAY: 0.52 + 0.471 * BETA(1.44, 0.24);
104$ RELEASE: RG10,1:NEXT(23$);
105$ CREATE, 1:0.53 + 0.471 * BETA(1.44, 0.24);
142$ BRANCH, 1: If,TNOW>=11.0,110$,Yes: Else,23$,Yes;
110$ ASSIGN: PICTURE=DOORS1;
106$ STATION, SG21;
107$ ROUTE: 0.3,SG22;
109$ STATION, SG22;
111$ QUEUE, QG11;
112$ SEIZE, 1: RG11,1;
108$ DELAY: 0.52 + 0.471 * BETA(1.44, 0.24);
113$ RELEASE: RG11,1:NEXT(23$);
114$ CREATE, 1:0.53 + 0.471 * BETA(1.44, 0.24);
143$ BRANCH, 1: If,TNOW>=12.5,119$,Yes: Else,23$,Yes;
119$ ASSIGN: PICTURE=BONNET1;
115$ STATION, SG23;
116$ ROUTE: 0.3,SG24;
118$ STATION, SG24;
120$ QUEUE, QG12;
121$ SEIZE, 1: RG12,1;
117$ DELAY: 0.52 + 0.471 * BETA(1.44, 0.24);
122$ RELEASE: RG12,1:NEXT(23$);
123$ CREATE, 1:0.53 + 0.471 * BETA(1.44, 0.24);
144$ BRANCH, 1: If,TNOW>=13.0,128$,Yes: Else,23$,Yes;
128$ ASSIGN: PICTURE=FINISHING1;
124$ STATION, SG25;
125$ ROUTE: 0.3,SG26;
127$ STATION, SG26;
129$ QUEUE, QG13;
130$ SEIZE, 1: RG13,1;
126$ DELAY: 0.52 + 0.471 * BETA(1.44, 0.24);
131$ RELEASE: RG13,1:NEXT(23$);

PROJECT, manufacturing of cars,SAGAR SHINDE,03/19/2000,Yes;

ATTRIBUTES: TIMEIN: SETINDEX: QNUM: WORKTIME: OPTIME: JOBTYPE;

VARIABLES: switch(2),1,2: MEAN(3),.0225,.0225,.021: C(3),.23,.23,.11: STD(3),.00964,.00964,.00357;

QUEUES: q1,FirstInFirstOut: Q2,FirstInFirstOut: Q3,FirstInFirstOut: Q4,FirstInFirstOut: Q5,FirstInFirstOut: QG10,FirstInFirstOut: Q6,FirstInFirstOut: QG11,FirstInFirstOut: Q7,FirstInFirstOut: QG1,FirstInFirstOut: QG12,FirstInFirstOut: Q8,FirstInFirstOut: QG2,FirstInFirstOut: QG13,FirstInFirstOut: Q9,FirstInFirstOut: QG3,FirstInFirstOut: QG4,FirstInFirstOut: Q10,FirstInFirstOut: QG5,FirstInFirstOut: Q11,FirstInFirstOut: QG6,FirstInFirstOut: Q12,FirstInFirstOut: QG7,FirstInFirstOut: Q13,FirstInFirstOut: QG8,FirstInFirstOut: QG9,FirstInFirstOut;

PICTURES: CAR2: GEARB: body: RAG20: bonnet1: RAG10: RAG11: rag: electricalstuff1: ELECTRICALSTUFF2: ENG1: SEAT: RADIATOR10: windshield1: CHASIS10: MAINBODY20: CHASIS11: TYRE: CHASIS12: SEAT1: wiper1: WIPER2: RADIATOR1: AXLETYRES: ENG: RAG100: AXLETYRES1: rag1: rag2: CHASIS1: rag3: chasis2: doors1: GEARB1: rag4: finishing1: mainbody1: CAR1: MAINBODY2: car: chasis;

RESOURCES: RG9,Capacity(1,),-,Stationary: e,Capacity(1,),-,Stationary: f,Capacity(1,),-,Stationary: w,Capacity(1,),-,Stationary: at,Capacity(1,),-,Stationary: RG10,Capacity(1,),-,Stationary: mb,Capacity(1,),-,Stationary: RG11,Capacity(1,),-,Stationary: RG12,Capacity(1,),-,Stationary: DL,Capacity(1,),-,Stationary: RG13,Capacity(1,),-,Stationary: CL,Capacity(1,),-,Stationary: RG1,Capacity(1,),-,Stationary: wp,Capacity(1,),-,Stationary: SL,Capacity(1,),-,Stationary: RG2,Capacity(1,),-,Stationary: RG3,Capacity(1,),-,Stationary: gb,Capacity(1,),-,Stationary: RG4,Capacity(1,),-,Stationary: RG5,Capacity(1,),-,Stationary: es,Capacity(1,),-,Stationary: r,Capacity(1,),-,Stationary: RG6,Capacity(1,),-,Stationary: b,Capacity(1,),-,Stationary: RG7,Capacity(1,),-,Stationary: RG8,Capacity(1,),-,Stationary;

STATIONS: WINDSHIELD: SG8: DOORS: SG9: ENGINE: ENTER: SG20: SG10: SG21: FINISHING: WIPER: GEARBOX: SG11: SG22: SG12: SG23: ELECTRICALSTUFF: SG24: SG13: MAINBODY: SG25: SG14: SG26: SG15: SEATS: RADIATOR: SG1: SG16: BONNET: SG2: SG17: SG3: SG18: EXITSYSTEM: SG4: SG19: SG5: SG6: AXLETYRE: CHASSIS: SG7;

SEQUENCES: 1,BAG,chassis,optime=0.11+logn(0.021,0.00357),worktime=norm(0.299,0.00736)&axletyre,PICTURE=CHASIS,optime= 0.11+logn(0.021,0.00357),worktime=norm(0.299,0.00736)&engine,PICTURE=AXLETYRES,optime=0.11+logn(0.021,0.00357), worktime=norm(0.299,0.0736)&gearbox,PICTURE=rag,optime=0.11+logn(0.021,0.00357),worktime=norm(0.299,0.00736)& radiator,PICTURE=rag2,optime=0.06+logn(0.0194,0.00462),worktime=0.13+weib(0.0211,5.65)&seats,PICTURE=rag1,optime= 0.13+weib(0.0211,5.65),worktime=0.03+weib(0.0205,5.51)&electricalstuff,PICTURE=rag3,optime=0.13+weib(0.0211,5.65), worktime=norm(0.299,0.00736)&mainbody,PICTURE=rag4,optime=0.04+0.03*beta(15.6,10.5),worktime= 0.18+logn(0.0243,0.0091)&windshield,PICTURE=BODY,optime=0.06+logn(0.0194,0.00462),worktime=0.13+weib(0.0211,5.65)& wiper,PICTURE=BODY,optime=0.03+weib(0.0205,5.51),worktime=0.03+weib(0.0205,5.51)&doors,PICTURE=BODY,optime= 0.06+logn(0.0194,0.00462),worktime=0.13+weib(0.0211,5.65)&bonnet,PICTURE=BODY,optime=0.06+logn(0.0194,0.00462), worktime=0.13+weib(0.0211,5.65)&finishing,PICTURE=BODY,optime=0.04+0.03*beta(15.6,10.5),worktime= 0.09+logn(0.0113,0.00275)&EXITSYSTEM,PICTURE=CAR;

COUNTERS: TOTALCARS,,Replicate: SEDANS,,Replicate: WAGONS,,Replicate: HARDTOPS,,Replicate;

TALLIES: T1;

DSTATS: NR(B)*100: NR(AT)*100: NR(R)*100: NR(WP)*100: NR(SL)*100: NR(ES)*100: NR(GB)*100: NR(CL)*100: NR(MB)*100: NR(DL)*100: NR(W)*100: NR(F)*100: NR(E)*100;

REPLICATE, 1,0.0,480,Yes,Yes,0.0;

SETS: QUEUESET,Q1,Q2,Q3,Q4,Q5,Q6,Q7,Q8,Q9,Q10,Q11,Q12,Q13: RESOURCESET,CL,AT,E,GB,R,SL,ES,MB,W,WP,DL,B,F: stationset,chassis,axletyre,engine,gearbox,radiator,seats,electricalstuff,mainbody,windshield,wiper,doors,bonnet, finishing;

Back to Table of Contents

 

 C. Transportation Model

0$ CREATE, 1:0.83+ 0.471 * BETA(1.44, 0.24):MARK(TIMEIN);
38$ BRANCH, 1: If,TNOW>150,39$,Yes: Else,8$,Yes; 39$ DISPOSE;
8$ ASSIGN: PICTURE=CAR;
7$ STATION, s1;
5$ ROUTE: 6,s2;
6$ STATION, S2;
1$ QUEUE, Q1;
2$ SEIZE, 1: R1,1; 3$ DELAY: 0.0032 + 0.471 * BETA(1.44, 0.24);
4$ RELEASE: R1,1;
40$ STATION, s5;
42$ ROUTE: 30,s6;
13$ STATION, WORKSTATION;
14$ DELAY: 2.0;
15$ FREE: TRUCK1;
43$ SPLIT: *;
35$ COUNT: C1,1;
34$ BRANCH, 1: If,NC(C1)>36,36$,Yes: Else,37$,Yes; 36$ DISPOSE;
37$ ASSIGN: PICTURE=TRUCK;
25$ STATION, s3;
23$ ROUTE: 1,s4;
24$ STATION, S4;
22$ QUEUE, Q2;
26$ SEIZE, 1: R2,1;
27$ DELAY: 0.0032 + 0.471 * BETA(1.44, 0.24);
28$ RELEASE: R2,1;
29$ ASSIGN: M=ENTER1;
18$ QUEUE, SHIPQ;
21$ GROUP: 36,Last;
19$ REQUEST, 1:SHIP1(SDS),1.5,ENTER1;
20$ DELAY: 45;
32$ TRANSPORT: SHIP1,WORKSTATION1,1.5;
33$ STATION, WORKSTATION1;
30$ SPLIT: *;
44$ TALLY: T1,INT(TIMEIN),1;
31$ DISPOSE;
41$ STATION, s6;
16$ ASSIGN: M=ENTER;
9$ QUEUE, TRUCKQ;
17$ GROUP: 30,Last;
10$ REQUEST, 1:TRUCK1(SDS),1.5,ENTER;
11$ DELAY: 2.0;
12$ TRANSPORT: TRUCK1,WORKSTATION,1.5;

ATTRIBUTES: TIMEIN;

SCHEDULES: z1,0*100,1*480: Z2,0*130,1*350;

QUEUES: SHIPQ,FirstInFirstOut: q1,FirstInFirstOut: Q2,FirstInFirstOut: TRUCKQ,FirstInFirstOut;

PICTURES: TRUCK: car;

RESOURCES: R1,Schedule(z1,Ignore),-,Stationary: R2,Schedule(1,Ignore),-,Stationary;

STATIONS: 1,s1: 2,s2: S3: ENTER: S4: s5: s6: SG: SG1: WORKSTATION1: WORKSTATION: ENTER1;

DISTANCES: SHIP1MAP,ENTER1-WORKSTATION1-30,SG1-ENTER1-10: TRUCK1MAP,ENTER-WORKSTATION-30,SG-ENTER-10;

TRANSPORTERS: SHIP1,1,Distance(SHIP1MAP),1.5---,Station(SG1)-Active: TRUCK1,10,Distance(TRUCK1MAP),1.50---,Station(SG)-Active;

COUNTERS: C1,,Replicate;

TALLIES: T1;

DSTATS: NR(R1)*3*100;

REPLICATE, 1,0.0,270,Yes,Yes,0.0;

Back to Table of Contents