March 2014 update

Task/Logical-operations/Bracmat/logical-operations.bracmat

@@ -0,0 +1,27 @@
+( ( Logic
+  =   x y
+    .   '$arg:(=?x,?y)
+      &   str
+        $ ( "\n(x,y)="
+            !arg
+            ( ":\n"
+              "x and y -> "
+              ( (!x&!y)&true
+              | false
+              )
+            )
+            ( \n
+              "x or y -> "
+              ( (!x|!y)&true
+              | false
+              )
+            )
+            "\nnot x -> "
+            (~!x&true|false)
+          )
+  )
+& out$(Logic$(,))
+& out$(Logic$(~,))
+& out$(Logic$(,~))
+& out$(Logic$(~,~))
+);

Task/Logical-operations/Deja-Vu/logical-operations.djv

@@ -0,0 +1,6 @@
+showbool a b:
+    !.( a b or a b and a b xor a b not a )
+
+for a in [ false true ]:
+    for b in [ false true ]:
+        showbool a b

Task/Logical-operations/Maple/logical-operations.maple

@@ -0,0 +1,6 @@
+f:=proc(a,b) a and b, a or b, not a; end proc:
+
+f(true,true);
+f(true,false);
+f(false,true);
+f(false,false);

Task/Logical-operations/XSLT/logical-operations.xslt

@@ -4,3 +4,4 @@
   <fo:block>a and b = <xsl:value-of select="$a and $b"/></fo:block>
   <fo:block>a or b = <xsl:value-of select="$a or $b"/></fo:block>
   <fo:block>not a = <xsl:value-of select="not($a)"/></fo:block>
+ </xsl:template>