summaryrefslogtreecommitdiff
path: root/1748/CH2/EX2.16.p/problem2_16.sce
blob: 3a35636d2dac0852e37a239579abfbed3a5d85ba (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
//problem 2.16
clc;
clear;
close;
//given data :
format('v',6);
Eff=0.8;//unitless
Load=20;//in HP
Load=Load*735.5;//in watts
//IronLoss=K;//assumed
//MechLoss=K/3;
//RotorCuLoss=StatorCuLoss=IronLoss=K;
//TotLoss=K+K+K+K/3=10*K/3;//
Input=Load/Eff;//in watts
TotLoss=Input-Load;//in watts
K=TotLoss*3/10;//in watts
IronLoss=K;//in watts
StatorCuLoss=K;//in watts
RotorCuLoss=K;//in watts
MechLoss=K/3;//in watts
RotInput=Load+MechLoss+RotorCuLoss;//in watts
//Formula : RotorCuLoss=S*RotInput
S=RotorCuLoss/RotInput;//unitless
disp(S,"Slip is : ");