changeset 15281 | bd4611956c7b |
parent 15251 | bb6f072c8d10 |
child 15341 | 254f6f00b60e |
--- a/src/HOL/Nat.thy Fri Nov 12 20:55:04 2004 +0100 +++ b/src/HOL/Nat.thy Sat Nov 13 07:47:34 2004 +0100 @@ -109,7 +109,7 @@ text {* Injectiveness of @{term Suc} *} -lemma inj_Suc: "inj Suc" +lemma inj_Suc: "inj_on Suc N" apply (unfold Suc_def) apply (rule inj_onI) apply (drule inj_on_Abs_Nat [THEN inj_onD])