src/HOL/AxClasses/Tutorial/Product.thy
author wenzelm
Tue, 27 May 1997 15:45:07 +0200
changeset 3362 0b268cff9344
parent 1247 18b1441fb603
child 8920 af5e09b6c208
permissions -rw-r--r--
NJ 1.09.2x as factory default!

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

Define a 'syntactic' class "product" that is logically equivalent to
"term".
*)

Product = HOL +

axclass
  product < term

consts
  "<*>" :: "['a::product, 'a] => 'a"      (infixl 70)

end