X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fdynamic%2Fnta_aaa.ma;fp=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fdynamic%2Fnta_aaa.ma;h=c27755124b98282b44ee27c1ccad14d311a6ea9d;hb=cacd7323994f7621286dbfd93bbf4c50acfbe918;hp=0161996dd9f0a1aaf5e66d2f1baaf528ae6c97be;hpb=f76594123e375bd7852c9421fe260a7bec693a92;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/basic_2/dynamic/nta_aaa.ma b/matita/matita/contribs/lambdadelta/basic_2/dynamic/nta_aaa.ma
index 0161996dd..c27755124 100644
--- a/matita/matita/contribs/lambdadelta/basic_2/dynamic/nta_aaa.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/dynamic/nta_aaa.ma
@@ -40,7 +40,7 @@ lapply (aaa_mono … H1W … H2W) -G -L -W #H
 elim (discr_apair_xy_x … H)
 qed-.
 
-(* Basic_2A1: uses: ty3_repellent *)
+(* Basic_1: uses: ty3_repellent *)
 theorem nta_abst_repellent (a) (h) (p) (G) (K):
         ∀W,T,U1. ⦃G,K⦄ ⊢ ⓛ{p}W.T :[a,h] U1 →
         ∀U2. ⦃G,K.ⓛW⦄ ⊢ T :[a,h] U2 → ⬆*[1] U1 ≘ U2 → ⊥.