1A,AuTYN]i PROMOD4.GLB{Gz???p_state0state10state20state30uu0vv0ww0size10size20size30qchoice0c10c20c30num10num20num30s_custs_reqprcust150I$@۶@2.57146.4286req150@N`@7552.5714 arrival_aream[@۶m@'''1q16019.580Edh@EU"INFINITEq26018.723i@iINFINITEq36019.715g@gINFINITEs1A A LCLCLC8F1s2A A PPP8F1s3A A TTT8F1p_q6010.861@L INFINITEE(2)INF10eE(7)INF120e & uu=U(.5,.5) ww=U(.5,.5)IF(uu = 1) THEN uu = 0IF(ww = 1) THEN ww = 0 IF(uu < 0.3) THEN s_cust = 1 + TRUNC(3*ww)IF((uu >= 0.3) AND (uu < 0.8)) THEN s_cust = 4 + TRUNC(3*ww) IF((uu >= 0.8) AND (uu < 0.95))  THEN s_cust = 7 + TRUNC(4*ww)IF (uu >= 0.95)! THEN s_cust = 11 + TRUNC(10*ww)c1=CONTENTS(q1)c2=CONTENTS(q2)c3=CONTENTS(q3)IF((c1 <= c2)AND(c1<=c3)) THEN size1 = 1 ELSE size1 = 0IF((c2<=c1)AND(c2<=c3)) THEN size2 = 1 ELSE size2 = 0IF((c3<=c1)AND(c3<=c2)) THEN size3 = 1 ELSE size3 = 0IF (size1 = 1) THEN qchoice = 1IF ((size2=1)AND(size1=0)) THEN qchoice = 2&IF ((size3=1)AND(size1=0)AND(size2=0)) THEN qchoice = 3IF qchoice = 1 THEN Route 1IF qchoice = 2 THEN Route 2IF qchoice = 3 THEN Route 3 uu=CLOCK()DISPLAY "arr " , uuDISPLAY "service " ,s_custDISPLAY "choice", qchoice qchoice=15Dg1 qchoice=2Af1>d1WAIT UNTIL state1=0state1=0hJf1WAIT UNTIL state2=0state2=0N1WAIT UNTIL state3=0state3=0R1 uu = CLOCK()DISPLAY "req ", uu uu=U(.5,.5)IF(uu=1) THEN uu=0s_req = 3+TRUNC(3*uu)DISPLAY "s_req= ", s_req vv=U(.5,.5)IF(vv<0.15) THEN {pr = 1 num1=num1+1 DISPLAY "num1 = ", num1}IF((vv>=0.15)AND(vv<0.6)) THEN  {pr=2 num2 = num2+1 DISPLAY "num2 = ", num2}IF(vv>=0.6) THEN  {pr=3 num3=num3+1 DISPLAY "num3 = ", num3}DISPLAY "pr_arr ", pr9WAIT UNTIL ((state1 = 1) OR (state2 = 1) OR (state3 = 1))IF state1 = 1 Then Route 10IF ((state1 <> 1) AND (state2 = 1)) THEN Route 2BIF ((state1 <> 1) AND (state2 <> 1) AND (state3 = 1)) THEN Route 3DISPLAY "pr_exit ", prDISPLAY "s_req_exit ", s_reqDISPLAY "state1 ",state1DISPLAY "state2 ", state2DISPLAY "state3 ", state3 uu=CLOCK()DISPLAY "pr_exit_time ", uustate1=1z1(state1=0)AND(state2=1)1$(state1=0)AND(state2=0)AND(state3=1)1state1=2 WAIT s_cust IF(num1>0) THEN state1 =1IF((num1=0)AND(num2>0) AND(CONTENTS(q1)<=2)) THEN state1 = 1IF((CONTENTS(q1)=0)AND (num1+ num2 + num3 >0)) THEN state1=1IF (state1 = 2) THEN state1=0DISPLAY "exit 1" uu=CLOCK()DISPLAY "time = " ,uuDISPLAY "s_cust", s_cust1state2=2 WAIT s_cust IF(num1>0) THEN state2=1IF((num1=0)AND(num2>0)AND (CONTENTS(q2)<=2)) THEN state2=1IF((CONTENTS(q2)=0) AND (num1 + num2 + num3 >0)) THEN state2=1IF (state2 = 2) THEN state2 = 0DISPLAY "exit2" uu=CLOCK()DISPLAY "time= ",uuDISPLAY "s_cust ", s_cust1state3=2 WAIT s_cust IF(num1>0) THEN state3=1IF((num1=0)AND(num2>0)AND (CONTENTS(q3)<=2)) THEN state3=1IF((CONTENTS(q3)=0) AND (num1 + num2 + num3 >0)) THEN state3=1IF (state3 = 2) THEN state3 = 0DISPLAY "exit3 " uu=CLOCK()DISPLAY "time= ", uuDISPLAY "s_cust",s_cust1 state1 = 2IF(pr=1) THEN num1= num1-1IF(pr=2) THEN num2=num2-1IF(pr=3) THEN num3=num3-1 WAIT s_req state1 = 0DISPLAY "r_exit1" uu=CLOCK()DISPLAY "time = ",uuDISPLAY "pr ", prDISPLAY "s_req ", s_req1 state2 = 2IF(pr=1) THEN num1=num1-1IF(pr=2) THEN num2=num2-1If(pr=3) THEN num3=num3-1 WAIT s_req state2 = 0DISPLAY "r_exit2" uu=CLOCK()DISPLAY "time= ", uuDISPLAY "pr ", prDISPLAY "s_req ", s_req1 state3 = 2IF(pr=1) THEN num1=num1-1IF(pr=2) THEN num2=num2-1IF(pr=3) THEN num3=num3-1 WAIT s_req state3 = 0DISPLAY "r_exit3" uu=CLOCK()DISPLAY "time= ", uuDISPLAY "pr " WAIT prDISPLAY "s_req ", s_req1!