X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_1%2Fpc1%2Fdefs.ma;h=7fb3cd29a12b00536c575f4e451f63e94d6d5e3f;hb=57ae1762497a5f3ea75740e2908e04adb8642cc2;hp=659d11b419589359828602e4bb6830789fd30df1;hpb=10c836687dfdf9d23357d7423cfc535e817d843f;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/basic_1/pc1/defs.ma b/matita/matita/contribs/lambdadelta/basic_1/pc1/defs.ma
index 659d11b41..7fb3cd29a 100644
--- a/matita/matita/contribs/lambdadelta/basic_1/pc1/defs.ma
+++ b/matita/matita/contribs/lambdadelta/basic_1/pc1/defs.ma
@@ -19,6 +19,6 @@ include "basic_1/pr1/defs.ma".
 definition pc1:
  T \to (T \to Prop)
 \def
- \lambda (t1: T).(\lambda (t2: T).(let TMP_1 \def (\lambda (t: T).(pr1 t1 t)) 
-in (let TMP_2 \def (\lambda (t: T).(pr1 t2 t)) in (ex2 T TMP_1 TMP_2)))).
+ \lambda (t1: T).(\lambda (t2: T).(ex2 T (\lambda (t: T).(pr1 t1 t)) (\lambda 
+(t: T).(pr1 t2 t)))).