X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Flib%2Fpts_dummy%2Fdegree.ma;h=61caa58b14b99ee42a941b6624d4a3fab827de28;hb=a04fa03fcea0493e89b725960146cc0c06539583;hp=1fa4ee7ecc382ffba6cb7abb7712b4f81719341b;hpb=46e87acb755894f9234191d675eeb5db4f5b930b;p=helm.git

diff --git a/matita/matita/lib/pts_dummy/degree.ma b/matita/matita/lib/pts_dummy/degree.ma
index 1fa4ee7ec..61caa58b1 100644
--- 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.
+*)