diff options
Diffstat (limited to '758/CH9/EX9.5.a/Ex_9_5_a.sce')
-rwxr-xr-x | 758/CH9/EX9.5.a/Ex_9_5_a.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/758/CH9/EX9.5.a/Ex_9_5_a.sce b/758/CH9/EX9.5.a/Ex_9_5_a.sce new file mode 100755 index 000000000..d1d12b0a9 --- /dev/null +++ b/758/CH9/EX9.5.a/Ex_9_5_a.sce @@ -0,0 +1,12 @@ +//Example 9.5.a
+clc;clear;close;
+z=poly(0,'z');
+s=poly(0,'s');
+Hz=3*(2*z^2+5*z+4)/(2*z+1)/(z+2);
+H=pfss(Hz/z);
+for k=1:length(H)
+ H(k)=clean(H(k));
+ H1(k)=z*horner(H(k),z);
+end
+disp(Hz,'System Function H(z)=');
+disp(H1,'System Function for parallel realisation Hk(z)=');
\ No newline at end of file |