]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/basic_1/pc3/defs.ma
components: pc1, pc3, ty3, csubt, ex1
[helm.git] / matita / matita / contribs / lambdadelta / basic_1 / pc3 / defs.ma
index e7ea2b24ff0dbba37d71b84adf8d16d27dacbac5..bbc07ef1befb103ddc9e2fce7c1a90a64695571f 100644 (file)
 
 (* This file was automatically generated: do not edit *********************)
 
-include "Basic-1/pr3/defs.ma".
+include "basic_1/pr3/defs.ma".
 
 definition pc3:
  C \to (T \to (T \to Prop))
 \def
- \lambda (c: C).(\lambda (t1: T).(\lambda (t2: T).(ex2 T (\lambda (t: T).(pr3 
-c t1 t)) (\lambda (t: T).(pr3 c t2 t))))).
+ \lambda (c: C).(\lambda (t1: T).(\lambda (t2: T).(let TMP_1 \def (\lambda 
+(t: T).(pr3 c t1 t)) in (let TMP_2 \def (\lambda (t: T).(pr3 c t2 t)) in (ex2 
+T TMP_1 TMP_2))))).
 
 inductive pc3_left (c: C): T \to (T \to Prop) \def
 | pc3_left_r: \forall (t: T).(pc3_left c t t)