summaryrefslogtreecommitdiff
path: root/2123/CH4/EX4.9/Exa_4_9.sce
blob: 1565690fb785b6fdef32f67f706b19b4a8c8d336 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
//Example No. 4.9
clc;
clear;
close;
format('v',7);

//Given Data : 
T=80;//min
Tdash=110;//min
Rating=50;//KW
ts=15;//min
S=sqrt(1/(1-exp(-ts/T)));
ShortTimeRating=S*Rating;//KW
disp(ShortTimeRating,"Short time rating of motor in KW : ");
t_off=20;//min
S=sqrt((1-exp(-(ts/T+t_off/Tdash)))/(1-exp(-(ts/T))))
DutyRating=S*Rating;//KW
disp(DutyRating,"Intermittent periodic duty rating in KW : ");