Set puzzle: Difference between revisions
Content added Content deleted
m (→{{header|J}}: tidy) |
m (→{{header|zkl}}: update) |
||
Line 2,652: | Line 2,652: | ||
<lang zkl>const nDraw=9, nGoal=(nDraw/2); // Basic |
<lang zkl>const nDraw=9, nGoal=(nDraw/2); // Basic |
||
var [const] UH=Utils.Helpers; // baked in stash of goodies |
var [const] UH=Utils.Helpers; // baked in stash of goodies |
||
deck:= |
deck:=Walker.cproduct("red green purple".split(), // Cartesian product of 4 lists of lists |
||
"one two three".split(), // T(1,2,3) (ie numbers) also works |
"one two three".split(), // T(1,2,3) (ie numbers) also works |
||
"oval squiggle diamond".split(), |
"oval squiggle diamond".split(), |
||
"solid open striped".split()); |
"solid open striped".split()).walk(); |
||
reg draw,sets,N=0; |
reg draw,sets,N=0; |
||
do{ N+=1; |
do{ N+=1; |