- some bugs fixed in the domain-based preorders on environments

[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 33628e22d9c83b39f53fe7ab3bf7f9268f87dbc9..f72531c503915d44f2aba2ff7186094232f7a105 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,9 +14,9 @@
 
 (* This file was automatically generated: do not edit *********************)
 
-include "G/defs.ma".
+include "LambdaDelta-1/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) 
@@ -41,3 +41,9 @@ t)))))))))
 \to (\forall (t0: T).((ty3 g c t2 t0) \to (ty3 g c (THead (Flat Cast) t2 t1) 
 (THead (Flat Cast) t0 t2))))))).
 
+inductive tys3 (g: G) (c: C): TList \to (T \to Prop) \def
+| tys3_nil: \forall (u: T).(\forall (u0: T).((ty3 g c u u0) \to (tys3 g c 
+TNil u)))
+| tys3_cons: \forall (t: T).(\forall (u: T).((ty3 g c t u) \to (\forall (ts: 
+TList).((tys3 g c ts u) \to (tys3 g c (TCons t ts) u))))).
+