summaryrefslogtreecommitdiff
path: root/3871/CH13/EX13.15/Ex13_15.sce
blob: a8dd818cddbc4085d033c3cfec301dde9465648a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//=====================================================================================
//Chapter 13 example 15
clc;
clear all;

//variable declaration
A	= 0.5;
B	= 0.01;
f	= 50;
n	= 10;

//calculations
Pe	= B*(f^2);		//eddy current loss at 50 Hz in W
Pe1	= Pe/n;		//eddy current loss per kg at 50 Hz in watts

//result
mprintf("eddy current loss per kg at 50 Hz = %3.2f watts",Pe1);