src/HOL/AxClasses/Tutorial/Xor.thy
author nipkow
Thu, 16 Oct 1997 14:12:15 +0200
changeset 3896 ee8ebb74ec00
parent 2907 0e272e4c7cb2
permissions -rw-r--r--
Various new lemmas. Improved conversion of equations to rewrite rules: (s=t becomes (s=t)==True if s=t loops).

(*  Title:      HOL/AxClasses/Tutorial/Xor.thy
    ID:         $Id$
    Author:     Markus Wenzel, TU Muenchen

Define overloaded constants "<*>", "inverse", "1" on type "bool".
*)

Xor = Group +

defs
  prod_bool_def     "x <*> y   == x ~= (y::bool)"
  inverse_bool_def  "inverse x == x::bool"
  unit_bool_def     "1         == False"

end