diff options
| author | Josh Chen | 2020-09-23 17:03:42 +0200 |
|---|---|---|
| committer | Josh Chen | 2020-09-23 17:03:42 +0200 |
| commit | 3922e24270518be67192ad6928bb839132c74c07 (patch) | |
| tree | fa15b6f440a778b6804c8d3ec546188721cbd1e5 /hott/List+.thy | |
| parent | 77df99b3ffa41395ced31785074525c85e35fee9 (diff) | |
Basic experiments adding reduction to the type checker
Diffstat (limited to '')
| -rw-r--r-- | hott/List+.thy | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/hott/List+.thy b/hott/List+.thy index b73cc24..869d667 100644 --- a/hott/List+.thy +++ b/hott/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 comp) - Lemma "len [0, suc 0, suc (suc 0)] \<equiv> ?n" by (subst comp) + Lemma "len [] \<equiv> ?n" by (subst comp; typechk?) + Lemma "len [0, suc 0, suc (suc 0)] \<equiv> ?n" by (subst comp; typechk?)+ end |