diff options
author | Nguyễn Gia Phong <vn.mcsinyx@gmail.com> | 2020-02-16 14:26:55 +0700 |
---|---|---|
committer | Nguyễn Gia Phong <vn.mcsinyx@gmail.com> | 2020-02-16 14:26:55 +0700 |
commit | 82e6cf7d1046d6cee16f7e8b044ec33e7ec6c4b7 (patch) | |
tree | f7b7ae0bce69070c47a1b31a85bd2bc69dfecf09 /usth/MATH2.2/labwork/3/gauss.m | |
parent | 29d1001e2e21eff289bff23412e284c8b2e44595 (diff) | |
download | cp-82e6cf7d1046d6cee16f7e8b044ec33e7ec6c4b7.tar.gz |
[usth] Numerical Method is MATH2.4
Diffstat (limited to 'usth/MATH2.2/labwork/3/gauss.m')
-rw-r--r-- | usth/MATH2.2/labwork/3/gauss.m | 12 |
1 files changed, 0 insertions, 12 deletions
diff --git a/usth/MATH2.2/labwork/3/gauss.m b/usth/MATH2.2/labwork/3/gauss.m deleted file mode 100644 index 09128dc..0000000 --- a/usth/MATH2.2/labwork/3/gauss.m +++ /dev/null @@ -1,12 +0,0 @@ -function x = gauss (A, b) - issquare (A) || error ('Matrix A must be square'); - Aug = [A b]; - [m n] = size (Aug); - % forward elimination - for k = 1 : m - 1 - for l = k + 1 : m - Aug(l, k:n) = Aug(l, k:n) - Aug(k, k:n)*Aug(l, k)/Aug(k, k); - end - end - x = ubst (Aug); -end |