diff options
Diffstat (limited to '1319/CH13/EX13.17/ii_17.sce')
| -rw-r--r-- | 1319/CH13/EX13.17/ii_17.sce | 24 |
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 =')
|