diff options
Diffstat (limited to 'hott/More_List.thy')
| -rw-r--r-- | hott/More_List.thy | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/hott/More_List.thy b/hott/More_List.thy index 460dc7b..1b8034f 100644 --- a/hott/More_List.thy +++ b/hott/More_List.thy @@ -10,8 +10,8 @@ section \<open>Length\<close> definition [implicit]: "len \<equiv> ListRec ? Nat 0 (fn _ _ rec. suc rec)" experiment begin - Lemma "len [] \<equiv> ?n" by (subst comps)+ - Lemma "len [0, suc 0, suc (suc 0)] \<equiv> ?n" by (subst comps)+ + Lemma "len [] \<equiv> ?n" by (subst comp)+ + Lemma "len [0, suc 0, suc (suc 0)] \<equiv> ?n" by (subst comp)+ end |