X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fgrammar%2Fleq.ma;h=f7f23760d8594c36af97c4b1c5986cd343798b0d;hb=876b7e94113e67c7fb2dbc9ff7956c399778ce6f;hp=6578c4cd9235ea6cc1fe8c40b1a5f29475c392da;hpb=84cc672d70212e4f204bc2f43120ec4d82f9bcd9;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/grammar/leq.ma b/matita/matita/contribs/lambdadelta/basic_2/grammar/leq.ma index 6578c4cd9..f7f23760d 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/grammar/leq.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/grammar/leq.ma @@ -174,7 +174,7 @@ qed-. (* Basic forward lemmas *****************************************************) -lemma leq_fwd_length: ∀L1,L2,d,e. L1 ≃[d, e] L2 → |L2| = |L1|. +lemma leq_fwd_length: ∀L1,L2,d,e. L1 ≃[d, e] L2 → |L1| = |L2|. #L1 #L2 #d #e #H elim H -L1 -L2 -d -e normalize // qed-.