From 82e6cf7d1046d6cee16f7e8b044ec33e7ec6c4b7 Mon Sep 17 00:00:00 2001 From: Nguyễn Gia Phong Date: Sun, 16 Feb 2020 14:26:55 +0700 Subject: [usth] Numerical Method is MATH2.4 --- usth/MATH2.2/labwork/3/gauss.m | 12 ------------ 1 file changed, 12 deletions(-) delete mode 100644 usth/MATH2.2/labwork/3/gauss.m (limited to 'usth/MATH2.2/labwork/3/gauss.m') 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 -- cgit 1.4.1