671/CH6/EX6.10/6_10.sce


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

omega=exp(%i*120/180*%pi)

Zp=17.32+%i*10
Vab=400
Iab=Vab/Zp
Ica=Iab/omega
IAa=Iab-Ica
IBb=IAa/omega
ICc=IAa*omega
disp(ICc,IBb,IAa)

Pab=(norm(Iab)^2)*real(Zp)
Ptotal=3*Pab
disp(Ptotal)

Itotal=IAa+IBb+ICc
disp(Itotal)