| changeset 68658 | 16cc1161ad7f | 
| parent 68657 | 65ad2bfc19d2 | 
| child 68659 | db0c70767d86 | 
--- a/src/HOL/Library/IArray.thy Wed Jul 18 20:51:20 2018 +0200 +++ b/src/HOL/Library/IArray.thy Wed Jul 18 20:51:21 2018 +0200 @@ -52,7 +52,7 @@ subsection \<open>Generic code equations\<close> lemma [code]: - "size (as :: 'a iarray) = Suc (length (IArray.list_of as))" + "size (as :: 'a iarray) = Suc (IArray.length as)" by (cases as) simp lemma [code]: