summaryrefslogtreecommitdiff
path: root/830/CH3
diff options
context:
space:
mode:
Diffstat (limited to '830/CH3')
-rwxr-xr-x830/CH3/EX1.0/_1_0.sce5
-rwxr-xr-x830/CH3/EX3.1.1/Direct_Ztransform.sce57
-rwxr-xr-x830/CH3/EX3.2.3/Time_Shifting_Property.sce33
-rwxr-xr-x830/CH3/EX3.2.9/Convolution_Property.sce29
4 files changed, 64 insertions, 60 deletions
diff --git a/830/CH3/EX1.0/_1_0.sce b/830/CH3/EX1.0/_1_0.sce
deleted file mode 100755
index 8f4a51314..000000000
--- a/830/CH3/EX1.0/_1_0.sce
+++ /dev/null
@@ -1,5 +0,0 @@
-//Graphical//
-function [Ztransfer]=ztransfer_new(sequence,n)
-z = poly(0, 'z', 'r')
-Ztransfer=sequence*(1/z)^n'
-endfunction
diff --git a/830/CH3/EX3.1.1/Direct_Ztransform.sce b/830/CH3/EX3.1.1/Direct_Ztransform.sce
index 8fc9a9e85..9ab3b89ad 100755
--- a/830/CH3/EX3.1.1/Direct_Ztransform.sce
+++ b/830/CH3/EX3.1.1/Direct_Ztransform.sce
@@ -1,27 +1,30 @@
-//Graphical//
-//Example 3.1.1
-//Z Transform of Finite Duration SIgnals
-clear;
-clc;
-close;
-x1 = [1,2,5,7,0,1];
-n1 = 0:length(x1)-1;
-X1 = ztransfer_new(x1,n1)
-x2 = [1,2,5,7,0,1];
-n2 = -2:3;
-X2 = ztransfer_new(x2,n2)
-x3 =[0,0,1,2,5,7,0,1];
-n3 = 0:length(x3)-1;
-X3 = ztransfer_new(x3,n3)
-x4 = [2,4,5,7,0,1];
-n4 = -2:3;
-X4 = ztransfer_new(x4,n4)
-x5 = [1,0,0]; //S(n) Unit Impulse sequence
-n5 = 0:length(x5)-1;
-X5 = ztransfer_new(x5,n5)
-x6 = [0,0,0,1]; //S(n-3) unit impulse sequence shifted
-n6 = 0:length(x6)-1;
-X6 = ztransfer_new(x6,n6)
-x7 = [1,0,0,0]; //S(n+3) Unit impulse sequence shifted
-n7 = -3:0;
-X7 = ztransfer_new(x7,n7)
+//Graphical//
+//Example 3.1.1
+//Z Transform of Finite Duration SIgnals
+clear;
+clc;
+close;
+function [Ztransfer]= ztransfer_new (sequence,n)
+ z = poly (0, 'z' , 'r' ); Ztransfer = sequence *(1/z )^n'
+endfunction
+x1 = [1,2,5,7,0,1];
+n1 = 0:length(x1)-1;
+X1 = ztransfer_new(x1,n1)
+x2 = [1,2,5,7,0,1];
+n2 = -2:3;
+X2 = ztransfer_new(x2,n2)
+x3 =[0,0,1,2,5,7,0,1];
+n3 = 0:length(x3)-1;
+X3 = ztransfer_new(x3,n3)
+x4 = [2,4,5,7,0,1];
+n4 = -2:3;
+X4 = ztransfer_new(x4,n4)
+x5 = [1,0,0]; //S(n) Unit Impulse sequence
+n5 = 0:length(x5)-1;
+X5 = ztransfer_new(x5,n5)
+x6 = [0,0,0,1]; //S(n-3) unit impulse sequence shifted
+n6 = 0:length(x6)-1;
+X6 = ztransfer_new(x6,n6)
+x7 = [1,0,0,0]; //S(n+3) Unit impulse sequence shifted
+n7 = -3:0;
+X7 = ztransfer_new(x7,n7) \ No newline at end of file
diff --git a/830/CH3/EX3.2.3/Time_Shifting_Property.sce b/830/CH3/EX3.2.3/Time_Shifting_Property.sce
index cdb9f6f3e..36adfe0ed 100755
--- a/830/CH3/EX3.2.3/Time_Shifting_Property.sce
+++ b/830/CH3/EX3.2.3/Time_Shifting_Property.sce
@@ -1,15 +1,18 @@
-//Graphical//
-//Example 3.2.3
-//Time Shifting Property of Z-transform
-clear;
-clc;
-close;
-x1 = [1,2,5,7,0,1];
-n1 = 0:length(x1)-1;
-X1 = ztransfer_new(x1,n1)
-//x2 = [1,2,5,7,0,1];
-n2 = 0-2:length(x1)-1-2;
-X2 = ztransfer_new(x1,n2)
-//x3 =[0,0,1,2,5,7,0,1];
-n3 = 0+2:length(x1)-1+2;
-X3 = ztransfer_new(x1,n3)
+//Graphical//
+//Example 3.2.3
+//Time Shifting Property of Z-transform
+clear;
+clc;
+close;
+function [Ztransfer]= ztransfer_new (sequence,n)
+ z = poly (0, 'z' , 'r' ); Ztransfer = sequence *(1/z )^n'
+endfunction
+x1 = [1,2,5,7,0,1];
+n1 = 0:length(x1)-1;
+X1 = ztransfer_new(x1,n1)
+//x2 = [1,2,5,7,0,1];
+n2 = 0-2:length(x1)-1-2;
+X2 = ztransfer_new(x1,n2)
+//x3 =[0,0,1,2,5,7,0,1];
+n3 = 0+2:length(x1)-1+2;
+X3 = ztransfer_new(x1,n3) \ No newline at end of file
diff --git a/830/CH3/EX3.2.9/Convolution_Property.sce b/830/CH3/EX3.2.9/Convolution_Property.sce
index 00a1328e2..7b2dfedc4 100755
--- a/830/CH3/EX3.2.9/Convolution_Property.sce
+++ b/830/CH3/EX3.2.9/Convolution_Property.sce
@@ -1,13 +1,16 @@
-//Graphical//
-//Example 3.2.9
-//Convolution Property Proof
-clear;
-clc;
-close;
-x1 = [1,-2,1];
-n1 = 0:length(x1)-1;
-X1 = ztransfer_new(x1,n1)
-x2 = [1,1,1,1,1,1];
-n2 = 0:length(x2)-1;
-X2 = ztransfer_new(x2,n2)
-X = X1.*X2
+//Graphical//
+//Example 3.2.9
+//Convolution Property Proof
+clear;
+clc;
+close;
+function [Ztransfer]= ztransfer_new (sequence,n)
+ z = poly (0, 'z' , 'r' ); Ztransfer = sequence *(1/z )^n'
+endfunction
+x1 = [1,-2,1];
+n1 = 0:length(x1)-1;
+X1 = ztransfer_new(x1,n1)
+x2 = [1,1,1,1,1,1];
+n2 = 0:length(x2)-1;
+X2 = ztransfer_new(x2,n2)
+X = X1.*X2 \ No newline at end of file