- "functional" component moved to Apps_2

[helm.git] / matita / matita / contribs / lambda_delta / Basic_2 / computation / csn_aaa.ma

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 8bc613aa4a34903d4a29e7a8c120e19688fc1c84..421a3a7f7e9d9777601b822960d50c8df161435f 100644 (file)
--- 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_cr.ma".
+include "Basic_2/computation/csn_lcpr_vector.ma".
 
 (* CONTEXT-SENSITIVE STRONGLY NORMALIZING TERMS *****************************)
 
-(* Main properties **********************************************************)
+(* Properties concerning atomic arity assignment ****************************)
 
-theorem 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.