summaryrefslogtreecommitdiff
path: root/2219/CH10/EX10.3/Ex10_3.sce
blob: 7cf37dc6aad65d5ecf306820662f3c50595154ff (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
// Chapter 10 example 3
//------------------------------------------------------------------------------
clc;
clear;
Vr = 150
c  = 3*10^8
df1= 10^6;
// Given data
// fd   = (2*Vr)/lamda  = (2*Vr*f)/c
// for 'Vr' and 'c' as constant(for a given radial velocity,Vr is constant)
// fd   = K.f where 'f' is the operating frequency and K = (2*Vr)/c
// Therefore df = ± 1 Mhz around the center frequency
k = (2*Vr)/c
df_d = df1*k

// Output
mprintf('Doppler shift due to carrier frequency sweep = ±%d Hz',df_d);
//------------------------------------------------------------------------------