X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fdynamic%2Flsubv_cpms.ma;h=6d53694c7b0660ca4e18cb36292e31d4f36fdc1c;hb=68b4f2490c12139c03760b39895619e63b0f38c9;hp=81d385add2f224ab89190075a80a322534f536a1;hpb=93768d9ebc0e3c8e3bcd69571d7a635cb1a16b29;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/basic_2/dynamic/lsubv_cpms.ma b/matita/matita/contribs/lambdadelta/basic_2/dynamic/lsubv_cpms.ma
index 81d385add..6d53694c7 100644
--- a/matita/matita/contribs/lambdadelta/basic_2/dynamic/lsubv_cpms.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/dynamic/lsubv_cpms.ma
@@ -20,6 +20,7 @@ include "basic_2/dynamic/lsubv_lsubr.ma".
 (* Forward lemmas with t-bound contex-sensitive rt-computation for terms ****)
 
 (* Basic_2A1: uses: lsubsv_cprs_trans lsubsv_scpds_trans *)
-lemma lsubv_cpms_trans (a) (n) (h) (G): lsub_trans … (λL. cpms h G L n) (lsubv a h G).
+lemma lsubv_cpms_trans (h) (a) (n) (G):
+      lsub_trans … (λL. cpms h G L n) (lsubv h a G).
 /3 width=6 by lsubv_fwd_lsubr, lsubr_cpms_trans/
 qed-.