X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambda_delta%2FBasic_2%2Funfold%2Flifts_lift_vector.ma;h=0d279c6dad91be473f8b08ed3bb06c0c0ab1eca6;hb=011cf6478141e69822a5b40933f2444d0522532f;hp=727a93f54abfd70b56c46d35ca5f9073cd555499;hpb=5c213ad3e00d815eca11b65ee50d71af82873d6e;p=helm.git

diff --git a/matita/matita/contribs/lambda_delta/Basic_2/unfold/lifts_lift_vector.ma b/matita/matita/contribs/lambda_delta/Basic_2/unfold/lifts_lift_vector.ma
index 727a93f54..0d279c6da 100644
--- a/matita/matita/contribs/lambda_delta/Basic_2/unfold/lifts_lift_vector.ma
+++ b/matita/matita/contribs/lambda_delta/Basic_2/unfold/lifts_lift_vector.ma
@@ -20,7 +20,7 @@ include "Basic_2/unfold/lifts_vector.ma".
 
 (* Main properties **********************************************************)
 
-(* Basic_1: was: lifts1_xhg *)
+(* Basic_1: was: lifts1_xhg (right to left) *)
 lemma liftsv_liftv_trans_le: ∀T1s,Ts,des. ⇧*[des] T1s ≡ Ts →
                              ∀T2s:list term. ⇧[0, 1] Ts ≡ T2s →
                              ∃∃T0s. ⇧[0, 1] T1s ≡ T0s & ⇧*[des + 1] T0s ≡ T2s.