blob: 60d901059e5724c8f577951b1f30cc87fdd7e569 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
//clear//
//Caption:Program to find the input impedance for a line terminated with pure capacitive impedance
//Example11.9
//page363
clc;
close;
ZL = -%i*300; //load impdance is purely capacitive impedance
ZR = 300;
T = reflection_coeff(ZL,ZR);//reflection coefficient in rectandular form
[R,teta] = polar(T);//reflection coefficient in polar form
S = VSWR(R)
if(S ==%inf)
Zo = ZR;
end
Zin =Zo*(ZL*cos(EL)+%i*Zo*sin(EL))/(Zo*cos(EL)+%i*ZL*sin(EL));
disp(T,'Reflection coefficient in rectangular form')
disp(S,'Voltage Standing Wave Ratio S=')
disp(Zin,'Input impedance in ohms Zin =')
//Result
//Reflection coefficient in rectangular form
// - i
//Voltage Standing Wave Ratio S=
// Inf
//Input impedance in ohms Zin =
// 588.78315i
|
