]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/basic_1/ty3/arity.ma
update in basic_2
[helm.git] / matita / matita / contribs / lambdadelta / basic_1 / ty3 / arity.ma
index c90321ff4849101a9cf283d2897400bab7ecea73..4380212393f814964fde300ea3f9e07e650789e2 100644 (file)
@@ -20,7 +20,7 @@ include "basic_1/arity/pr3.ma".
 
 include "basic_1/asucc/fwd.ma".
 
-theorem ty3_arity:
+lemma ty3_arity:
  \forall (g: G).(\forall (c: C).(\forall (t1: T).(\forall (t2: T).((ty3 g c 
 t1 t2) \to (ex2 A (\lambda (a1: A).(arity g c t1 a1)) (\lambda (a1: A).(arity 
 g c t2 (asucc g a1))))))))