| author | wenzelm |
| Mon, 18 Sep 2000 14:10:31 +0200 | |
| changeset 10015 | 8c16ec5ba62b |
| parent 10007 | 64bf7da1994a |
| permissions | -rw-r--r-- |
(* Title: HOL/AxClasses/Tutorial/Product.thy ID: $Id$ Author: Markus Wenzel, TU Muenchen *) theory Product = Main: axclass product < "term" consts product :: "'a::product => 'a => 'a" (infixl "[*]" 70) instance bool :: product by intro_classes defs (overloaded) product_bool_def: "x [*] y == x & y" end