summaryrefslogtreecommitdiff
path: root/2303/CH4/EX4.2/4_2.sce
blob: e409d2a06564dfdb0daa9ec7429cf9ce9334cc51 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//Example 4.2
//MAXIMA SCILAB TOOLBOX REQUIRED FOR THIS PROGRAM

clear;
clc ;
close ;
syms n z a;
f =e^(-n*a*T);
F= symsum (f*(z^(-n)),n ,0, %inf );

//Display the result in command window
disp (F,"Z-transform of e^(-a*n*T)u(n) is:");
disp('ROC is the Region mod(z) > mod(e^(-a*T))');
disp('Case 1: a is real     ');
disp('ROC is the Region mod(z) > e^(-a*T)');
disp('Case 2: a is imaginary     ');
disp('ROC is the Region mod(z) > 1');