Solve a Hidato puzzle: Difference between revisions

Content added Content deleted

Inline

@@ Line 4,711: / Line 4,711: @@
 templates hidato
   composer setup
-    @: {row: 1, col: 1, given:[]};
+    data givenInput <[<={}|{row: <row>, col: <col>}>*]> local
+    @: {row: 1, col: 1, givenInput:[]};
-    { board: [ <line>+ ], given: $@.given -> \[i](<{}> { n: $i, $...} !\) }
+    { board: [ <line>+ ], given: $@.givenInput -> \[i](<~={}> { n: $i, $...} !\) }
     rule line: [ <cell>+ ] (<'\n '>?) (..|@: {row: $@.row + 1, col: 1};)
     rule cell: <open|blocked|given> (<' '>?) (@.col: $@.col + 1;)
@@ Line 4,718: / Line 4,719: @@
     rule blocked: <' \.'> -> -1
     rule given: (<' '>?) (def given: <INT>;)
-      ($given -> ..|@.given: $@.given::length+1..$ -> [];)
+      ($given -> ..|@.givenInput: $@.givenInput::length+1..$ -> {};)
-      ($given -> @.given($): { row: $@.row, col: $@.col };)
+      ($given -> @.givenInput($): { row: $@.row, col: $@.col };)
       $given
   end setup