Solve hanging lantern problem: Difference between revisions

Content added Content deleted
(→‎{{header|Julia}}: Correct treatment of duplicate column sizes; see talk page.)
(→‎{{header|Raku}}: Make verbose mode more verbose.)
Line 243: Line 243:
. unique;
. unique;


say +@sequences;
if ($verbose) {
if ($verbose) {
say "There are {+@sequences} possible takedown sequences:";
say "[$_]" for @sequences;
say "[$_]" for @sequences;
} else {
}</lang>
say +@sequences;
}
</lang>


{{Out}}
{{Out}}
Line 252: Line 255:
60
60
$ raku lanterns.raku --verbose 1 2 3
$ raku lanterns.raku --verbose 1 2 3
There are 60 possible takedown sequences:
60
[1,2,2,3,3,3]
[1,2,2,3,3,3]
[1,2,3,2,3,3]
[1,2,3,2,3,3]