% computes the singluar values of all the matrices in tensor t

function [Si,Sj,Sk] = tsvalues(t)

[l m n] = tdimensions(t);

Si = zeros(l,min(m,n));
Sj = zeros(m,min(l,n));
Sk = zeros(n,min(l,m));

for i=1:l, Si(i,:) = svd(tgetmatrix(t,i,1))'; end
for j=1:m, Sj(j,:) = svd(tgetmatrix(t,j,2))'; end
for k=1:n, Sk(k,:) = svd(tgetmatrix(t,k,3))'; end