X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frt_computation%2Fcpre_cpre.ma;fp=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frt_computation%2Fcpre_cpre.ma;h=a855b327f588c09fd7ed29a7caf9de648dbf0699;hb=c0d38a82464481e3c8fd68e4b00d7b9b448df462;hp=5ddc528f4367d3a83f998accc7392fad8c9ab39a;hpb=0fea4ed429678c3293027cfe76fdbe15cfa331cb;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/cpre_cpre.ma b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/cpre_cpre.ma
index 5ddc528f4..a855b327f 100644
--- a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/cpre_cpre.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/cpre_cpre.ma
@@ -25,7 +25,7 @@ lemma cpre_cprs_conf (h) (G) (L) (T):
 #h #G #L #T0 #T1 #HT01 #T2 * #HT02 #HT2
 elim (cprs_conf … HT01 … HT02) -T0 #T0 #HT10 #HT20
 lapply (cprs_inv_cnr_sn … HT20 HT2) -HT20 #H destruct
-/2 width=1 by conj/
+/2 width=1 by cpme_intro/
 qed-.
 
 (* Main properties *********************************************************)