slightly faster sum of squares of a matrix

git-svn-id: svn+ssh://svn.r-forge.r-project.org/svnroot/vegan/pkg/vegan@2387 edb9625f-4e0d-4859-8d74-9fd3b1da38cb
huge speed-up in protest

git-svn-id: svn+ssh://svn.r-forge.r-project.org/svnroot/vegan/pkg/vegan@2388 edb9625f-4e0d-4859-8d74-9fd3b1da38cb
Merge branch 'r-forge-svn-local'