summaryrefslogtreecommitdiff
path: root/3871/CH13/EX13.12/Ex13_12.sce
blob: 8c5da438c39cf0ae97e3f483c584533afee0dd40 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
//=====================================================================================
//Chapter 13 example 12

clc;clear all;

//variable declaration
f    = 50;          //number of reversals
m    = 1;           //mass 
d    = 7.8*10**3;           //density 
A    = 4800;                //area of the loop m^3
x    = 200;                 //in AT/m
x1    = 10;                 // 1 unit in mm
y1    = 10;                 // 1 unit in mm
y    = 0.1;                 //in T

//claculations
V    = m/d;             //volume of magnetic material in m^3
l    = A*(x/x1)*(y/y1);
l1   = l*V*f;               //hysteresis loss in watts per kg at 50 Hz

//result
mprintf("hysteresis loss at 50 Hz = %3.3f  watts per kg ",l1);