mathematica 直接计算C-G系数 6-j符号的命令吗?