summaryrefslogtreecommitdiff
path: root/1892/CH1/EX1.57/Example1_57.sce
blob: 2776d4e9b75e02b0a54b7a915641836534c687b5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
// Example 1.57

clear; clc; close;

format('v',7);
// Given data
VL=400;//in volt
Ist=1200;//in Ampere
Eff=0.85;//Efficiency
cosfi=0.8;//power factor
IstByIrated=5;//ratio
 
//Calculations
I2_rated=Ist/IstByIrated;//in Ampere
KWrating=sqrt(3)*VL*I2_rated*cosfi*Eff;//in KW
//To have star delta styarter tapping Xo=1/sqrt(3)
//Ist=X0^2*IstByIrated*IL
X0=1/sqrt(3);//tapping
IL=Ist/X0^2/IstByIrated;//in Ampere
KWmax=sqrt(3)*VL*IL*cosfi*Eff/1000;//in KW
disp(KWmax,"Maximum KW rating with star delta starter : ");