summaryrefslogtreecommitdiff
path: root/2681/CH8/EX8.11/Ex8_11.sce
blob: e9c44d8a94e5e9f95cb023850509da75af41099e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
//half power radiation pattern and beamwidth between first null
//given
clc
Da=12//metre
f=10d+9//hertz
v=3d+8//m/s
lemda=v/f//metre
ie=0.6//illumination efficiency
gp=ie*(Da/lemda)^2//gain pattern
gp_decibles=10*log10(gp)//changing to db
gp_decibles=round(gp_decibles*100)/100///rounding off decimals
disp(gp_decibles,'the power gain in decibles')//degree,db