summaryrefslogtreecommitdiff
path: root/692/CH2/EX2.31/P2_31.sce
blob: f596eea0c6094a8823b6863589017699258dd7fb (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
//EXAMPLE 2.31, Stability for causal system.
//h[i]=impulse response of LTI system.
clear;
clc;
n= -5:0.001:5;
a=0.6;

for i=1:length(n)
    if (n(i)<0)
        h(i)=0;
    else
        h(i)=abs(a^n(i));
        
    end
end
S=sum(h);
if(S<%inf)
    disp('BIBO stable system');
else
    disp('BIBO unstable system');
    
end