diff options
| author | Josh Chen | 2021-06-24 22:40:05 +0100 |
|---|---|---|
| committer | Josh Chen | 2021-06-24 22:40:05 +0100 |
| commit | f988d541364841cd208f4fd21ff8e5e2935fc7aa (patch) | |
| tree | 8ccc4d4e4cdde7572453ac0e250a224fe8db3da1 /hott/List_HoTT.thy | |
| parent | 0085798a86a35e2430a97289e894724f688db435 (diff) | |
Bad practice huge commit:
1. Rudimentary prototype definitional package
2. Started univalence
3. Various compatibility fixes and new theory stubs
4. Updated ROOT file
Diffstat (limited to 'hott/List_HoTT.thy')
| -rw-r--r-- | hott/List_HoTT.thy | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/hott/List_HoTT.thy b/hott/List_HoTT.thy index d866f59..a48d2ab 100644 --- a/hott/List_HoTT.thy +++ b/hott/List_HoTT.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 comp; typechk?) - Lemma "len [0, suc 0, suc (suc 0)] \<equiv> ?n" by (subst comp; typechk?)+ + Lemma "len [] \<equiv> ?n" by compute + Lemma "len [0, suc 0, suc (suc 0)] \<equiv> ?n" by compute end |