1 files changed, 9 insertions, 0 deletions
diff --git a/1367/CH14/EX14.2/14_2.sce b/1367/CH14/EX14.2/14_2.sce
new file mode 100755
index 000000000..4b3255fa4
--- /dev/null
+++ b/1367/CH14/EX14.2/14_2.sce
@@ -0,0 +1,9 @@
+//Estimate Hysteresis energy loss per unit volume
+//Ex:14.2
+clc;
+clear;
+close;
+w=80+80;//width of loop in A/m from graph
+h=0.15+.15;//height of loop in Wb/sqm
+a=w*h;//area of the loop in J
+disp(a,"Hysteresis energy loss per unit volume of magnetic material during one cycle (in J) = ");
+\ No newline at end of file