Procedure LogicDebug(a,b)
Debug a & b ;And
Debug a | b ;Or
Debug ~a ;Not
Debug a ! b ;XOr
EndProcedure
logicDebug(#True, #True)
logicDebug(#True, #False)
logicDebug(#False, #False)