Simulated annealing: Difference between revisions
Content deleted Content added
SqrtNegInf (talk | contribs) m →{{header|Perl}}: oops, print statement |
SqrtNegInf (talk | contribs) m →{{header|Perl 6}}: moved line to follow relevant comment |
||
Line 779:
else { return (na + nb + nc + nd) - (a + b + c + d) }
}
my \s = my @s = flat 0, (1 ..^ cities).pick(*), 0;▼
# E(s0), initial state
▲my \s = my @s = flat 0, (1 ..^ cities).pick(*), 0;
my \E-min-global = my \E-min = my $s0 = Es(s);
|