summaryrefslogtreecommitdiff
path: root/1892/CH1/EX1.72/Example1_72.sce
blob: 31788b459de6344b5ec365df02be3205c664a477 (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
28
// Example  1.72

clc;clear;close;

// Given data
format('v',6);
V=500;//in Volt
f1=50;//in Hz
phase=3;//no. of phase
P=6;//no. of poles
Nr=995;//in rpm
Pm=20;//mech power in KW
StatorLoss=1500;//in watts
pf=0.87;//power facator

//calculations
Ns=f1*120/P;//in rpm
S=(Ns-Nr)/Ns;//slip
disp(S,"(a) Slip is : ");
Prc=S/(1-S)*Pm*1000;//in watts
disp(Prc,"(b) Rotor I^2*R Loss in watts : ");
RotorInput=Prc/S;//in watts
TotalInput=RotorInput+StatorLoss;//in watts
disp(TotalInput/1000,"(c) Total input in KW : ");
LineCurrent=TotalInput/sqrt(3)/V/pf;//in Ampere
disp(LineCurrent,"(d) Line current in Ampere : ")
fr=S*f1;//in Hz
disp(fr,"Rotor frequency in HZ : ");