summaryrefslogtreecommitdiff
path: root/1445/CH7/EX7.40/ch7_ex_40.sce
blob: 12f74feccebdc7fe5a432c419dff4e516e641fe8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
//CHAPTER 7- SINGLE PHASE TRANSFORMER
//Example 40

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

//VARIABLE INITIALIZATION
loss=50;                       //core loss in Watts
I0=2;                          //no load current in Amperes
v0=220;                        //induced emf in Volts 
                             
//SOLUTION
pf=loss/(v0*I0);
I_c=I0*pf;                     //core loss component
I_phi=I0*sin(acos(pf));        //magnetizing component
disp(sprintf("The magnetizing component, I_c= %f A, is plotted along x-axis",I_phi));
disp(sprintf("& the core loss component, I_Φ= %f A, is plotted along y-axis",I_c));

//END