summaryrefslogtreecommitdiff
path: root/1736/CH8/EX8.12/Ch08Ex12.sce
diff options
context:
space:
mode:
Diffstat (limited to '1736/CH8/EX8.12/Ch08Ex12.sce')
-rwxr-xr-x1736/CH8/EX8.12/Ch08Ex12.sce11
1 files changed, 11 insertions, 0 deletions
diff --git a/1736/CH8/EX8.12/Ch08Ex12.sce b/1736/CH8/EX8.12/Ch08Ex12.sce
new file mode 100755
index 000000000..96a1528a4
--- /dev/null
+++ b/1736/CH8/EX8.12/Ch08Ex12.sce
@@ -0,0 +1,11 @@
+// Scilab code Ex8.12 Page:264 (2006)
+clc; clear;
+mu = 9.27e-024; // Bohr's magneton, J/T
+N_up = 5; // Number of electrons with spin up as per Hunds Rule
+N_down = 1; // Number of electrons with spin down as per Hunds Rule
+M = mu*(N_up-N_down); // Net magnetic moment associated with six electrons in the 3d shell, J/T
+
+printf("\nThe magnetic moment of 3d electrons of Fe using Hunds rule = %d Bohr magnetons", M/mu);
+
+// Result
+// The magnetic moment of 3d electrons of Fe using Hunds rule = 4 Bohr magnetons