summaryrefslogtreecommitdiff
path: root/503/CH8/EX8.31/ch8_31.sci
blob: b5eb73d87e976dd4c5558222979f19f195fad972 (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
//to calculate synchronising power and torque coeff/deg mech shift

clc;
V=11000;
Vt=V/sqrt(3);
P=6*10^6;
Ia=P/(sqrt(3)*V);
ohm_b=Vt/Ia;
Xs=.5;
Xss=Xs*ohm_b;

f=50;
P=8;
n_s=(120*f/P)*(2*%pi/60);

Ef=Vt;
dl=0;
Psyn=(%pi/15)*(Ef*Vt/Xss)*cosd(dl);disp(Psyn,'synchronising power(W)');
Tsyn=Psyn/n_s;disp(Tsyn,'torque coeff(Nm)');

pf=.8;
phi=acosd(pf);
Ef=Vt+j*Ia*Xss*complex(cosd(-phi),sind(-phi));
dl=atand(imag(Ef)/real(Ef));
Psyn=(%pi/15)*(abs(Ef)*Vt/Xss)*cosd(dl);disp(Psyn,'synchronising power(W)');
Tsyn=Psyn/n_s;disp(Tsyn,'torque coeff(Nm)');