Simulated annealing: Difference between revisions
Content added Content deleted
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; |
||