summaryrefslogtreecommitdiff
path: root/1541/CH2/EX2.7/Chapter2_Example7.sce
blob: 70b876c21b9ab859e757dcf9d26579a0bf8a0da0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
//Chapter-2, Example 2.7, Page 2.12
//=============================================================================
clc
clear

//INPUT DATA
V1=200;//Primary voltage in V
V2=2000;//Secondary voltage in V
Io=7;//Primay no load current in A
Wo=180;//Primary no load power in W
R1=0.05;//Primary winding resistance in ohm

//CALCULATIONS
Fe=(Wo-(Io^2*R1));//Iron loss or core loss alone in W
cosq=(Wo/(V1*Io));//No load power factor
Iw=(Wo/V1);//Working component of current in A
Im=sqrt(Io^2-Iw^2);//Magnetising current in A

//OUTPUT
mprintf('(a)The core loss is %3.2f W\n(b)No load power factor is %3.3f lagging\n(c)Working component of current is %3.1f A\n(d)Magnetising current is %3.2f A',Fe,cosq,Iw,Im)

//=================================END OF PROGRAM==============================