summaryrefslogtreecommitdiff
path: root/1616/CH2/EX2.17/ex2_17.sce
blob: 0e0c345e6fef6ea5da3db27d4fd6824923d9386c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
//ex2.17 find the impedence at a distance of 0.2lamda from the junction and VSWR

bl1=0.6*%pi;
bl2=0.4*%pi;
Z0=50;
ZL=75;
Z2=Z0*(ZL*cos(bl1)+%i*Z0*sin(bl1))/(Z0*cos(bl1)+%i*ZL*sin(bl1));
Z1=50;
Z=Z1*Z2/(Z1+Z2);
Zl2=Z0*(Z*cos(bl2)+%i*50*sin(bl2))/(50*cos(bl2)+%i*Z*sin(bl2));
T=abs((Z-Z0)/(Z+Z0));
VSWR=(1+T)/(1-T);
disp('VSWR on the line is = '+string(VSWR)+'','the impedence at a distance of 0.2lamda from the junction is = '+string(Zl2)+' ohm');