src/HOL/AxClasses/Tutorial/Monoid.thy
author nipkow
Tue, 23 Jun 1998 18:07:45 +0200
changeset 5071 548f398d770b
parent 1247 18b1441fb603
permissions -rw-r--r--
Consequences of the change from [ := ] to ( := ) in theory Update.

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

Define class "monoid".
*)

Monoid = Sigs +

(* monoids *)

axclass
  monoid < term
  assoc         "(x <*> y) <*> z = x <*> (y <*> z)"
  left_unit     "1 <*> x = x"
  right_unit    "x <*> 1 = x"

end