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

@ -0,0 +1,9 @@
-- non-dependent coe should reduce to its body
def five : = 5
def five? : = coe 5
def eq : five ≡ five? : = δ _ ⇒ 5
def subst1 : 0.(P : → ★) → P five → P five? = λ P p ⇒ p
def subst2 : 0.(P : → ★) → P five? → P five = λ P p ⇒ p