summaryrefslogtreecommitdiff
path: root/52/CH1/EX1.64.a/Example1_64_a.sce
blob: 47bdcdf6ef4516181ef77b6bee1b20b98ed8798c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
//Example 1.64 (a)
//Program to Calculate Plot Magnitude and Phase Responce
clear;
clc ;
close ;
w=0:0.01:%pi;
H=1/(1-0.5*%e^(-%i*w));
//caluculation of Phase and Magnitude of H
[phase_H,m]=phasemag(H);
Hm=abs(H);
a=gca();
subplot(2,1,1);
a.y_location="origin";
plot2d(w/%pi,Hm);
xlabel('Frequency in Radians')
ylabel('abs(Hm)');
title('MAGNITUDE RESPONSE');
subplot(2,1,2);
a=gca();
a.x_location="origin";
a.y_location="origin";
plot2d(w/(2*%pi),phase_H);
xlabel('Frequency in Radians');
ylabel('<(H)');
title('PHASE RESPONSE');