X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Flib%2Fpts_dummy%2Finversion.ma;h=63831f0784e0cdeb47f1f042e519061784b9865c;hb=1e797237a245f38a9674117b9d31ab76d8efe7cb;hp=0c2c2a98b39bc6c37e35181dc87b3913c1f2107e;hpb=46e87acb755894f9234191d675eeb5db4f5b930b;p=helm.git diff --git a/matita/matita/lib/pts_dummy/inversion.ma b/matita/matita/lib/pts_dummy/inversion.ma index 0c2c2a98b..63831f078 100644 --- a/matita/matita/lib/pts_dummy/inversion.ma +++ b/matita/matita/lib/pts_dummy/inversion.ma @@ -9,8 +9,8 @@ \ / V_______________________________________________________________ *) -include "lambda/types.ma". - +include "pts_dummy/types.ma". +(* (* inductive TJ (p: pts): list T → T → T → Prop ≝ | ax : ∀i,j. Ax p i j → TJ p (nil T) (Sort i) (Sort j) @@ -98,3 +98,4 @@ theorem abs_inv: ∀P,G,M,N. G ⊢ _{P} M : N → ∀A,b.M = Lambda A b → ] qed. +*)