author | wenzelm |
Tue, 10 Jun 2008 19:45:53 +0200 | |
changeset 27133 | e26ed41cc8ea |
parent 27132 | 7d643d3935b1 |
child 27134 | 71461c77a15b |
--- a/src/HOL/Word/WordGenLib.thy Tue Jun 10 19:34:32 2008 +0200 +++ b/src/HOL/Word/WordGenLib.thy Tue Jun 10 19:45:53 2008 +0200 @@ -318,7 +318,7 @@ apply atomize apply (erule rev_mp)+ apply (rule_tac x=m in spec) - apply (induct_tac n) + apply (induct_tac n rule: nat_induct) apply simp apply clarsimp apply (erule impE)