( Boolean)

: NOT 0= ;

: BOOLE  NOT NOT ;            ( make a value boolean)

: 2BOOLE  BOOLE SWAP BOOLE ;  ( same for 2 values)

: and  2BOOLE AND ;           ( lower case of boolean)

: or   2BOOLE OR ;

: xor  2BOOLE XOR ; 

: not NOT ;

: nand 2BOOLE AND NOT ;

