diff options
Diffstat (limited to '3871/CH13/EX13.15/Ex13_15.sce')
| -rw-r--r-- | 3871/CH13/EX13.15/Ex13_15.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/3871/CH13/EX13.15/Ex13_15.sce b/3871/CH13/EX13.15/Ex13_15.sce new file mode 100644 index 000000000..a8dd818cd --- /dev/null +++ b/3871/CH13/EX13.15/Ex13_15.sce @@ -0,0 +1,17 @@ +//=====================================================================================
+//Chapter 13 example 15
+clc;
+clear all;
+
+//variable declaration
+A = 0.5;
+B = 0.01;
+f = 50;
+n = 10;
+
+//calculations
+Pe = B*(f^2); //eddy current loss at 50 Hz in W
+Pe1 = Pe/n; //eddy current loss per kg at 50 Hz in watts
+
+//result
+mprintf("eddy current loss per kg at 50 Hz = %3.2f watts",Pe1);
|