t_onesmatrix (n) = matrix(n,n,i,j,1)

t_zeromatrix (n,m=n) = matrix(n,m,i,j,0)