about summary refs log tree commit diff
path: root/usth/MATH2.2/labwork/3/gauss.m
diff options
context:
space:
mode:
authorNguyễn Gia Phong <vn.mcsinyx@gmail.com>2020-02-16 14:26:55 +0700
committerNguyễn Gia Phong <vn.mcsinyx@gmail.com>2020-02-16 14:26:55 +0700
commit82e6cf7d1046d6cee16f7e8b044ec33e7ec6c4b7 (patch)
treef7b7ae0bce69070c47a1b31a85bd2bc69dfecf09 /usth/MATH2.2/labwork/3/gauss.m
parent29d1001e2e21eff289bff23412e284c8b2e44595 (diff)
downloadcp-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.m12
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