Update all new Tasks

2015-02-20 09:02:09 -05:00 · 2015-02-20 09:02:09 -05:00 · 91df62d461
commit 91df62d461
parent 00a190b0a6
5697 changed files with 93386 additions and 804 deletions
--- a/Task/ABC-Problem/Bracmat/abc-problem.bracmat
+++ b/Task/ABC-Problem/Bracmat/abc-problem.bracmat
@ -0,0 +1,48 @@
+(
+  ( can-make-word
+  =   ABC blocks
+    .       (B O)
+          + (X K)
+          + (D Q)
+          + (C P)
+          + (N A)
+          + (G T)
+          + (R E)
+          + (T G)
+          + (Q D)
+          + (F S)
+          + (J W)
+          + (H U)
+          + (V I)
+          + (A N)
+          + (O B)
+          + (E R)
+          + (F S)
+          + (L Y)
+          + (P C)
+          + (Z M)
+        : ?blocks
+      & ( ABC
+        =   letter blocks A Z
+          .   !arg:(.?)
+            |   !arg:(@(?:%?letter ?arg).?blocks)
+              &   !blocks
+                :   ?
+                  + ?*(? !letter ?:?block)
+                  + (?&ABC$(!arg.!blocks+-1*!block))
+        )
+      &   out
+        $ ( !arg
+            ( ABC$(upp$!arg.!blocks)&yes
+            | no
+            )
+          )
+  )
+& can-make-word'A
+& can-make-word'BARK
+& can-make-word'BOOK
+& can-make-word'TREAT
+& can-make-word'COMMON
+& can-make-word'SQUAD
+& can-make-word'CONFUSE
+);