function [x1,changex,l1,tabu]=sa_locationmove(x0,l0,tabu)
nu1=rand;
  if nu1>0.5
   [x1,changex,l1]=drop(x0,l0);
  else 
    [x1,changex,l1]=swap_location(x0,l0);
  end
% 滿足容量需求
 while  findintabu(x1,tabu)==1  %不滿足條件
          nu1=rand;  clear x1,l1;
            if nu1>0.5
                 [x1,changex,l1]=drop(x0,l0);
           else 
                [x1,changex,l1]=swap_location(x0,l0); 
           end
    end