theorem :: XBOOLEAN:94
for p, q being boolean object holds p 'xor' (p 'nand' q) = p => q