LAMBDA-TYPES: added wf3 (legal context predicate);

[helm.git] / helm / software / matita / contribs / LAMBDA-TYPES / LambdaDelta-1 / ty3 / defs.ma

diff --git a/helm/software/matita/contribs/LAMBDA-TYPES/LambdaDelta-1/ty3/defs.ma b/helm/software/matita/contribs/LAMBDA-TYPES/LambdaDelta-1/ty3/defs.ma
index eff4d8e7bb54a26c1cd7211fa4dee68d1c0c8b0f..d30e8bdd2b78fde0a25e2964226beea018964129 100644 (file)
--- a/helm/software/matita/contribs/LAMBDA-TYPES/LambdaDelta-1/ty3/defs.ma
+++ b/helm/software/matita/contribs/LAMBDA-TYPES/LambdaDelta-1/ty3/defs.ma
@@ -14,11 +14,9 @@
 
 (* This file was automatically generated: do not edit *********************)
 
-set "baseuri" "cic:/matita/LAMBDA-TYPES/LambdaDelta-1/ty3/defs".
+include "LambdaDelta-1/G/defs.ma".
 
-include "G/defs.ma".
-
-include "pc3/defs.ma".
+include "LambdaDelta-1/pc3/defs.ma".
 
 inductive ty3 (g: G): C \to (T \to (T \to Prop)) \def
 | ty3_conv: \forall (c: C).(\forall (t2: T).(\forall (t: T).((ty3 g c t2 t) 
@@ -34,8 +32,7 @@ T).((getl n c (CHead d (Bind Abst) u)) \to (\forall (t: T).((ty3 g d u t) \to
 (ty3 g c (TLRef n) (lift (S n) O u))))))))
 | ty3_bind: \forall (c: C).(\forall (u: T).(\forall (t: T).((ty3 g c u t) \to 
 (\forall (b: B).(\forall (t1: T).(\forall (t2: T).((ty3 g (CHead c (Bind b) 
-u) t1 t2) \to (\forall (t0: T).((ty3 g (CHead c (Bind b) u) t2 t0) \to (ty3 g 
-c (THead (Bind b) u t1) (THead (Bind b) u t2)))))))))))
+u) t1 t2) \to (ty3 g c (THead (Bind b) u t1) (THead (Bind b) u t2)))))))))
 | ty3_appl: \forall (c: C).(\forall (w: T).(\forall (u: T).((ty3 g c w u) \to 
 (\forall (v: T).(\forall (t: T).((ty3 g c v (THead (Bind Abst) u t)) \to (ty3 
 g c (THead (Flat Appl) w v) (THead (Flat Appl) w (THead (Bind Abst) u