]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/lib/pts_dummy/inversion.ma
- pts_dummy/pts_dummy_new: non compiling parts commented out
[helm.git] / matita / matita / lib / pts_dummy / inversion.ma
index 0c2c2a98b39bc6c37e35181dc87b3913c1f2107e..63831f0784e0cdeb47f1f042e519061784b9865c 100644 (file)
@@ -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.
    
+*)