Set puzzle: Difference between revisions

Content added Content deleted

Inline

@@ Line 1,504: / Line 1,504: @@
    .
 .
-proc prcards cards[] . .
+proc printcards cards[] . .
    for card in cards[]
       card2attr card attr[]
@@ Line 1,514: / Line 1,514: @@
    print ""
 .
-proc sets . cards[] set[] .
+proc getsets . cards[] set[] .
    set[] = [ ]
    for i to len cards[]
@@ Line 1,549: / Line 1,549: @@
          len pack[] -1
       .
-      sets cards[] set[]
+      getsets cards[] set[]
       until len set[] = 3 * nsets
    .
    print "Cards:"
-   prcards cards[]
+   printcards cards[]
    print "Sets:"
    for i = 1 step 3 to 3 * nsets - 2
-      prcards [ set[i] set[i + 1] set[i + 2] ]
+      printcards [ set[i] set[i + 1] set[i + 2] ]
    .
 .