summaryrefslogtreecommitdiff
path: root/1445/CH7/EX7.20/ch7_ex_20.sce
blob: 44a1e8bcd3b2c2a6832ec18bcf3090c3bd01479d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
//CHAPTER 7- SINGLE PHASE TRANSFORMER
//Example 20

disp("CHAPTER 7");
disp("EXAMPLE 20");

//VARIABLE INITIALIZATION
va=4000;                            //apparent power
v1=200;                             //primary voltage in Volts
v2=400;                             //secondary voltage in Volts
f=50;
R_e1=0.15;
Pi=60;                              //core losses iron core
pf1=0.9;
pf2=0.8;

//SOLUTION  
R_e2=(v2/v1)^2*R_e1;
I1=va/v1;
I2=va/v2;
Pcu=I2^2*R_e2;                      //cu losses
disp("SOLUTION (i)");
disp(sprintf("The value of Copper Losses at full load is %f W",Pcu)); 
//
Pout=va*pf1;
Pin=Pout+Pi+Pcu;
eff=Pout*100/Pin;
disp("SOLUTION (ii)");
disp(sprintf("The percent efficiency at full load %f PF is %f",pf1,eff)); 
//
//at half load
Pout=va*pf2/2;
Pin=Pout+Pi+Pcu*(1/2)^2;
eff=Pout*100/Pin;
disp("SOLUTION (ii)");
disp(sprintf("The percent efficiency at full load %f PF is %f",pf2,eff)); 
  
disp(" "); 
// 
//END