tasks a-s

2013-04-10 23:57:08 -07:00 · 2013-04-10 23:57:08 -07:00 · b83f433714
commit b83f433714
parent 47bf37c096
12433 changed files with 156208 additions and 123 deletions
--- a/Task/Non-continuous-subsequences/Bracmat/non-continuous-subsequences.bracmat
+++ b/Task/Non-continuous-subsequences/Bracmat/non-continuous-subsequences.bracmat
@ -0,0 +1,20 @@
+( ( noncontinuous
+  =   sub
+    .     ( sub
+          =   su a nc
+            .   !arg:(?su.?nc)
+              &   !su
+                :   %
+                    %?a
+                    ( %:[%(sub$(!sjt.!nc !a))
+                    |   ?
+                      & !nc:~
+                      & out$(!nc !a)
+                      & ~
+                    )
+          )
+        & sub$(dummy !arg.)
+      |
+  )
+& noncontinuous$(e r n i t)
+);