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

Prove most of cases of AbsAbs

Browse source
This commit is contained in:
Yiyun Liu 2025-02-14 16:17:02 -05:00
parent 5ed366f093
commit ea14ba9602
2 changed files with 114 additions and 23 deletions
Download patch file Download diff file Expand all files Collapse all files

3
theories/soundness.v
View file

@ -10,3 +10,6 @@ Theorem fundamental_theorem :
apply wt_mutual; eauto with sem; [hauto l:on use:SE_Pair].
Unshelve. all : exact 0.
Qed.
Lemma synsub_to_usub : forall n Γ (a b : PTm n), Γ ⊢ a ≲ b -> SN a /\ SN b /\ Sub.R a b.
Proof. hauto lq:on rew:off use:fundamental_theorem, SemLEq_SN_Sub. Qed.