%
% Calculate sigma matrix (singular values of W)
%
function Sigma = calc_Sigma(sigma,n,m,rk)
Sigma = [diag(sigma),zeros(rk,m-rk);zeros(2*n-rk,rk),zeros(2*n-rk,m-rk)];
end