initial commit / add all books

17 files changed, 376 insertions, 0 deletions

diff --git a/67/CH2/EX2.1/example21.sce b/67/CH2/EX2.1/example21.sce
new file mode 100755
index 000000000..5d6412394
--- /dev/null
+++ b/67/CH2/EX2.1/example21.sce
@@ -0,0 +1,18 @@
+//Example 2.1

+clc;

+t=-8:1/100:8;

+for i=1:length(t)

+   x(i)=exp(-t(i)^2);

+   h(i)=3*t(i)^2;

+end

+y=convol(x,h);

+figure

+plot2d(t,h);

+title('Impulse responce');

+figure

+plot2d(t,x);

+title('Input signal');

+figure

+t2=-16:1/100:16

+plot2d(t2,y);

+title('Output signal');
\ No newline at end of file
diff --git a/67/CH2/EX2.17.a/example217a.sce b/67/CH2/EX2.17.a/example217a.sce
new file mode 100755
index 000000000..3407e0d66
--- /dev/null
+++ b/67/CH2/EX2.17.a/example217a.sce
@@ -0,0 +1,5 @@
+//Example 2.17a

+clc;

+disp('  y[n]=3x[n-2]+3x[n+2]  ');

+disp('THE GIVEN SYSTEM IS NON-CAUSAL');

+disp('Since the value of output depends on future input');
\ No newline at end of file
diff --git a/67/CH2/EX2.17.b/example217b.sce b/67/CH2/EX2.17.b/example217b.sce
new file mode 100755
index 000000000..71a43610f
--- /dev/null
+++ b/67/CH2/EX2.17.b/example217b.sce
@@ -0,0 +1,5 @@
+//Example 2.17b

+clc;

+disp('  y[n]=x[n-1]+a*x[n-2]  ');

+disp('THE GIVEN SYSTEM IS CAUSAL');

+disp('Since the value of output doesnot depends on future input');
\ No newline at end of file
diff --git a/67/CH2/EX2.17.c/example217c.sce b/67/CH2/EX2.17.c/example217c.sce
new file mode 100755
index 000000000..ef8b994c6
--- /dev/null
+++ b/67/CH2/EX2.17.c/example217c.sce
@@ -0,0 +1,5 @@
+//Example 2.17c

+clc;

+disp('  y[n]=x[-n]  ');

+disp('THE GIVEN SYSTEM IS NON-CAUSAL');

+disp('Since the value of output depends on future input');
\ No newline at end of file
diff --git a/67/CH2/EX2.19.a/example219a.sce b/67/CH2/EX2.19.a/example219a.sce
new file mode 100755
index 000000000..5471fe7f3
--- /dev/null
+++ b/67/CH2/EX2.19.a/example219a.sce
@@ -0,0 +1,32 @@
+//Example 2.19a

+clc;

+x1=[1,1,1,1]

+x2=[2,2,2,2]

+a=1

+b=1

+a1=0.5

+b1=0.5

+for n=1:length(x1)

+    x3(n)=a*x1(n)+b*x2(n)

+end

+for n=1:length(x1)

+    y1(n)=a1*n*x1(n)+b1

+    y2(n)=a1*n*x2(n)+b1

+    y3(n)=a1*n*x3(n)+b1

+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('It satisfy the superposition principle');

+disp('THE GIVEN SYSTEM IS LINEAR ');

+else

+    disp('It does not satisfy superposition principle ');

+    disp('THE GIVEN SYSTEM IS NON LINEAR');

+end
\ No newline at end of file
diff --git a/67/CH2/EX2.19.b/example219b.sce b/67/CH2/EX2.19.b/example219b.sce
new file mode 100755
index 000000000..f13e4d4e1
--- /dev/null
+++ b/67/CH2/EX2.19.b/example219b.sce
@@ -0,0 +1,30 @@
+//Example 2.19b

+clc;

+x1=[1,1,1,1]

+x2=[2,2,2,2]

+a=1

+b=1

+for n=1:length(x1)

+    x3(n)=a*x1(n)+b*x2(n)

+end

+for n=1:length(x1)

+    y1(n)=exp(x1(n))

+    y2(n)=exp(x2(n))

+    y3(n)=exp(x3(n))

+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('It satisfy the superposition principle');

+disp('THE GIVEN SYSTEM IS LINEAR ');

+else

+    disp('It does not satisfy superposition principle ');

+    disp('THE GIVEN SYSTEM IS NON LINEAR');

+end
\ No newline at end of file
diff --git a/67/CH2/EX2.2/example22.sce b/67/CH2/EX2.2/example22.sce
new file mode 100755
index 000000000..7c27cc5b5
--- /dev/null
+++ b/67/CH2/EX2.2/example22.sce
@@ -0,0 +1,24 @@
+//Example 2.2

+clc;

+t=-8:1/100:8;

+for i=1:length(t)

+    if t(i)<0 then

+        x(i)=0;

+        h(i)=0;

+    else

+         x(i)=exp(-3.*t(i));

+         h(i)=1;

+    end

+end

+t1=t+1;

+y=convol(x,h);

+figure

+plot2d(t1,h);

+title('Impulse responce');

+figure

+plot2d(t,x);

+title('Input signal');

+figure

+t2=-16:1/100:16

+plot2d(t2,y);

+title('Output signal');
\ No newline at end of file
diff --git a/67/CH2/EX2.21.a/example221a.sce b/67/CH2/EX2.21.a/example221a.sce
new file mode 100755
index 000000000..48d1b3db4
--- /dev/null
+++ b/67/CH2/EX2.21.a/example221a.sce
@@ -0,0 +1,30 @@
+//Example 2.21

+clc;

+x1=[1,1,1,1]

+x2=[2,2,2,2]

+a=1

+b=1

+for t=1:length(x1)

+    x3(t)=a*x1(t)+b*x2(t)

+end

+for t=1:length(x1)

+    y1(t)=5*sin(x1(t))

+    y2(t)=5*sin(x2(t))

+    y3(t)=5*sin(x3(t))

+end

+for t=1:length(y1)

+    z(t)=a*y1(t)+b*y2(t)

+end

+count=0

+for n=1:length(y1)

+    if(y3(t)==z(t))

+        count=count+1;

+     end   

+end

+if(count==length(y3))

+disp('It satisfy the superposition principle');

+disp('THE GIVEN SYSTEM IS LINEAR ');

+else

+    disp('It does not satisfy superposition principle ');

+    disp('THE GIVEN SYSTEM IS NON LINEAR');

+end
\ No newline at end of file
diff --git a/67/CH2/EX2.21.b/example221b.sce b/67/CH2/EX2.21.b/example221b.sce
new file mode 100755
index 000000000..e0660a3b5
--- /dev/null
+++ b/67/CH2/EX2.21.b/example221b.sce
@@ -0,0 +1,30 @@
+//Example 2.21b

+clc;

+x1=[1,1,1,1]

+x2=[2,2,2,2]

+a=1

+b=1

+for t=1:length(x1)

+    x3(t)=a*x1(t)+b*x2(t)

+end

+for t=1:length(x1)

+    y1(t)=7*x1(t)+5

+    y2(t)=7*x2(t)+5

+    y3(t)=7*x3(t)+5

+end

+for t=1:length(y1)

+    z(t)=a*y1(t)+b*y2(t)

+end

+count=0

+for n=1:length(y1)

+    if(y3(t)==z(t))

+        count=count+1;

+     end   

+end

+if(count==length(y3))

+disp('It satisfy the superposition principle');

+disp('THE GIVEN SYSTEM IS LINEAR ');

+else

+    disp('It does not satisfy superposition principle ');

+    disp('THE GIVEN SYSTEM IS NON LINEAR');

+end
\ No newline at end of file
diff --git a/67/CH2/EX2.25/example225.sce b/67/CH2/EX2.25/example225.sce
new file mode 100755
index 000000000..e4215c392
--- /dev/null
+++ b/67/CH2/EX2.25/example225.sce
@@ -0,0 +1,30 @@
+//Example 2.25

+clc;

+x1=[1,1,1,1]

+x2=[2,2,2,2]

+a=1

+b=1

+for n=1:length(x1)

+    x3(n)=a*x1(n)+b*x2(n)

+end

+for n=1:length(x1)

+        y1(n)=x1(n)^2

+        y2(n)=x2(n)^2

+        y3(n)=x3(n)^2

+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('It satisfy the superposition principle');

+disp('THE GIVEN SYSTEM IS LINEAR ');

+else

+    disp('It does not satisfy superposition principle ');

+    disp('THE GIVEN SYSTEM IS NON LINEAR');

+end
\ No newline at end of file
diff --git a/67/CH2/EX2.3/example23.sce b/67/CH2/EX2.3/example23.sce
new file mode 100755
index 000000000..b6bc33c30
--- /dev/null
+++ b/67/CH2/EX2.3/example23.sce
@@ -0,0 +1,25 @@
+//Example 2.3

+clc;

+R=100;

+L=100;

+t=-8:1/100:8;

+for i=1:length(t)

+    if t(i)<0 then

+        x(i)=0;

+        h(i)=0;

+    else

+         h(i)=(R/L)*exp(-(R/L).*t(i));

+         x(i)=1;

+    end

+end

+y=convol(x,h);

+figure

+plot2d(t,h);

+title('Impulse responce');

+figure

+plot2d(t,x);

+title('Input signal');

+figure

+t2=-16:1/100:16

+plot2d(t2,y);

+title('Output signal');
\ No newline at end of file
diff --git a/67/CH2/EX2.4/example24.sce b/67/CH2/EX2.4/example24.sce
new file mode 100755
index 000000000..375b871e3
--- /dev/null
+++ b/67/CH2/EX2.4/example24.sce
@@ -0,0 +1,18 @@
+//Example 2.4

+clc;

+t=-8:1/100:8;

+for i=1:length(t)

+         x(i)=3*cos(2.*t(i));

+         h(i)=exp(-abs(t(i)));

+end

+y=convol(x,h);

+figure

+plot2d(t,h);

+title('Impulse responce');

+figure

+plot2d(t,x);

+title('Input signal');

+figure

+t2=-16:1/100:16

+plot2d(t2,y);

+title('Output signal');
\ No newline at end of file
diff --git a/67/CH2/EX2.5/example25.sce b/67/CH2/EX2.5/example25.sce
new file mode 100755
index 000000000..05b0eadc4
--- /dev/null
+++ b/67/CH2/EX2.5/example25.sce
@@ -0,0 +1,27 @@
+//Example 2.5
+clc;
+Max_Limit=10;
+h=ones(1,Max_Limit);
+N2=0:length(h)-1;
+a=0.5;//constant a>0
+for t=1:Max_Limit
+x(t)=exp(-a*(t-1));
+end
+N1=0:length(x)-1;
+y=convol(x,h)-1;
+N=0:length(x)+length(h)-2;
+figure
+a=gca();
+plot2d(N2,h)
+xtitle('Impulse Response','t','h(t)');
+a.thickness=2;
+figure
+a=gca();
+plot2d(N1,x)
+xtitle('Input Response','t','x(t)');
+a.thickness=2;
+figure
+a=gca ();
+plot2d(N(1:Max_Limit),y(1:Max_Limit))
+xtitle('Output Response','t','y(t)');
+a.thickness=2;
\ No newline at end of file
diff --git a/67/CH2/EX2.59/example259.sce b/67/CH2/EX2.59/example259.sce
new file mode 100755
index 000000000..2661f9b75
--- /dev/null
+++ b/67/CH2/EX2.59/example259.sce
@@ -0,0 +1,32 @@
+//Example 2.59

+clc;

+n=-8:1:8;

+for i=1:length(n)

+    if n(i)<0 then

+        x(i)=0;

+        h(i)=0;

+    else

+         x(i)=1;

+         h(i)=2^n(i);

+    end

+end

+y=convol(x,h);

+figure

+a=gca();

+plot2d3(n,h);

+a.x_location='origin';

+a.y_location='origin';

+title('Impulse responce');

+figure

+a=gca();

+plot2d3(n,x);

+a.x_location='origin';

+a.y_location='origin';

+title('Input signal');

+figure

+a=gca();

+n1=-16:1:16

+plot2d3(n1,y);

+a.x_location='origin';

+a.y_location='origin';

+title('Output signal');
\ No newline at end of file
diff --git a/67/CH2/EX2.6/example26.sce b/67/CH2/EX2.6/example26.sce
new file mode 100755
index 000000000..c698b7ffa
--- /dev/null
+++ b/67/CH2/EX2.6/example26.sce
@@ -0,0 +1,24 @@
+//Example 2.6

+clc;

+t=-8:1/100:8;

+for i=1:length(t)

+    if t(i)<0 then

+        x(i)=exp(2.*t(i));

+        h(i)=0;

+    else

+         x(i)=0;

+         h(i)=1;

+    end

+end

+t1=t+3;

+y=convol(x,h);

+figure

+plot2d(t1,h);

+title('Impulse responce');

+figure

+plot2d(t,x);

+title('Input signal');

+figure

+t2=-16:1/100:16

+plot2d(t2,y);

+title('Output signal');
\ No newline at end of file
diff --git a/67/CH2/EX2.7/example27.sce b/67/CH2/EX2.7/example27.sce
new file mode 100755
index 000000000..9014344d7
--- /dev/null
+++ b/67/CH2/EX2.7/example27.sce
@@ -0,0 +1,18 @@
+//Example 2.7

+clc;

+n=-8:1:8;

+for i=1:length(n)

+         x(i)=exp(-n(i)^2);

+         h(i)=3.*n(i)^2;

+end

+y=convol(x,h);

+figure

+plot2d3(n,h);

+title('Impulse responce');

+figure

+plot2d3(n,x);

+title('Input signal');

+figure

+n1=-16:1:16

+plot2d3(n1,y);

+title('Output signal');
\ No newline at end of file
diff --git a/67/CH2/EX2.8/example28.sce b/67/CH2/EX2.8/example28.sce
new file mode 100755
index 000000000..8e348364a
--- /dev/null
+++ b/67/CH2/EX2.8/example28.sce
@@ -0,0 +1,23 @@
+//Example 2.8

+clc;

+n=-8:1:8;

+for i=1:length(n)

+    if n(i)<0 then

+        x(i)=2^n(i);

+        h(i)=0;

+    else

+         x(i)=0;

+         h(i)=1;

+    end

+end

+y=convol(x,h);

+figure

+plot2d3(n,h);

+title('Impulse responce');

+figure

+plot2d3(n,x);

+title('Input signal');

+figure

+n1=-16:1:16

+plot2d3(n1,y);

+title('Output signal');
\ No newline at end of file