1 files changed, 49 insertions, 0 deletions
diff --git a/413/CH8/EX8.1/Example_8_1.sce b/413/CH8/EX8.1/Example_8_1.sce
new file mode 100644
index 000000000..99cb72ca1
--- /dev/null
+++ b/413/CH8/EX8.1/Example_8_1.sce
@@ -0,0 +1,49 @@
+clc
+clear
+A=[-4 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0
+1 -4 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0
+0 1 -4 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0
+0 0 1 -4 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 
+0 0 0 1 -4 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 
+0 0 0 0 1 -4 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0
+0 0 0 0 0 1 -4 1 0 0 0 0 0 1 0 0 0 0 0 0 0 
+1 0 0 0 0 0 0 -4 1 0 0 0 0 0 1 0 0 0 0 0 0 
+0 1 0 0 0 0 0 1 -4 1 0 0 0 0 0 1 0 0 0 0 0
+0 0 1 0 0 0 0 0 1 -4 1 0 0 0 0 0 1 0 0 0 0  
+0 0 0 1 0 0 0 0 0 1 -4 1 0 0 0 0 0 1 0 0 0  
+0 0 0 0 1 0 0 0 0 0 1 -4 1 0 0 0 0 0 1 0 0 
+0 0 0 0 0 1 0 0 0 0 0 1 -4 1 0 0 0 0 0 1 0  
+0 0 0 0 0 0 1 0 0 0 0 0 1 -4 1 0 0 0 0 0 1  
+0 0 0 0 0 0 0 1 0 0 0 0 0 0 -4 1 0 0 0 0 0  
+0 0 0 0 0 0 0 0 1 0 0 0 0 0 1 -4 1 0 0 0 0 
+0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 1 -4 1 0 0 0  
+0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 1 -4 1 0 0 
+0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 1 -4 1 0
+0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 1 -4 1   
+0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 1 -4 ]
+B=[0
+0
+0
+0
+0
+0
+-100
+0
+0
+0
+0
+0
+0
+-100
+0
+0
+0
+0
+0
+0
+-100]
+X=A\B
+for i=1:7
+T=[i, X(i,1), X(i+7,1),X(i+14, 1 )]
+disp(T)
+end
+\ No newline at end of file