blob: 6aacc272b03d342b63dfb89111fdbe43d8ccd9ef (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
//Page Number: 652
//Example 12.7
clc;
//Given
Zl=25+25*%i; //ohm
Z0=50; //ohm
T=(Zl-Z0)/(Zl+Z0);
p=sqrt((real(T))^2+(imag(T))^2);
disp(p,'Reflection coefficient:');
vswrr=(1+p)/(1-p);
disp(vswrr,'VSWR:');
//Fraction of power delivered
Pd=1-(p^2);
Pdp=Pd*100;
disp('%',Pdp,'Fraction of power delivered:');
|
