3812/CH8/EX8.1.c/8_1_c.sce


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

//determine the nyquist rate
//example 8_1<c>
clc;
clear all;
//x(t)=1+cos(200*pi*t)+sin(400*pi*t)
wq=200;
wp=400;
wf=0;
if wp>=wq then
wf=wp;
else
wf=wq;
end
F1=wf/2;
Fs=2*F1;
disp('Nyquist Rate=');
disp(Fs);