summaryrefslogtreecommitdiff
path: root/773/CH18/EX18.08.01
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:38:01 +0530
committerprashantsinalkar2017-10-10 12:38:01 +0530
commitf35ea80659b6a49d1bb2ce1d7d002583f3f40947 (patch)
treeeb72842d800ac1233e9d890e020eac5fd41b0b1b /773/CH18/EX18.08.01
parent7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (diff)
downloadScilab-TBC-Uploads-f35ea80659b6a49d1bb2ce1d7d002583f3f40947.tar.gz
Scilab-TBC-Uploads-f35ea80659b6a49d1bb2ce1d7d002583f3f40947.tar.bz2
Scilab-TBC-Uploads-f35ea80659b6a49d1bb2ce1d7d002583f3f40947.zip
updated the code
Diffstat (limited to '773/CH18/EX18.08.01')
-rwxr-xr-x773/CH18/EX18.08.01/18_08_01.sci12
1 files changed, 7 insertions, 5 deletions
diff --git a/773/CH18/EX18.08.01/18_08_01.sci b/773/CH18/EX18.08.01/18_08_01.sci
index 3a33aec94..2bdf13a3d 100755
--- a/773/CH18/EX18.08.01/18_08_01.sci
+++ b/773/CH18/EX18.08.01/18_08_01.sci
@@ -1,5 +1,7 @@
-//symsum//
-exec ztransfer.sce;
-sequence=[0 2 0 0 -3 0 0 8]
-y=ztransfer(sequence);
-disp(y,"ans=")
+//symsum//
+ function [Ztransfer]= ztransfer_new (sequence,n)
+ z = poly (0, 'z' , 'r' ); Ztransfer = sequence *(1/z )^n'
+endfunction
+sequence=[0 2 0 0 -3 0 0 8]
+y=ztransfer(sequence);
+disp(y,"ans=") \ No newline at end of file