diff --git a/proof/crefine/Retype_C.thy b/proof/crefine/Retype_C.thy index 3d866af40..90aa4a579 100644 --- a/proof/crefine/Retype_C.thy +++ b/proof/crefine/Retype_C.thy @@ -790,8 +790,6 @@ lemma list_map_length_is_None [simp]: apply (simp add: list_map_def) done -find_theorems h_t_valid intvl - lemma list_map_append_one: "list_map (xs @ [x]) = [length xs \ x] ++ list_map xs" by (simp add: list_map_def)