From f35ea80659b6a49d1bb2ce1d7d002583f3f40947 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:38:01 +0530
Subject: updated the code

---
 830/CH3/EX3.2.3/Time_Shifting_Property.sce | 33 ++++++++++++++++--------------
 1 file changed, 18 insertions(+), 15 deletions(-)

(limited to '830/CH3/EX3.2.3')

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
-- 
cgit