Anonymous user
Mind boggling card trick: Difference between revisions
m
→{{header|zkl}}: tweak comment
(→{{header|Haskell}}: Swapped to a more direct (recursive) formulation of threeStacks) |
m (→{{header|zkl}}: tweak comment) |
||
Line 637:
=={{header|zkl}}==
<lang zkl>cards:=[1..52].pump(List,"isEven","toInt").shuffle(); // red==1
stacks:=T(List(),List()); // black stack
blkStk,redStk := stacks;
foreach card in (cards){ stacks[card].append(__cardWalker.next()) }
| |||