Patch by Ferruccio that enables \top/\bot for False/True undone.

[helm.git] / matita / matita / lib / lambda / terms.ma

diff --git a/matita/matita/lib/lambda/terms.ma b/matita/matita/lib/lambda/terms.ma
index a0d262363fc9f865b88394ecf5a317a45a7fc475..554f8099cb453ac0719b17fb082ceddc3a2272ad 100644 (file)
--- a/matita/matita/lib/lambda/terms.ma
+++ b/matita/matita/lib/lambda/terms.ma
@@ -33,6 +33,7 @@ lemma appl_append: ∀N,l,M. Appl M (l @ [N]) = App (Appl M l) N.
 #N #l elim l -l // #hd #tl #IHl #M >IHl //
 qed.
 
+(*
 let rec is_dummy t ≝ match t with
    [ Sort _     ⇒ false
    | Rel _      ⇒ false
@@ -41,7 +42,7 @@ let rec is_dummy t ≝ match t with
    | Prod _ _   ⇒ false       (* not so sure yet *)
    | D _        ⇒ true
    ].
-
+*)
 (* nautral terms *)
 inductive neutral: T → Prop ≝
    | neutral_sort: ∀n.neutral (Sort n)