2021-03-06 14:15:22 +01:00
|
|
|
clear all;
|
|
|
|
|
2021-03-06 20:58:15 +01:00
|
|
|
B = [2, -1, 0, 0;
|
|
|
|
-1, 2, -1, 0;
|
|
|
|
3, -1, 2, -1;
|
|
|
|
0, 4, -1, 2];
|
2021-03-06 14:15:22 +01:00
|
|
|
|
2021-03-06 18:17:36 +01:00
|
|
|
b = [0;0;0;5];
|
2021-03-06 14:15:22 +01:00
|
|
|
|
2021-03-06 20:58:15 +01:00
|
|
|
[U, L] = outer_product_gaussian_elimination(B);
|
2021-03-06 18:17:36 +01:00
|
|
|
back_substitution(U, b);
|
|
|
|
|
2021-03-06 20:58:15 +01:00
|
|
|
[U, L] = gaussian_elimination_with_complete_pivoting(B)
|
|
|
|
L*U
|
|
|
|
% A = gauss_jordan_elimination(B)
|