src/HOL/Word/Word.thy
changeset 55415 05f5fdb8d093
parent 54863 82acc20ded73
child 55816 e8dd03241e86
     1.1 --- a/src/HOL/Word/Word.thy	Wed Feb 12 08:35:57 2014 +0100
     1.2 +++ b/src/HOL/Word/Word.thy	Wed Feb 12 08:35:57 2014 +0100
     1.3 @@ -4578,7 +4578,7 @@
     1.4  
     1.5  definition word_rec :: "'a \<Rightarrow> ('b::len word \<Rightarrow> 'a \<Rightarrow> 'a) \<Rightarrow> 'b word \<Rightarrow> 'a"
     1.6  where
     1.7 -  "word_rec forZero forSuc n = nat_rec forZero (forSuc \<circ> of_nat) (unat n)"
     1.8 +  "word_rec forZero forSuc n = rec_nat forZero (forSuc \<circ> of_nat) (unat n)"
     1.9  
    1.10  lemma word_rec_0: "word_rec z s 0 = z"
    1.11    by (simp add: word_rec_def)