X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fstatic_2%2Fstatic%2Flsubc_drops.ma;h=26d627a9056f38382f3edde31bf7e3a109c973df;hp=4cfe0eade20f0cabaf0522d8b15821e01413e658;hb=bd53c4e895203eb049e75434f638f26b5a161a2b;hpb=3b7b8afcb429a60d716d5226a5b6ab0d003228b1 diff --git a/matita/matita/contribs/lambdadelta/static_2/static/lsubc_drops.ma b/matita/matita/contribs/lambdadelta/static_2/static/lsubc_drops.ma index 4cfe0eade..26d627a90 100644 --- a/matita/matita/contribs/lambdadelta/static_2/static/lsubc_drops.ma +++ b/matita/matita/contribs/lambdadelta/static_2/static/lsubc_drops.ma @@ -19,11 +19,11 @@ include "static_2/static/lsubc.ma". (* Properties with generic slicing ******************************************) -(* Note: the premise 𝐔⦃f⦄ cannot be removed *) +(* Note: the premise 𝐔❪f❫ cannot be removed *) (* Basic_1: includes: csubc_drop_conf_O *) (* Basic_2A1: includes: lsubc_drop_O1_trans *) lemma lsubc_drops_trans_isuni: ∀RP,G,L1,L2. G ⊢ L1 ⫃[RP] L2 → - ∀b,f,K2. 𝐔⦃f⦄ → ⇩*[b,f] L2 ≘ K2 → + ∀b,f,K2. 𝐔❪f❫ → ⇩*[b,f] L2 ≘ K2 → ∃∃K1. ⇩*[b,f] L1 ≘ K1 & G ⊢ K1 ⫃[RP] K2. #RP #G #L1 #L2 #H elim H -L1 -L2 [ /2 width=3 by ex2_intro/