summaryrefslogtreecommitdiff
path: root/2414/CH17/EX17.5/Ex17_5.sce
blob: 01757e87d432e0aea9bcaa0df3bcbb44d6524de6 (plain)
1
2
3
4
5
6
7
8
9
10
11
clc;
close();
clear();
//page no 554
//prob no. 17.5
theta_3dB=.3;    // minimum practical beamwidth in degree
eta_1=.6;     //illumination efficiency 
G=eta_1*48000/(theta_3dB)^2;    //gain calculation
mprintf('The Gain is G= %.0f \n',G)
G_dB=10*log10(G);   //dB gain
mprintf('The Gain in dB is G(dB)= %.1f dB \n',G_dB)