Set puzzle: Difference between revisions

Content added Content deleted
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:=UH.cprod4("red green purple".split(), // cartesian product of 4 lists of lists
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;