blob: 2cda07ab31da2c3f0480274cf874801990d52c40 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
clc
//code uses usedefined function
function s=complexstring(a)
if imag(a)>=0 then
s=sprintf('%g+%gi',real(a),imag(a))
else
s=sprintf('%g%gi',real(a),imag(a))
end
funcprot(0)
endfunction
pf=0.8 //power factor of full load
I2=1 //magnitude of load current in amperes in per unit system
I2pu=I2*exp(%i*(-1)*acos(pf))//-1 comes due to lagging power factor
disp('I2pu='+complexstring(I2pu)+'A')
pres=2 //percent resistance in ohms
preact=5 //percent reactance in ohms
Zeqpu=(pres/100)+(%i*(preact/100))
disp('Zeqpu='+complexstring(Zeqpu)+'Ω')
V1pu=1+(I2pu*Zeqpu)
disp('V1pu='+complexstring(V1pu)+'V')
Regulation=abs(V1pu)-1
mprintf("|V1pu|-1=%f\n",Regulation)
|
