summaryrefslogtreecommitdiff
path: root/3871/CH13/EX13.14/Ex13_14.sce
blob: 71df4d8d584066d0f0a02f662e457932fa69b13a (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
//=====================================================================================
//Chapter 13 example 14

clc;
clear all;

//variable declaration
//Ph	= A*f
//Pe	= B*f^2
//Pi	= Ph+Pe
Pi	= 17.2;		//power in W
f	= 50;		//frequency in Hz
Pi1	= 28.9;		//iron loss in W

m       = 13;       //weight in kg

//calculations
//17.2	= 40*A+((40)^2)*B
//28.9	= 60*A+((60)^2)*B
A	= 0.326667
B	= 0.002583
Ph	= (A*f)/m		//hysteresis loss per kg in W
Pe	= (B*(f^2))/m	//eddy current loss per kg in W

//result
mprintf("hysteresis loss per kg = %3.2f W",Ph);
mprintf("\neddy current loss per kg = %3.3f W",Pe);