x=[ 24399.590296639882581075653433800, 23712.790087948884320212528109550, 22618.995555551806319272145628929, 22297.884686486595455789938569069, 22128.230722577744018053635954857, 21719.815654735539283137768507004, 21587.065041518435464240610599518, 21368.914124218230426777154207230, 21117.032004308723116992041468620, 21018.582059241343813482671976089, 20766.699939331840141676366329193, 20419.747079433192993747070431709, 20348.460673141806182684376835823, 19772.468454482132074190303683281, 19286.050510775770817417651414871, 18794.168390866263507632538676262, 18449.798897460110310930758714676, 18377.660738007714826380833983421, 18034.118208943356876261532306671, 18006.447376724674541037529706955, 17680.285367364267585799098014832, 17664.925701112199021736159920692, 17021.758863451457727933302521706, 17021.758863451457727933302521706, 16944.393699856522289337590336800, 16927.155252213880885392427444458, 16868.241564150095655350014567375, 16847.086757511886389693245291710, 16847.086757511886389693245291710, 16843.062456037012452725321054459, 16831.754463902710995171219110489, 16797.151757167124742409214377403, 16752.492792313943937188014388084, 16749.833599823607073631137609482, 16749.833599823607073631137609482, 16745.091792038674611831083893776, 16745.091792038674611831083893776, 16715.257806492874806281179189682, 16696.194348822500614915043115616, 16696.194348822500614915043115616, 16664.656891076978354249149560928, 16664.656891076978354249149560928, 16641.236242129889433272182941437, 16641.236242129889433272182941437, 16636.152091801388451131060719490, 16627.046982419127743924036622047, 16627.046982419127743924036622047, 16619.502968642977066338062286377, 16606.851766400883207097649574280, 16602.575100419573573162779211998, 16587.822092048936610808596014977]
length(x)
global demand;
global customer;
global depot;
    v=[3    12    10
     3     5    14
     1    13     3
     3     9     6
     3    15     8
     1    11     4
     3     1     7
     3     2     0];
l=[2     2     2     2     2     2     2     1];

z=zeros(depot,1);

for i=1:length(l)
    z(v(i,1))=1;
 
  x1(1)=demand(v(i,1)+customer,1);
  y1(1)=demand(v(i,1)+customer,2);
  k=2;
  while k<=l(i)+1
      x1(k)=demand(v(i,k),1);
       y1(k)=demand(v(i,k),2);
      k=k+1;
  end
  x1(l(i)+2)=demand(v(i,1)+customer,1);
  y1(l(i)+2)=demand(v(i,1)+customer,2);
  x1
  y1
      line(x1,y1);
      clear x1;
      clear y1;
end
for j=1:depot
    if z(j)==1
        plot(demand(j+customer,1),demand(j+customer,2