diff -r 91c05f4b509e -r 5f9138bcb3d7 src/HOL/Library/Product_ord.thy --- a/src/HOL/Library/Product_ord.thy Sun May 06 21:49:44 2007 +0200 +++ b/src/HOL/Library/Product_ord.thy Sun May 06 21:50:17 2007 +0200 @@ -13,7 +13,7 @@ prod_le_def: "(x \ y) \ (fst x < fst y) \ (fst x = fst y \ snd x \ snd y)" prod_less_def: "(x < y) \ (fst x < fst y) \ (fst x = fst y \ snd x < snd y)" .. -lemmas prod_ord_defs [code nofunc] = prod_less_def prod_le_def +lemmas prod_ord_defs [code func del] = prod_less_def prod_le_def lemma [code func]: "(x1\'a\{ord, eq}, y1) \ (x2, y2) \ x1 < x2 \ x1 = x2 \ y1 \ y2"