summaryrefslogtreecommitdiff
path: root/752/CH14/EX14.2.1/14_2_1.sce
blob: f41cae94566ddae72aeba930a20a9412b2a249a7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
clc;
//page no 524
//prob no. 14.2.1
// A rectangular waveguide has a broad wall dimension as a=0.900 in. Therefore
a=2.286;//in cm
wl_c=2*a*10^-2;//in m
c=3*10^8;
wl=c/10^10;//in m
if(wl_c >wl)
    disp('i)TE10 wave will propogate');
else
    disp('i)TE10 wave will not propogate');
end
//determination of gide wl
wl_g=wl/(sqrt(1-(wl/wl_c)^2));
disp('cm',wl_g*10^2,'Guide wavelength is');
//determination of phase velocity
vp=c*wl_g/wl;
disp('m/s',vp,'Phase velocity is');
//determination of group velocity
vg=c*wl/wl_g;
disp('m/s',vg,'Group velocity is');