summaryrefslogtreecommitdiff
path: root/416/CH14/EX14.7/example14_7pp.sce
blob: 8159dc2422439e35c6ce084cca2593094fa44f16 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
clc
clear
disp('example 14.7')
p=100  //MVA of generated
f=50   //frequency
rpm=3000 //no load rpm
lad=25  //load applied to the machiene
t=0.5  //time delay 
h=4.5  //inertia constent
ke=h*p  //kinetic energy is product of h*p
lke=lad*t  //loss of ke
nf=(((ke-lke)/ke)^t)*f  //new frequency ((1-lke/ke)^t)*f
fd=(1-(nf/f))*100    //frequency deviation
printf("ke at no load %dMW-sec \n loss in k.e due to load %.1fMW-sec \nnew frequency %.1fHz \nfrequency deviation %.1fpercent",ke,lke,nf,fd)