summaryrefslogtreecommitdiff
path: root/3281/CH4/EX4.14/ex4_14.sce
blob: 56fff5833568c6057b16902659796e41c1c5b447 (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
26
27
//Page Number: 216
//Example 4.14
clc;
//Given
p=40; //mW
//Since port 3 is matched
x=sqrt(2);
s=[1 1 x;1 1 -x;x -x 0];
r1=40; //ohm
r2=60; //ohm
w=50; //ohm

//Reflection coefficients
T1=(w-r1)/(w+r1);
T2=(r2-w)/(r2+w);

//As power is fed into 1 and 2 equally
pd=p/2;

//Power delivered
//Port 1
p1=pd*(1-T1^2);
disp('mW',p1,'Power at port 1:');

//Port2
p2=pd*(1-T2^2);
disp('mW',p2,'Power at port 2:');