summaryrefslogtreecommitdiff
path: root/2441/CH5/EX5.15/Ex5_15.sce
blob: 70dcdecff2b0f24294fc882ab281209b5ca47be7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
//Example 5.15 
clc;clear;close;
format('v',6);
G=100;//MVA
f=50;//Hz
delL=50;//MW
Tc=0.4;//sec
H=5;///kWs/kVA
KE=G*1000*H;//kWs
delKE=delL*1000*Tc;////kWs///due to decrease in load
fnew=sqrt((KE+delKE)/KE) *f;//Hz
fdev=(fnew-f)/f*100;//%
disp(fnew,"New frequency(Hz)");
disp(fdev,"Frequency deviation(%)");