A-M baby

2013-04-10 21:29:02 -07:00 · 2013-04-10 21:29:02 -07:00 · db842d013d
commit db842d013d
parent 764da6cbbb
19005 changed files with 197040 additions and 7 deletions
--- a/Task/Multisplit/Bracmat/multisplit.bracmat
+++ b/Task/Multisplit/Bracmat/multisplit.bracmat
@ -0,0 +1,18 @@
+( ( oneOf
+  =   operator
+    .   !arg:%?operator ?arg
+      & ( @(!sjt:!operator ?arg)&(!operator.!arg)
+        | oneOf$!arg
+        )
+  )
+& "a!===b=!=c":?unparsed
+& "==" "!=" "=":?operators
+&   whl
+  ' ( @( !unparsed
+       : ?nonOp [%(oneOf$!operators:(?operator.?unparsed))
+       )
+    & put$(!nonOp str$("{" !operator "} "))
+    )
+& put$!unparsed
+& put$\n
+);