jmat — row or column block permutation
[j]=jmat(n,m)
This function permutes block rows or block columns of a matrix