blob: baff7aee066f03439ea36c1d7d7d5eb547066d1b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
clc
//ex17.5
V_a=480; //phase voltage
f=60; //frequency
P_dev=200*746; //developed power
PF=0.85; //power factor
I_f_1=10; //field current
X_s=1.4; //synchronous resistance
phi=acos(PF);
I_a_1_max=P_dev/(3*V_a*PF); //phase current
I_a_1_phi=-phi;
I_a_1=I_a_1_max*complex(cos(-phi),sin(-phi));
E_r_1=V_a-%i*X_s*I_a_1; //rotor induced voltage
[E_r_1_max,E_r_1_phi]=polar(E_r_1);
//to achieve 100 percent power factor, increase I_a until it is in phase with V_a
I_a_2=P_dev/(3*V_a*cos(0));
E_r_2=V_a-%i*X_s*I_a_2;
[E_r_2_max,E_r_2_phi]=polar(E_r_2);
I_f_2=I_f_1*E_r_2_max/E_r_1_max; //magnitude of E_r proportional to field current
printf(" All the values in the textbook are approximated hence the values in this code differ from those of Textbook")
disp(I_f_2,'The new field current to achieve 100% power factor in amperes')
|