summaryrefslogtreecommitdiff
path: root/3281/CH4/EX4.13/ex4_13.sce
blob: 77b829fa76603128c30a3ded87c39e103a6988b8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
//Page Number: 215
//Example 4.13
clc;
//Given
p=100; //mW
//As 2 and 3 are matched terminals
x=1/2;
y=1/sqrt(2);
s=[x -x y;-x 0 y;y y 0];

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

//Port2
p2=p*s(2,1)^2;
disp('mW',p2,'Power at port 2:');

//Port 3
p3=p*s(3,1)^2;
disp('mW',p3,'Power at port 3:');