summaryrefslogtreecommitdiff
path: root/1949/CH6/EX6.15/Ex6_15.sce
blob: 33bd2bdda4a097e360d9d50f4103a0843b389db8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
//Chapter-6,Example 6_15,Page 6-33
clc()

//Given Values:
A=0.5*10^3            //Area of B-H loop in Joules per m^3
V=10^-3               //Volume of specimen in m^3
n=50                  //Frequency of a.c.

//Calculations:
H=n*V*A               //Hysteresis power loss

printf('Hysteresis power loss is =%.0f Watt \n',H)