summaryrefslogtreecommitdiff
path: root/1319/CH13/EX13.16/ii_16.sce
blob: 748f0f9313b9fc40800aed77add8ac0f191e83c2 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
//Compute Loss of energy

clc;
clear;

w=10;
f=50;// 50 cycles in a second.

ls_vol=250;

density=7.5;// Density in gm/cm^3

d= density*(10^6)/(10^3);

vol=w/d;

ls_cycle= ls_vol*vol;

ls_sec= ls_cycle*50;

ls_hr= ls_sec*3600;

disp('joules',ls_hr,'The Loss of energy per hour of an iron loop')