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

Update executable to use salgo_dom for subtyping

Browse source
This commit is contained in:
Yiyun Liu 2025-03-10 18:18:42 -04:00
parent e278c6eaef
commit 4021d05d99
3 changed files with 128 additions and 233 deletions
Download patch file Download diff file Expand all files Collapse all files

10
theories/algorithmic.v
View file

@ -1051,12 +1051,6 @@ Proof.
exists (S i), a1. hauto lq:on ctrs:nsteps solve+:lia.
Qed.
Lemma hreds_nf_refl a b :
HRed.nf a ->
rtc HRed.R a b ->
a = b.
Proof. inversion 2; sfirstorder. Qed.
Lemma lored_nsteps_app_cong k (a0 a1 b : PTm) :
nsteps LoRed.R k a0 a1 ->
ishne a0 ->
@ -1228,10 +1222,6 @@ Proof.
hauto lq:on rew:off use:ne_nf b:on solve+:lia.
Qed.
Lemma algo_dom_r_algo_dom : forall a b, HRed.nf a -> HRed.nf b -> algo_dom_r a b -> algo_dom a b.
Proof. hauto l:on use:algo_dom_r_inv, hreds_nf_refl. Qed.
Lemma algo_dom_algo_dom_neu : forall a b, ishne a -> ishne b -> algo_dom a b -> algo_dom_neu a b \/ tm_conf a b.
Proof.
inversion 3; subst => //=; tauto.