503/CH8/EX8.34/ch8_34.sci


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

//to calculate value of syncpower

clc;
V=6600;
E=V/sqrt(3);

P=12;
dl=1*P/2;

r=20000*10^3;
I=r/(sqrt(3)*V);
Xs=1.65;

Psy=dl*(%pi/180)*E^2/Xs;
disp(Psy,'sync power(W)');