-->
function logicop(bool a, b)
return {a, b, a and b, a or b, not a, a xor b, a==b, a!=b}
end function
printf(1," a b and or not xor == !=\n")
for a=FALSE to TRUE do -- nb: TRUE to FALSE would need a "by -1".
for b=FALSE to TRUE do
printf(1,"%-5t %-5t %-5t %-5t %-5t %-5t %-5t %-5t\n",logicop(a,b))
end for
end for