| author | nipkow | 
| Wed, 20 Jun 2007 14:38:24 +0200 | |
| changeset 23433 | c2c10abd2a1e | 
| parent 16417 | 9bc16273c2d4 | 
| permissions | -rw-r--r-- | 
(* Title: HOL/AxClasses/Product.thy ID: $Id$ Author: Markus Wenzel, TU Muenchen *) theory Product imports Main begin axclass product < type consts product :: "'a::product => 'a => 'a" (infixl "[*]" 70) instance bool :: product by intro_classes defs (overloaded) product_bool_def: "x [*] y == x & y" end