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

clear;
clc ;
close ;
syms n z a;

f1=a^n;
F1= symsum (f1*(z^(-n)),n ,0, %inf );

f2=a^n;
F2= symsum (f2*(z^(-n)),n ,1,%inf );
//Display the result in command window
F=F1-F2;            //linearity property
disp (F,"Z-transform of f(n) is:");
disp('ROC is the entire Z-domain ')