summaryrefslogtreecommitdiff
path: root/2219/CH3/EX3.16/Ex3_16.sce
blob: 6e2aa3e0a9d09687c3beca9689e496cbd6190139 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
// Chapter 3 example 16
//------------------------------------------------------------------------------
clc;
clear;
// Given data
a   = 7.2       ;    // width of waveguide in cm
b   = 3.4;          // narrow dimension of waveguide in cm
c   = 3*10^10;       // free space velocity of EM wave in cm/s
f   = 2.4*10^9;     // frequency in Hz

// Calculation
lamda   = c/f       // free space wavelength in cm
lamda_c = 2*a       // cutoff wavelength in cm
lamda_g = lamda/sqrt(1 - (lamda/lamda_c)^2); // guide wavelength in cm
vp      = (lamda_g * c)/lamda                // phase velocity in cm/s
vg      = c^2/vp;                            // group velocity in cm/s

// Output
mprintf('Group velocity = %3.1e cm/s\n Phase Velocity = %3.1e cm/s',vg,vp);
//------------------------------------------------------------------------------