src/HOL/AxClasses/Tutorial/Product.thy
author wenzelm
Wed, 12 Nov 1997 16:20:39 +0100
changeset 4208 b67223fddc11
parent 1247 18b1441fb603
child 8920 af5e09b6c208
permissions -rw-r--r--
added Thy/file.ML, Thy/use.ML; removed Thy/symbol_input.ML;

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