tuned equation
authorhaftmann
Wed, 18 Jul 2018 20:51:21 +0200
changeset 68658 16cc1161ad7f
parent 68657 65ad2bfc19d2
child 68659 db0c70767d86
tuned equation
src/HOL/Library/IArray.thy
--- 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]: