function a=nalupad(a)
% 用途：求可逆方陣的Doolittile分解,緊湊格式。
% 格式：a=nalupad(a) 其中a為可逆方陣，返回下三角矩陣部分為l，上三角矩陣部分為u。
n=length(a);
a(2:n,1)=a(2:n,1)/a(1,1);
for k=2:n
    a(k,k:n)=a(k,k:n)-a(k,1:k-1)*a(1:k-1,k:n);
    a(k+1:n,k)=(a(k+1:n,k)-a(k+1:n,1:k-1)*a(1:k-1,k))/a(k,k);
end