- bug fix in the induction for the closure property

[helm.git] / matita / matita / contribs / lambdadelta / basic_2 / grammar / aarity.ma

diff --git a/matita/matita/contribs/lambdadelta/basic_2/grammar/aarity.ma b/matita/matita/contribs/lambdadelta/basic_2/grammar/aarity.ma
index 6f0a4d7c2fc1c7d6d0b81ed2827977603ca697ef..72ae1cd80ee07078c48d84ac2a6b1f0e9e357cda 100644 (file)
--- a/matita/matita/contribs/lambdadelta/basic_2/grammar/aarity.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/grammar/aarity.ma
@@ -55,7 +55,7 @@ qed-.
 
 (* Basic properties *********************************************************)
 
-lemma aarity_eq_dec: ∀A1,A2:aarity. Decidable (A1 = A2).
+lemma eq_aarity_dec: ∀A1,A2:aarity. Decidable (A1 = A2).
 #A1 elim A1 -A1
 [ #A2 elim A2 -A2 /2 width=1/
   #B2 #A2 #_ #_ @or_intror #H destruct