summaryrefslogtreecommitdiff
path: root/3557/CH18/EX18.5/Ex18_5.sce
diff options
context:
space:
mode:
Diffstat (limited to '3557/CH18/EX18.5/Ex18_5.sce')
-rw-r--r--3557/CH18/EX18.5/Ex18_5.sce7
1 files changed, 7 insertions, 0 deletions
diff --git a/3557/CH18/EX18.5/Ex18_5.sce b/3557/CH18/EX18.5/Ex18_5.sce
new file mode 100644
index 000000000..667dfa062
--- /dev/null
+++ b/3557/CH18/EX18.5/Ex18_5.sce
@@ -0,0 +1,7 @@
+//Example 18.5//
+
+a=18.4;// measured value of nickel ferrite
+ub=9.274*10^-24;//A m^2// ampere-meters square //Moment
+v=(0.833*10^-9);//m //meter // volume of unit cell
+Ms=(a*ub)/v^3
+mprintf("Ms = %e A/m",Ms)