X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambda_delta%2Fbasic_2%2Fcomputation%2Flsubc_ldrop.ma;h=7d23f9e0341beb8124a1aeb242ca12bbf323a792;hb=eaaea3c18083de3e442e939768ff450d3b093911;hp=838986a8f23726842cfc9e7ac4fe64b6578451b4;hpb=dc66c8d89a5147178ccdacb8341ed26c9c52f06b;p=helm.git diff --git a/matita/matita/contribs/lambda_delta/basic_2/computation/lsubc_ldrop.ma b/matita/matita/contribs/lambda_delta/basic_2/computation/lsubc_ldrop.ma index 838986a8f..7d23f9e03 100644 --- a/matita/matita/contribs/lambda_delta/basic_2/computation/lsubc_ldrop.ma +++ b/matita/matita/contribs/lambda_delta/basic_2/computation/lsubc_ldrop.ma @@ -21,7 +21,7 @@ include "basic_2/computation/lsubc.ma". (* Properties concerning basic local environment slicing ********************) (* Basic_1: was: csubc_drop_conf_O *) -(* Note: the constant (0) can not be generalized *) +(* Note: the constant 0 can not be generalized *) lemma lsubc_ldrop_O1_trans: ∀RP,L1,L2. L1 [RP] ⊑ L2 → ∀K2,e. ⇩[0, e] L2 ≡ K2 → ∃∃K1. ⇩[0, e] L1 ≡ K1 & K1 [RP] ⊑ K2. #RP #L1 #L2 #H elim H -L1 -L2