X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=matita%2Fmatita%2Flib%2Flambda%2Fsubterms%2Fbooleanized.ma;h=cc6f1e9806db60c74fc3c9d394e0e708ff8f1799;hp=d247ee73f41e19e1e050823c2fd3e1fafafe1dbd;hb=613d8642b1154dde0c026cbdcd96568910198251;hpb=647504aa72b84eb49be8177b88a9254174e84d4b

diff --git a/matita/matita/lib/lambda/subterms/booleanized.ma b/matita/matita/lib/lambda/subterms/booleanized.ma
index d247ee73f..cc6f1e980 100644
--- a/matita/matita/lib/lambda/subterms/booleanized.ma
+++ b/matita/matita/lib/lambda/subterms/booleanized.ma
@@ -14,6 +14,10 @@
 
 include "lambda/subterms/boolean.ma".
 
+include "lambda/notation/functions/projectsame_2.ma".
+
+include "lambda/xoa/ex_4_3.ma".
+
 (* BOOLEANIZED SUBSET (EMPTY OR FULL) ***************************************)
 
 definition booleanized: bool → subterms → subterms ≝
@@ -22,10 +26,6 @@ definition booleanized: bool → subterms → subterms ≝
 interpretation "booleanized (subterms)"
    'ProjectSame b F = (booleanized b F).
 
-notation "hvbox( { term 46 b } ⇕ break term 46 F)"
-   non associative with precedence 46
-   for @{ 'ProjectSame $b $F }.
-
 lemma booleanized_inv_vref: ∀j,c,b,F. {b}⇕ F = {c}#j →
                             ∃∃b1. b = c & F = {b1}#j.
 #j #c #b #F #H