1 files changed, 17 insertions, 0 deletions
diff --git a/2444/CH3/EX3.1/ex3_1.sce b/2444/CH3/EX3.1/ex3_1.sce
new file mode 100755
index 000000000..28f8705a3
--- /dev/null
+++ b/2444/CH3/EX3.1/ex3_1.sce
@@ -0,0 +1,17 @@
+// Exa 3.1
+clc;
+clear;
+close;
+format('v',7)
+// Given data
+x = 1000;// in AT/m assumed
+y = 0.2;// in T assumed
+a = 9.3;// area in cm^2 
+// Hysteresis loss/m^3/cycle
+H = a*x*y;// in J/m^3/cycle
+disp(H,"Hysteresis loss per cubic meter per cycle in J/m^3/cycle is");
+f = 50;// in Hz
+// Hystersis loss per cubic meter at a frequency of 50Hz 
+h = H*f;// in W
+h = h * 10^-3;// in kW
+disp(h,"Hystersis loss per cubic meter at a frequency of 50Hz in kW is");