summaryrefslogtreecommitdiff
path: root/52/CH5/EX5.12/Example5_12.sce
blob: f99a8d68060f1e0ee3d8124c5baa2687593feab1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
//Example 5.12
//MAXIMA SCILAB TOOLBOX REQUIRED FOR THIS PROGRAM
//To Design the Filter using Impulse Invarient Method
clear;
clc ;
close ;
s=%s;
HS=1/(s^2+sqrt(2)*s+1);
pp=ilaplace(HS);
syms n z;
t=1;
X= symsum (pp*(z^(-n)),n ,0, %inf );
disp(X,'Factorized HS = ');