summaryrefslogtreecommitdiff
path: root/503/CH8/EX8.2/ch8_2.sci
blob: 0c7e3e9315996961349ce0d22d26b7271800d50a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
//to determine voltage regulation by mmf method

clc;
pf=0.85;
P=150*10^6;
V=13*1000;
Iarated=P/(sqrt(3)*pf*V);
If=750;
Ifocc=810;
B=acosd(pf);
Ff=sqrt((Ifocc+If*sind(B))^2+(If*cosd(B))^2);
Ef=16.3*1000;
vr=Ef/V-1;
disp(vr*100,'voltage regulation(%)');