Wigner3j.m
Wigner3j(j1,j2,j,m1,m2,m) returns the Wigner 3j-symbol.
Author: David Terr
Still, the file does not check if the condition m1 + m2 = m3 is fulfilled. This should still be added!! In the current version it's very problematic to use the code! False results e.g. for angular momentum couplings are inevitable with this code.
