blob: 7d8c949a9ee6e92c470499f0ae9da4563aa5aa97 (
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
|
function [x,y]=polar_to_cart(r,theta)
theta=theta/180*%pi
x=r*cos(theta)
y=r*sin(theta)
endfunction
[Vr,Vc]=polar_to_cart(231,60)
Van=complex(Vr,Vc)
Sp=(2.5-%i*1.2)*1000
omega=exp(%i*120/180*%pi)
Vbn=Van/omega
Vcn=Van*omega
Vbc=Vbn-Vcn
Ibc=conj(Sp/Vbc)
Ica=Ibc*omega
Iab=Ibc/omega
IaA=Ica-Iab
disp(IaA)
|
