Advertisement
Guest User

Untitled

a guest
Jan 20th, 2017
84
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.27 KB | None | 0 0
  1. for k = 1 : n-1
  2. for i = k+1 : k+l-k%l
  3. Iik = A[i,k] / A[k,k]
  4.  
  5. A[i,k] = 0.0 #Iik # mnozniki - rozklad LU zapisany w jednej macierzy
  6. for j = k+1 : min(k+l, n)
  7. A[i,j] = A[i,j] - Iik * A[k,j]
  8. end
  9. b[i] = b[i] - Iik * b[k]
  10. end
  11. end
  12. return (A, b)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement