1 files changed, 23 insertions, 0 deletions
diff --git a/2642/CH2/EX2.13/Ex2_13.sce b/2642/CH2/EX2.13/Ex2_13.sce
new file mode 100755
index 000000000..ee597f493
--- /dev/null
+++ b/2642/CH2/EX2.13/Ex2_13.sce
@@ -0,0 +1,23 @@
+// FUNDAMENTALS OF ELECTICAL MACHINES 
+// M.A.SALAM 
+// NAROSA PUBLISHING HOUSE 
+// SECOND EDITION
+
+// Chapter 2 : BESICS OF MAGNETIC CIRCUITS 
+// Example : 2.13
+clc;clear; // clears the console and command history 
+
+// Given data
+k_h = 110       // hysteresis co-efficient in J/m^3
+V_cvol = 0.005  // volume of the core in m^3
+B_m = 1.12      // flux density in T
+f = 60          // frequency in Hz
+n = 1.6
+
+// caclulations 
+P_h = k_h*V_cvol*B_m^n*f // hysteresis loss in W
+
+// display the result 
+disp("Example 2.13 solution");
+printf(" \n Hysteresis loss \n P_h = %.2f W \n", P_h);
+