diff -r 706cfddca75c -r 18b1441fb603 src/HOL/AxClasses/Tutorial/Group.thy --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/src/HOL/AxClasses/Tutorial/Group.thy Fri Sep 01 14:27:36 1995 +0200 @@ -0,0 +1,31 @@ +(* Title: HOL/AxClasses/Tutorial/Group.thy + ID: $Id$ + Author: Markus Wenzel, TU Muenchen + +Define classes "semigroup", "group", "agroup". +*) + +Group = Sigs + + +(* semigroups *) + +axclass + semigroup < term + assoc "(x <*> y) <*> z = x <*> (y <*> z)" + + +(* groups *) + +axclass + group < semigroup + left_unit "1 <*> x = x" + left_inv "inv x <*> x = 1" + + +(* abelian groups *) + +axclass + agroup < group + commut "x <*> y = y <*> x" + +end