Variant on Tree, try not to expand too much

This commit is contained in:
2024-10-17 21:54:11 -07:00
parent 05afc10631
commit 41a7563ad5
6 changed files with 118 additions and 9 deletions

View File

@@ -1,9 +0,0 @@
module Test1
nat : U
nat = {C : U} -> C -> (nat -> C) -> C
-- TESTCASE This was broken when I wasn't expanding Ref ty in check
-- Also broken when I tried to put Def in VRef
succ : nat -> nat
succ = \n => \ z s => s n