getf("recuit.sci");
nv = 20;                      // nombre de villes
[villes,distances] = initialise(nv);
xset("window",0);
trace_parcours(villes);       // circuit initial
h = 0.6; u=17;                // parametres
[o,e] = recuit([1:nv],h,u);   // execution
trace_parcours(villes(o',:)); // circuit final
xset("window",1); xbasc(); 
x=[1:size(e,"*")];
plot2d(x,e);                  // energie


