function L=extractL(A)
n=size(A,1);
L=zeros(size(A));
for i=1:n
for j=1:i
L(i,j) = A(i,j);
end
end
