Simulated annealing: Difference between revisions
Content deleted Content added
SqrtNegInf (talk | contribs) Added Perl example |
SqrtNegInf (talk | contribs) m →{{header|Perl}}: oops, print statement |
||
Line 704: | Line 704: | ||
for my $k (0 .. $kmax-1) { |
for my $k (0 .. $kmax-1) { |
||
printf "k:%8u T:%4.1f Es: %3.1f\n" , $k, T($k, $kmax, $kT), Es(@s) |
|||
if $k % ($kmax/10) == 0; |
if $k % ($kmax/10) == 0; |
||