计算3j符号和6j符号的程序

用基本FORTRAN算法语言,编写了计算3j和6j符号的程序。计算结果可用素数幂表示,也可用实型数表示。计算3j符号的目标程序占6976个内存单元,计算6j符号的目标程序占6848个单元。在运算速度约为5万次/秒的441B—Ⅲ型机上,计算一个投影量子数均为零的3j符号值需要时间不到1秒,计算1个一般3j符号值大约需要2秒,计算一个6j符号值大约需要4秒。