X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=matita%2Fmatita%2Fcontribs%2Flambda_delta%2Fbasic_2%2Fcomputation%2Fcsn_aaa.ma;h=67744a098a152cd8101ea18dfe6e37f566856b47;hb=6c86c70b005e3f3efd375868b27f3cff84febfad;hp=112e2d4b72e04bde0bf580e2737e7e2dc34a4780;hpb=a8c166f1e1baeeae04553058bd179420ada8bbe7;p=helm.git

diff --git a/matita/matita/contribs/lambda_delta/basic_2/computation/csn_aaa.ma b/matita/matita/contribs/lambda_delta/basic_2/computation/csn_aaa.ma
index 112e2d4b7..67744a098 100644
--- a/matita/matita/contribs/lambda_delta/basic_2/computation/csn_aaa.ma
+++ b/matita/matita/contribs/lambda_delta/basic_2/computation/csn_aaa.ma
@@ -13,13 +13,13 @@
 (**************************************************************************)
 
 include "basic_2/computation/acp_aaa.ma".
-include "basic_2/computation/csn_lcpr_vector.ma".
+include "basic_2/computation/csn_tstc_vector.ma".
 
 (* CONTEXT-SENSITIVE STRONGLY NORMALIZING TERMS *****************************)
 
 (* Properties concerning atomic arity assignment ****************************)
 
-lemma csn_aaa: ∀L,T,A. L ⊢ T ÷ A → L ⊢ ⬇* T.
+lemma csn_aaa: ∀L,T,A. L ⊢ T ⁝ A → L ⊢ ⬊* T.
 #L #T #A #H
 @(acp_aaa … csn_acp csn_acr … H)
 qed.