function dist = recoz_caixeiro(matdist,cidin) 
% a ideia eh: eu procuro a cidade com a menor distância no início. Posteriormente 


ntmax = 20;				% numero máximo de ciclos de resfriamento
nxmax = 100;			% numero máximo de iteracoes em cada temperatura
Tin = 100;				% temperatura incial
alfa = 0.85;			% alfa (T(k+1) = alfa*T(k))

ne = 0;						% numero de execucoes do algoritmo
nc = length(matdist); 	% numero de variaveis independentes

% a energia inicial e a distancia entre a cidade inicial e uma cidade aleatória
rota = cidin;
dist = matdist(:,cidin);
[dism,pcid] = min(dist);
rota = [rota pcid];

while ne<nemax
   ne = ne + 1;
   nt = 0;					% numero de ciclos de resfriamento inicial
   nx = 0;					% numero inicial de iteracoes em cada temperatura   
   
   x = x0;
   T = Tin;
   
   while nt<ntmax						% criterio de parada - numero de ciclos de resfriamento
      nt = nt + 1;
      nx = 0;
      
      while nx<nxmax					% numero de iteracoes em cada temperatura
         nx = nx + 1;   
         
         
         
         
      end
      
   end
   
end


function nmat = remlin(mat,lin)

nlin = size(mat,1);

if lin == 1
   nmat = mat(2:end,:);     
elseif lin == nlin
   nmat = mat(1:end-1,:);         
else
   nmat = mat([1:lin-1,lin+1:end],:);  
end
