blob: 7a6b480209630dbe23d06400967f2a9c5b982817 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
//to find power angle,field current
clc;
j=sqrt(-1);
V=400;
Vt=V/sqrt(3);
pf=1;
Ia=50;
Xs=1.3;
Ef=Vt-j*Ia*Xs;
disp(-atand(imag(Ef)/real(Ef)),'power angle');
Pm=Vt*Ia*pf;
pff=.8;
Ia=Pm/(Vt*pff);
ang=acosd(pff);
Eff=sqrt((Vt*cosd(ang))^2+(Vt*sind(ang)+Ia*Xs)^2);
If=.9;
Iff=If*Eff/abs(Ef);
disp(Iff,'field current(A)');
|