sets i cop toplama noktaları /1*9/ u cop toplama aracları /1*3/ Alias (i,j,p); Parameter e(u) aracların bırım emısyon-mesafe oranı / 1 10 2 8 3 5/; parameter table d(i,j) dügümler arası mesaeler 1 2 3 4 5 6 7 8 9 1 140 100 30 110 60 80 100 130 2 140 150 120 40 100 120 110 140 3 100 150 90 100 40 20 80 80 4 30 120 90 80 30 50 70 100 5 110 40 100 80 60 80 70 100 6 60 100 40 30 60 20 40 70 7 80 120 20 50 80 20 60 90 8 100 110 80 70 70 40 60 30 9 130 140 80 100 100 70 90 30 ; table t(i,j) dügümler arası süreler 1 2 3 4 5 6 7 8 9 1 14 10 3 11 6 8 10 13 2 14 15 12 4 10 12 11 14 3 10 15 9 10 4 2 8 8 4 3 12 9 8 3 5 7 10 5 11 4 10 8 6 8 7 10 6 6 10 4 3 6 2 4 7 7 8 12 2 5 8 2 6 9 8 10 11 8 7 7 4 6 3 9 13 14 8 10 10 7 9 3 ; Parameter B(u) aracların baslangıc kapasıtesı / 1 2000 2 2500 3 3500 /; Parameter q(i) i noktasındakı cop mıktarı / 1 0 2 0 3 0 4 400 5 500 6 600 7 700 8 800 9 900 /; Parameter v(u,i,j) loop ((u,i,j), if( C(i,u)q(j), v(u,i,j)=1); ); scalar A baslangıc zamanı /0/ G bıtıs zamanı /480/ s cop yukleme suresı /20/; variables z; binary variables x(i,j,u); positive variables w(i,u); Equations amac, k1(u), k2(u), k21(u), k5(i,j,u), k51(i,u), k52(i,u), k3(p,u), k4(i,j,u), k6(j), k7(i,u), k8(i,j,u); amac..z=e=sum((u,i,j), x(i,j,u)*d(i,j)*e(u)); k1(u)..sum((j)$(ord(j) ge 4), x('1',j,u))=g=1; k2(u)..sum((i)$(ord(i) ge 4), x(i,'3',u))=g=1; k21(u)..x('3','1',u)=e=1; k5(i,j,u)$(ord(j) ge 4)..C(i,u)+q(j)*x(i,j,u)=e=C(j,u); k51(i,u)$(ord(i) ge 4)..C(i,u)=l=B(u); k52(i,u)$(ord(i) le 3)..C(i,u)=e=0; k3(p,u)$(ord(p) ge 2)..sum((i)$(ord(i) ne ord(p)), x(i,p,u)*v(u,i,p))=e=sum((j)$(ord(j) ne ord(p)),x(p,j,u)*v(u,p,j)); k4(i,j,u)$(ord(j) ne 2)..(x(i,j,u)*v(u,i,j)) + ((x(i,'2',u)+x('2',j,u))*(1-v(u,i,j)))=g=1; k6(j)$(ord(j) ge 4)..sum((u,i)$(ord(i) ne ord(j)), x(i,j,u))=l=1; k7(i,u)..w(i,u) + t(i,'3') + t('3','1')=l=G ; k8(i,j,u)..w(i,u)+ ((s + t(i,j))* x(i,j,u))=l=w(j,u); model Wastecol1/all/; Solve Wastecol1 using MINLP minimizing z; display z.l, x.l;