aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

September Morn Update

Browse source
This commit is contained in:
Ingy döt Net 2019-09-12 10:33:56 -07:00
parent 4e2d22a71d
commit aac6731f2c
6856 changed files with 141342 additions and 21127 deletions
Download patch file Download diff file Expand all files Collapse all files

7
Task/N-queens-problem/Perl/n-queens-problem.pl
View file

@ -33,9 +33,8 @@ sub try_column {
}
}
$board_size = 12; # takes a minute or so, 14,200 solutions
$board_size = 12;
try_column(0);
local $" = "\n";
print @solutions;
print "total ", scalar(@solutions), " solutions\n";
#print for @solutions; # un-comment to see all solutions
print "total " . @solutions . " solutions\n";