Wigner3j.m

Wigner3j(j1,j2,j,m1,m2,m) returns the Wigner 3j-symbol.

Wigner3j(j1,j2,j,m1,m2,m) returns the Wigner 3j-symbol, where j1, j2, j, m1, m2, and m are half-integers. Physically, the Wigner 3j-symbol is closely related to the Clebsch-Gordon coefficient <j1,j2,m1,m2|j1,j2,j,m>, the square of which is the probability that a system of two particles with angular momentum j1 and j2 respectively and z-component of angular momentum m1 and m2 respectively has total angular momentum j and z-component of total angular momentum m.

I haven't tested this function thoroughly yet, so there may be some bugs. Please let me know if you find any.