remove Tighten stuff

This commit is contained in:
rhiannon morris 2024-05-28 17:00:01 +02:00
parent f00c802336
commit 2bfe3250cf
15 changed files with 84 additions and 506 deletions

View file

@ -97,7 +97,7 @@ tests = "PTerm → Term" :- [
parseMatch term fromPTerm "λ w ⇒ w"
`(Lam (S _ $ Y $ E $ B VZ _) _),
parseMatch term fromPTerm "λ w ⇒ x"
`(Lam (S _ $ N $ E $ B (VS $ VS VZ) _) _),
`(Lam (S _ $ Y $ E $ B (VS $ VS $ VS VZ) _) _),
parseMatch term fromPTerm "λ x ⇒ x"
`(Lam (S _ $ Y $ E $ B VZ _) _),
parseMatch term fromPTerm "λ a b ⇒ f a b"