summaryrefslogtreecommitdiff
path: root/605/CH8/EX8.19/8_19.sce
blob: 851438e1094096cc0bba872ca008385680d8626d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

Zo1=50
Zo2=50
Vs1=1
Vs2=1
Z1=%i*50+50*(-%i*25)/(50-%i*25)
S11=(Z1-Zo1)/(Z1+Zo1)
Z2=(50+%i*50)*(-%i*25)/(50+%i*50-25*%i)
S22=(Z2-Zo2)/(Z2+Zo2)
V2=(10-%i*20)/(50+%i*50+10-%i*20)*Vs1
S21=2*V2/Vs1
V2=(10-%i*30)/(50+10-%i*30)*Vs2
V1=50/(50+%i*50)*V2
S12=2*V1/Vs2
A=[S11,S12;S21,S22]
disp(A,"A=")