From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 243/CH15/EX15.2/15_02.sce | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100755 243/CH15/EX15.2/15_02.sce

(limited to '243/CH15/EX15.2/15_02.sce')

diff --git a/243/CH15/EX15.2/15_02.sce b/243/CH15/EX15.2/15_02.sce
new file mode 100755
index 000000000..6eb530685
--- /dev/null
+++ b/243/CH15/EX15.2/15_02.sce
@@ -0,0 +1,24 @@
+//Example No. 15_02
+//Liebmann's Iterative method
+//Pg No. 489
+clear ; close ; clc ;
+
+f(1,1:4) = 100 ;
+f(1:4,1) = 100 ;
+f(4,1:4) = 0 ;
+f(1:4,4) = 0 ;
+f(3,3) = 0
+for n = 1:5
+    for i = 2:3
+        for j = 2:3
+            if n == 1 & i == 2 & j == 2 then
+                f(i,j) = ( f(i+1,j+1) + f(i-1,j-1) + f(i-1,j+1) + f(i+1,j-1) )/4
+            else
+                f(i,j) = ( f(i+1,j) + f(i-1,j) + f(i,j+1) + f(i,j-1) )/4
+            end
+        end
+    end
+    A(2:5,n) = [f(2,2);f(2,3) ;  f(3,2) ;  f(3,3) ]
+end
+A(1,1:5) = 0:4
+disp(A,'First row of below matrix represents iteration number')
\ No newline at end of file
-- 
cgit