- pts_dummy/pts_dummy_new: non compiling parts commented out

[helm.git] / matita / matita / lib / pts_dummy / degree.ma

diff --git a/matita/matita/lib/pts_dummy/degree.ma b/matita/matita/lib/pts_dummy/degree.ma
index 1fa4ee7ecc382ffba6cb7abb7712b4f81719341b..61caa58b14b99ee42a941b6624d4a3fab827de28 100644 (file)
--- a/matita/matita/lib/pts_dummy/degree.ma
+++ b/matita/matita/lib/pts_dummy/degree.ma
@@ -12,8 +12,8 @@
 (*                                                                        *)
 (**************************************************************************)
 
-include "lambda/ext_lambda.ma".
-
+include "pts_dummy/ext_lambda.ma".
+(*
 (* DEGREE ASSIGNMENT **********************************************************)
 
 (* The degree of a term *******************************************************)
@@ -158,3 +158,4 @@ lemma Deg_lift_subst: ∀v,w,G. [║v║_[║G║]] = ║[w]║*_[║G║] →
 >append_Deg >append_Deg <Hvw -Hvw >DegHd_Lift; [2: //]
 >deg_lift; [2,3: >HGk /2/] <(deg_subst … k) // >HGk /2/
 qed.
+*)