diff options
Diffstat (limited to '3669/CH7/EX7.6/6.sce')
-rw-r--r-- | 3669/CH7/EX7.6/6.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/3669/CH7/EX7.6/6.sce b/3669/CH7/EX7.6/6.sce new file mode 100644 index 000000000..0a4c65bec --- /dev/null +++ b/3669/CH7/EX7.6/6.sce @@ -0,0 +1,14 @@ +
+//Variable declaration
+mew0=4*%pi*10**-7;
+B=0.0044; //flux density(Wb/m**2)
+M=3300; //magnetic moment(A/m)
+
+//Calculation
+H=(B/mew0)-M; //magnetizing force(A/m)
+mewr=1+(M/H); //relative permeability
+
+//Result
+printf('magnetizing force is %0.3f A/m \n',int(H))
+printf('relative permeability is %0.3f \n',(mewr))
+printf('answer varies due to approximating off errors\n')
\ No newline at end of file |