summaryrefslogtreecommitdiff
path: root/2219/CH7/EX7.1/Ex7_1.sce
blob: ad9312af4c7c07f4ed63ead79845fb8b7071ff18 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
// chapter 7 example 1
//-----------------------------------------------------------------------------
clc;
clear;
// given data
Ldipole    = 50;        // Length of dipole in cm
c          = 3*10^10;   // velocity of EM wave in cm/s
BW         = 10*10^6;   // bandwidth in Hz

// Calculations
lamda      = 2*Ldipole;     // wavelength in cm
fo         = c/lamda;       // operating frequency in Hz
Q          = fo/BW          // quality factor

// Output
mprintf('Q = %d',Q);
//------------------------------------------------------------------------------