function str=Tools(X0)
ss=[];
  for k=1:length(X0)
     ss=[ss, num2str(X0(k))];
     ss=[ss, ','];
  end
  str=ss;
end