blob: 3c42bcd89846f3ae9baf50f548fb9b799568039c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
//Exa 3.12
clc;
clear;
close;
//given data :
L=10;//in m
f=1.5;//in MHz
f=f*10^6;//in Hz
X=350;//in Ohm
Q=100;//Coil parameter
c=3*10^8;//speed of light in m/s
lambda=c/f;//in Meter
l_eff=2*L/2;//in m
Re=2*X/Q;//in Ohm
Rr=40*%pi^2*(l_eff/lambda)^2;//in hm
Gd=(3/2)*(lambda^2/(4*%pi));//unitless
ETA=Rr/(Rr+Re);//Efficiency unitless
Gp=Gd*ETA;////unitless
disp(ETA*100,"Antenna Efficiency in % : ");
disp(Gp,"Power gain : ");
//Note : Answer of Gp is wrong in the book.
|