X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Flib%2Flambda%2Fterms%2Fmultiplicity.ma;h=ebe35502d904c6263f037437c3d997fd0211a0f2;hb=613d8642b1154dde0c026cbdcd96568910198251;hp=4f41b75db51c31e80a041faddd94ebd5f2a4aeac;hpb=aa9654656f7d0aeb9345e0b86a9e35f861687580;p=helm.git

diff --git a/matita/matita/lib/lambda/terms/multiplicity.ma b/matita/matita/lib/lambda/terms/multiplicity.ma
index 4f41b75db..ebe35502d 100644
--- a/matita/matita/lib/lambda/terms/multiplicity.ma
+++ b/matita/matita/lib/lambda/terms/multiplicity.ma
@@ -12,7 +12,9 @@
 (*                                                                        *)
 (**************************************************************************)
 
-include "terms/relocating_substitution.ma".
+include "lambda/terms/relocating_substitution.ma".
+
+include "lambda/notation/functions/multiplicity_1.ma".
 
 (* MULTIPLICITY *************************************************************)
 
@@ -26,10 +28,6 @@ let rec mult M on M ≝ match M with
 interpretation "term multiplicity"
    'Multiplicity M = (mult M).
 
-notation "hvbox( ♯{ term 46 M } )"
-   non associative with precedence 90
-   for @{ 'Multiplicity $M }.
-
 lemma mult_positive: ∀M. 0 < ♯{M}.
 #M elim M -M // /2 width=1/
 qed.