X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fsubstitution%2Flpx_sn.ma;h=82664b828384dbb3e708d73551620b2ef1e65e47;hb=952ec5aa2e9a54787acb63a5c8d6fdbf9011ab60;hp=977fd887b5e41fe6d1a582b5e4f14fef5c82404b;hpb=a5548736278a0b63f6f25c2721934ed8a7d2eef8;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/substitution/lpx_sn.ma b/matita/matita/contribs/lambdadelta/basic_2/substitution/lpx_sn.ma index 977fd887b..82664b828 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/substitution/lpx_sn.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/substitution/lpx_sn.ma @@ -85,5 +85,5 @@ qed-. (* Basic forward lemmas *****************************************************) lemma lpx_sn_fwd_length: ∀R,L1,L2. lpx_sn R L1 L2 → |L1| = |L2|. -#R #L1 #L2 #H elim H -L1 -L2 normalize // +#R #L1 #L2 #H elim H -L1 -L2 // qed-.