X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fdynamic%2Flsubv_cnv.ma;h=c5b4194804efeb0a73f4f4ca0cf878dc8f9dbfba;hb=bd53c4e895203eb049e75434f638f26b5a161a2b;hp=e5c87b05fa8343d482fca76f46af967cc71d4240;hpb=f308429a0fde273605a2330efc63268b4ac36c99;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/basic_2/dynamic/lsubv_cnv.ma b/matita/matita/contribs/lambdadelta/basic_2/dynamic/lsubv_cnv.ma
index e5c87b05f..c5b419480 100644
--- a/matita/matita/contribs/lambdadelta/basic_2/dynamic/lsubv_cnv.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/dynamic/lsubv_cnv.ma
@@ -19,10 +19,10 @@ include "basic_2/dynamic/lsubv_cpms.ma".
 (* Forward lemmas with native validity **************************************)
 
 (* Basic_2A1: uses: lsubsv_snv_trans *)
-lemma lsubv_cnv_trans (a) (h) (G):
-                      ∀L2,T. ⦃G,L2⦄ ⊢ T ![a,h] →
-                      ∀L1. G ⊢ L1 ⫃![a,h] L2 → ⦃G,L1⦄ ⊢ T ![a,h].
-#a #h #G #L2 #T #H elim H -G -L2 -T //
+lemma lsubv_cnv_trans (h) (a) (G):
+      ∀L2,T. ❪G,L2❫ ⊢ T ![h,a] →
+      ∀L1. G ⊢ L1 ⫃![h,a] L2 → ❪G,L1❫ ⊢ T ![h,a].
+#h #a #G #L2 #T #H elim H -G -L2 -T //
 [ #I #G #K2 #V #HV #IH #L1 #H
   elim (lsubv_inv_bind_dx … H) -H * /3 width=1 by cnv_zero/
 | #I #G #K2 #i #_ #IH #L1 #H