--- a/src/HOL/Product_Type.thy Mon Oct 23 10:20:55 2000 +0200 +++ b/src/HOL/Product_Type.thy Mon Oct 23 11:14:00 2000 +0200 @@ -7,7 +7,7 @@ The unit type. *) -Product_Type = Fun + equalities + +Product_Type = Fun + (** products **)