Advertisement
Guest User

Untitled

a guest
Oct 22nd, 2016
70
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.47 KB | None | 0 0
  1. function [x] = myLU(A,b)
  2. %Gaussian elimination first
  3. for i=1:n-1
  4. %ith step
  5. for k=i+1:n
  6. %kth row
  7. multiplier = A(k,i)/A(i,i);
  8. for j=i+1:n
  9. A(k,j)=A(k,j)-multiplier*A(i,j)
  10. end
  11.  
  12. for j=i+1:n
  13. b(j)=b(j)-multiplier*b(i);
  14. end
  15. end
  16. end
  17. %upper triangular
  18. for i=n:-1:1
  19. %solve for x(i), assume x(i+1)...x(n) are known
  20. x(i)=b(i);
  21. for k=i+1:n
  22. x(i)=x(i)-A(i,k)*x(k);
  23. end
  24. x(i)=x(i)/A(i,i);
  25. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement