671/CH11/EX11.13/11_13.sce


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


Xs=8
Ia=40
V=600
Vt=V/sqrt(3)
Ef=V

delta=acos((1-(Xs*Ia/V)^2+(Vt/V)^2)/2/Vt*V)
theta=-atan((cos(delta)-Vt/V)/sin(delta))
pf=cos(theta)
Pout=sqrt(3)*V*pf*Ia
disp(Pout)

theta=-theta
Pin=Pout
disp(Pout)