diff options
Diffstat (limited to '3717/CH7/EX7.6')
-rw-r--r-- | 3717/CH7/EX7.6/Ex7_6.sce | 33 |
1 files changed, 33 insertions, 0 deletions
diff --git a/3717/CH7/EX7.6/Ex7_6.sce b/3717/CH7/EX7.6/Ex7_6.sce new file mode 100644 index 000000000..ab4186b33 --- /dev/null +++ b/3717/CH7/EX7.6/Ex7_6.sce @@ -0,0 +1,33 @@ +// Ex7_6 Page:126 (2014)
+clc;clear;
+l1 = 1; // Orbital angular momentum quantum number of first electron
+l2 = 2; // Orbital angular momentum quantum number of second electron
+s1 = 0.5; // Spin quantum number of first electron
+s2 = 0.5; // Spin quantum number of second electron
+L_max = l1 + l2;
+L_min = l2 - l1;
+S_max = s1 + s2;
+S_min = s1 - s2;
+printf("\nThe possible values of L, S and J are:");
+for L = L_max:-1:L_min
+ for S = S_max:-1:S_min
+ J_max = L + S; J_min = L - S;
+ printf("\nL = %d, S = %d, J = ", L, S);
+ for J = J_max:-1:J_min
+ if (J <> J_min) then
+ printf("%d, ", J);
+ else
+ printf("%d", J);
+ end
+ end
+ end
+end
+
+// Result
+// The possible values of L, S and J are:
+// L = 3, S = 1, J = 4, 3, 2
+// L = 3, S = 0, J = 3
+// L = 2, S = 1, J = 3, 2, 1
+// L = 2, S = 0, J = 2
+// L = 1, S = 1, J = 2, 1, 0
+// L = 1, S = 0, J = 1
|