X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_1%2Fpr3%2Ffwd.ma;h=7f9e4641924945bc86408d0528cb638a5147eea6;hb=57ae1762497a5f3ea75740e2908e04adb8642cc2;hp=e3c9fca027c7cb7bcfa21ed6ed72adbcf512627d;hpb=8de8cf8adfa6fcda91047eb2c25535893ede046a;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_1/pr3/fwd.ma b/matita/matita/contribs/lambdadelta/basic_1/pr3/fwd.ma index e3c9fca02..7f9e46419 100644 --- a/matita/matita/contribs/lambdadelta/basic_1/pr3/fwd.ma +++ b/matita/matita/contribs/lambdadelta/basic_1/pr3/fwd.ma @@ -18,7 +18,7 @@ include "basic_1/pr3/defs.ma". include "basic_1/pr2/fwd.ma". -implied let rec pr3_ind (c: C) (P: (T \to (T \to Prop))) (f: (\forall (t: +implied rec lemma pr3_ind (c: C) (P: (T \to (T \to Prop))) (f: (\forall (t: T).(P t t))) (f0: (\forall (t2: T).(\forall (t1: T).((pr2 c t1 t2) \to (\forall (t3: T).((pr3 c t2 t3) \to ((P t2 t3) \to (P t1 t3)))))))) (t: T) (t0: T) (p: pr3 c t t0) on p: P t t0 \def match p with [(pr3_refl t1)