src/HOL/AxClasses/Tutorial/Product.thy
author wenzelm
Fri, 17 Mar 2000 17:10:37 +0100
changeset 8501 2ff3d25943f1
parent 1247 18b1441fb603
child 8920 af5e09b6c208
permissions -rw-r--r--
\isamarkupheader: \section;

(*  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