summaryrefslogtreecommitdiff
path: root/2345/CH15/EX15.21/Ex15_21.sce
diff options
context:
space:
mode:
Diffstat (limited to '2345/CH15/EX15.21/Ex15_21.sce')
-rwxr-xr-x2345/CH15/EX15.21/Ex15_21.sce12
1 files changed, 12 insertions, 0 deletions
diff --git a/2345/CH15/EX15.21/Ex15_21.sce b/2345/CH15/EX15.21/Ex15_21.sce
new file mode 100755
index 000000000..6342c129a
--- /dev/null
+++ b/2345/CH15/EX15.21/Ex15_21.sce
@@ -0,0 +1,12 @@
+//Finding loss
+//Example 15.21(pg. 407)
+clc
+clear
+A=30//area of hysteresis material in cm^2
+s1=0.4//scale is 1cm=0.4Wb/m^2
+s2=400// and 1cm=400AT/m
+V=1.2*(10^-3)
+f=50//frequency in Hz
+H=A*s1*s2//hysteresis loss/m^3/cycle in joules
+Hp=H*V*f//hysteresis power loss in Watts
+printf('Thus hysteresis power loss is %3.2f Watts',Hp)