summaryrefslogtreecommitdiff
path: root/671/CH4/EX4.47/4_47.sce
blob: b765ddb304a74426534cc2a1821699b28cc879c8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
V=10*%i
w=1000
R=2
L=2E-3
C=500E-6
Xl=w*L*%i
Xc=1/(w*C*%i)

Zeq=Xl+Xc+parallel(R,Xl)
disp(Zeq)

I=V/Z
Ir=I*Xl/(R+Xl)
Il2=I-Ir
Vl=I*Xl
Vc=I*Xc

disp(I,Ir,Il2,Vl,Vc)