summaryrefslogtreecommitdiff
path: root/1319/CH13/EX13.17/ii_17.sce
diff options
context:
space:
mode:
Diffstat (limited to '1319/CH13/EX13.17/ii_17.sce')
-rw-r--r--1319/CH13/EX13.17/ii_17.sce24
1 files changed, 24 insertions, 0 deletions
diff --git a/1319/CH13/EX13.17/ii_17.sce b/1319/CH13/EX13.17/ii_17.sce
new file mode 100644
index 000000000..35da213ba
--- /dev/null
+++ b/1319/CH13/EX13.17/ii_17.sce
@@ -0,0 +1,24 @@
+// Determining Hysteresis loss
+clc;
+clear;
+
+fluxmax=1.5;
+
+x=15/(10^-2);
+y=1;
+
+f=50;
+
+a=x*y;// loss for one centimetre square.
+
+area=0.6;// in centimetre square.
+
+hy_ls= area*a;
+
+vol=1500*(10^-6);
+
+hyls_cycle= vol*hy_ls;
+
+hyls_sec= hyls_cycle*f;
+
+disp('watts',hyls_sec,'The Hysteresis loss =')