blob: 9e8186c4016f2220123d09b25d6b0d859b243413 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
//Rated Power Pr, Synchronous reactance Xs, Armature resistance Ra
//Power factor Pf
close();
clear;
clc;
Pr = 10000;//VA
V = 230;//V
Xs = 1.2;//ohm per phase
Ra = 0.5;//ohm
Pf = 0.8;//lagging
Vt = V/sqrt(3);
theta = acos(Pf);
Ia = (Pr/3)/Vt;
Zs = Ra + %i*Xs;
theta = atan(imag(Zs),real(Zs));
phi = acos(-polar(Ia*Zs)^2/(2*polar(Ia*Zs)*Vt)) - theta;
Pf2 = cos(phi);
mprintf('Power factor for zero regulation = %0.3f leading',Pf2);
|