- boxPp: added missing spaces

[helm.git] / helm / software / matita / library / nat / permutation.ma

diff --git a/helm/software/matita/library/nat/permutation.ma b/helm/software/matita/library/nat/permutation.ma
index e594b82205d0423a05bc607bd5adb87615adefeb..bfa5112bc4f2d6482ef1f83a912df96359fd0b88 100644 (file)
--- a/helm/software/matita/library/nat/permutation.ma
+++ b/helm/software/matita/library/nat/permutation.ma
@@ -72,10 +72,13 @@ match eqb n i with
       [ true \Rightarrow i
       | false \Rightarrow n]].
 
-notation < "(❲i↹j❳)n" with precedence 71 
+notation < "(❲i↹j❳) term 72 n" with precedence 71 
 for @{ 'transposition $i $j $n}.
 
-notation < "(❲i \atop j❳)n" with precedence 71 
+notation < "(❲i \atop j❳) term 72 n" with precedence 71 
+for @{ 'transposition $i $j $n}.
+
+notation > "(❲\frac term 90 i term 90 j❳)n" with precedence 71 
 for @{ 'transposition $i $j $n}.
 
 interpretation "natural transposition" 'transposition i j n = (transpose i j n).
@@ -747,4 +750,4 @@ intros 4.elim k
       ]
     ]
   ]
-qed.
\ No newline at end of file
+qed.