(* This file was automatically generated: do not edit *********************)
-include "ty3/defs.ma".
+include "LambdaDelta-1/ty3/defs.ma".
inductive csubt (g: G): C \to (C \to Prop) \def
| csubt_sort: \forall (n: nat).(csubt g (CSort n) (CSort n))
(b: B).((not (eq B b Void)) \to (\forall (u1: T).(\forall (u2: T).(csubt g
(CHead c1 (Bind Void) u1) (CHead c2 (Bind b) u2))))))))
| csubt_abst: \forall (c1: C).(\forall (c2: C).((csubt g c1 c2) \to (\forall
-(u: T).(\forall (t: T).((ty3 g c2 u t) \to (csubt g (CHead c1 (Bind Abst) t)
-(CHead c2 (Bind Abbr) u))))))).
+(u: T).(\forall (t: T).((ty3 g c1 u t) \to ((ty3 g c2 u t) \to (csubt g
+(CHead c1 (Bind Abst) t) (CHead c2 (Bind Abbr) u)))))))).