summaryrefslogtreecommitdiff
path: root/1697/CH3/EX3.7/Exa3_7.sce
blob: 7227ca458af0ca9a515065a1dbc1d842e56ec0e2 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//Exa 3.7
clc;
clear;
close;
//given data :
D=30;//in m
k=0.55;//illumination efficiency
f=4;//in GHz
f=f*10^9;//in Hz
c=3*10^8;//speed of light in m/s
lambda=c/f;//in Meter
r=D/2;//in m
A=%pi*(r^2);//in m^2
G=(4*%pi/lambda^2)*k*A;//Unitless
disp(G,"Gain : ");
HPBW=70*lambda/D;//in Degree
disp(HPBW,"HPBW in Degree : ");
BWFN=2*70*lambda/D;//in Degree
disp(BWFN,"BWFN in Degree : ");