yiyunliu/sp-eta-postpone
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Add simplified projection lemma

Browse source
This commit is contained in:
Yiyun Liu 2025-02-12 19:53:20 -05:00
parent d053f93100
commit 48adb34946
3 changed files with 41 additions and 22 deletions
Download patch file Download diff file Expand all files Collapse all files

3
theories/preservation.v
View file

@ -76,9 +76,6 @@ Proof.
- hauto lq:on rew:off ctrs:LEq.
Qed.
Lemma regularity_sub0 : forall n Γ (A B : PTm n), Γ ⊢ A ≲ B -> exists i, Γ ⊢ A ∈ PUniv i.
Proof. hauto lq:on use:regularity. Qed.
Lemma E_AppAbs : forall n (a : PTm (S n)) (b : PTm n) (Γ : fin n -> PTm n) (A : PTm n),
Γ ⊢ PApp (PAbs a) b ∈ A -> Γ ⊢ PApp (PAbs a) b ≡ subst_PTm (scons b VarPTm) a ∈ A.
Proof.