| D | fftsg3d.f | 400 subroutine cdft3d(n1max, n2max, n1, n2, n3, isgn, a, argument
402 integer n1max, n2max, n1, n2, n3, isgn, ip(0 : *), n local
416 subroutine rdft3d(n1max, n2max, n1, n2, n3, isgn, a, argument
418 integer n1max, n2max, n1, n2, n3, isgn, ip(0 : *), local
449 subroutine rdft3dsort(n1max, n2max, n1, n2, n3, isgn, a) argument
450 integer n1max, n2max, n1, n2, n3, isgn, n2h, n3h, j, k local
527 subroutine ddct3d(n1max, n2max, n1, n2, n3, isgn, a, argument
529 integer n1max, n2max, n1, n2, n3, isgn, ip(0 : *), local
551 subroutine ddst3d(n1max, n2max, n1, n2, n3, isgn, a, argument
553 integer n1max, n2max, n1, n2, n3, isgn, ip(0 : *), local
[all …]
|