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

Finish the soundness proof completely

Browse source
This commit is contained in:
Yiyun Liu 2025-02-16 22:43:56 -05:00
parent d24991e994
commit bdba6f50e5
3 changed files with 119 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

4
theories/common.v
View file

@ -91,3 +91,7 @@ Proof. case : a => //=. Qed.
Definition ispair_ren n m (a : PTm n) (ξ : fin n -> fin m) :
ispair (ren_PTm ξ a) = ispair a.
Proof. case : a => //=. Qed.
Definition ishne_ren n m (a : PTm n) (ξ : fin n -> fin m) :
ishne (ren_PTm ξ a) = ishne a.
Proof. move : m ξ. elim : n / a => //=. Qed.