summaryrefslogtreecommitdiff
path: root/3760/CH1/EX1.46/Ex1_46.sce
blob: a68bd686ab225fe15a00d16b6a1ed865c001f29d (plain)
1
2
3
4
5
6
7
8
clc;
r1=9 ; // ratio of reactance to resistance for transformer 1 
r2=3 ; // ratio of reactance to resistance for transformer 2
d=atand(r1)-atand(r2); // differene between angles of transformer's leakage impedance
// leakage impedance of both transformers are equal z1=z2, threefore currents in both transformers are equal that is i1=i2;
I=1/cos((d/2)*(%pi/180)); // ratio of numerical sum of i1 and i2 to phasor sum of i1 and i2
k=cos((d/2)*(%pi/180));
printf('ratio of full load KVA delivered to sum of both transformers KVA ratings is %f',k);