1 files changed, 34 insertions, 0 deletions
diff --git a/3838/CH6/EX6.13.a/EX6_13_A.sce b/3838/CH6/EX6.13.a/EX6_13_A.sce
new file mode 100644
index 000000000..6abc12438
--- /dev/null
+++ b/3838/CH6/EX6.13.a/EX6_13_A.sce
@@ -0,0 +1,34 @@
+//EXAMPLE 6.13.a
+clear;
+clc;
+x1 = [1,1,1,1];
+x2 = [2,2,2,2];
+a = 1;
+b = 1;
+C=3;
+for n = 1:length(x1)
+  x3(n) = a*x1(n)+b*x2(n);
+end
+for n = 1:length(x1)
+  y1(n) = x1(n)+C;
+  y2(n) = x2(n)+C;
+  y3(n) = x3(n)+C;
+end
+for n = 1:length(y1)
+  z(n) = a*y1(n)+b*y2(n);
+end
+count = 0;
+for n =1:length(y1)
+  if(y3(n)== z(n))
+    count = count+1;
+  end
+end
+if(count == length(y3))
+   disp('Since It satisifies the superposition principle')
+   disp('The given system is a Linear system')
+   y3
+   z
+  else
+    disp('Since It does not satisify the superposition principle')
+    disp('The given system is a Non-Linear system')
+end