summaryrefslogtreecommitdiff
path: root/3717/CH6/EX6.7/Ex6_7.sce
blob: a66165f05028bf4575c99b1029e5ecd965c78793 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
// Ex6_7 Page:105 (2014)
clc;clear;
l = 1;    // Orbital angular momentum quantum number
m = [1, 0, -1];    // The possible z-components of l
printf("\nThe possible orientations of vector L with respect to the z-axis are:");
for i = 1:3
    theta = acosd(m(i)/sqrt(l*(l+1)));
    printf("\ntheta = %d degree (m = %d)", theta, m(i));
end

// Result 
// The possible orientations of vector L with respect to the z-axis are:
// theta = 45 degree (m = 1)
// theta = 90 degree (m = 0)
// theta = 135 degree (m = -1)