summaryrefslogtreecommitdiff
path: root/3760/CH3/EX3.42/Ex3_42.sce
blob: 35e15d311c9096532ff81d492e2f15954a3370a1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
clc;
p=100; // KW rating of transformer
al=1; // ratio of core loss to ohmic loss
th=3; // heating time constant in hours
h=1; // duration in hour for which KVA rating has to be determined
disp('case a');
// constant losses are equal to variable losses
pn=p*sqrt(((1+al)/(1-exp(-h/th)))-al); 
printf('One hour rating is %f KW\n',pn);
disp('case b');
// consatant losses are neglected
al=0;  // ratio of core loss to ohmic loss
pn=p*sqrt(((1+al)/(1-exp(-h/th)))-al); 
printf('One hour rating is %f KW\n',pn);