X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2A%2Freduction%2Fcpr_lift.ma;h=241d88877a4aeb7f9c03e6d5330c35072cbc76fa;hp=4a89afa30f572d590287c40fb4e73913b7738f78;hb=2f6f2b7c01d47d23f61dd48d767bcb37aecdcfea;hpb=3a4509b8e569181979f5b15808361c83eb1ae49a

diff --git a/matita/matita/contribs/lambdadelta/basic_2A/reduction/cpr_lift.ma b/matita/matita/contribs/lambdadelta/basic_2A/reduction/cpr_lift.ma
index 4a89afa30..241d88877 100644
--- a/matita/matita/contribs/lambdadelta/basic_2A/reduction/cpr_lift.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2A/reduction/cpr_lift.ma
@@ -19,7 +19,6 @@ include "basic_2A/reduction/cpr.ma".
 
 (* Relocation properties ****************************************************)
 
-(* Basic_1: includes: pr0_lift pr2_lift *)
 lemma cpr_lift: ∀G. d_liftable (cpr G).
 #G #K #T1 #T2 #H elim H -G -K -T1 -T2
 [ #I #G #K #L #s #l #m #_ #U1 #H1 #U2 #H2
@@ -58,7 +57,6 @@ lemma cpr_lift: ∀G. d_liftable (cpr G).
 ]
 qed.
 
-(* Basic_1: includes: pr0_gen_lift pr2_gen_lift *)
 lemma cpr_inv_lift1: ∀G. d_deliftable_sn (cpr G).
 #G #L #U1 #U2 #H elim H -G -L -U1 -U2
 [ * #i #G #L #K #s #l #m #_ #T1 #H