X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Flibrary%2Fnat%2Fpermutation.ma;h=e594b82205d0423a05bc607bd5adb87615adefeb;hb=4dc47c9675ffd5fa50296ffaa9b5997501518c98;hp=4654f33fca7efa46bc1d58daa2ebfea4df0f5f2c;hpb=ffdd3ddd6ce10a5fa0729ab407647bd46c44b9d8;p=helm.git diff --git a/helm/software/matita/library/nat/permutation.ma b/helm/software/matita/library/nat/permutation.ma index 4654f33fc..e594b8220 100644 --- a/helm/software/matita/library/nat/permutation.ma +++ b/helm/software/matita/library/nat/permutation.ma @@ -78,8 +78,7 @@ for @{ 'transposition $i $j $n}. notation < "(❲i \atop j❳)n" with precedence 71 for @{ 'transposition $i $j $n}. -interpretation "natural transposition" 'transposition i j n = - (cic:/matita/nat/permutation/transpose.con i j n). +interpretation "natural transposition" 'transposition i j n = (transpose i j n). lemma transpose_i_j_i: \forall i,j:nat. transpose i j i = j. intros.unfold transpose.