Lines Matching refs:yzp
512 SUBROUTINE fft3d_ps(fsign, n, cin, gin, gs_group, rs_group, yzp, nyzray, & argument
521 INTEGER, DIMENSION(:, :, 0:), INTENT(IN) :: yzp local
708 CALL xz_to_yz(pbuf, rs_group, r_dim, g_pos, p2p, yzp, nyzray, &
761 CALL yz_to_xz(pbuf, rs_group, r_dim, g_pos, p2p, yzp, nyzray, &
862 CALL yz_to_x(tbuf, gs_group, g_pos, p2p, yzp, nyzray, &
909 CALL x_to_yz(sbuf, gs_group, g_pos, p2p, yzp, nyzray, &
1388 SUBROUTINE x_to_yz(sb, group, my_pos, p2p, yzp, nray, bo, tb, fft_scratch) argument
1393 INTEGER, DIMENSION(:, :, 0:), INTENT(IN) :: yzp local
1463 iy = yzp(1, ir, ip)
1464 iz = yzp(2, ir, ip)
1469 iy = yzp(1, ir, ip)
1470 iz = yzp(2, ir, ip)
1497 SUBROUTINE yz_to_x(tb, group, my_pos, p2p, yzp, nray, bo, sb, fft_scratch) argument
1502 INTEGER, DIMENSION(:, :, 0:), INTENT(IN) :: yzp local
1543 iy = yzp(1, ir, ip)
1544 iz = yzp(2, ir, ip)
1549 iy = yzp(1, ir, ip)
1550 iz = yzp(2, ir, ip)
1607 SUBROUTINE yz_to_xz(sb, group, dims, my_pos, p2p, yzp, nray, bo, tb, fft_scratch) argument
1614 INTEGER, DIMENSION(:, :, 0:), INTENT(IN) :: yzp local
1674 jy = yzp(1, ir, my_pos)
1675 jz = yzp(2, ir, my_pos)
1681 jy = yzp(1, ir, my_pos)
1682 jz = yzp(2, ir, my_pos)
1732 jz = yzp(2, ir, my_pos)
1735 jy = yzp(1, ir, my_pos)
1774 jz = yzp(2, ir, ip)
1778 jy = yzp(1, ir, ip)
1785 jy = yzp(1, ir, ip)
1815 SUBROUTINE xz_to_yz(sb, group, dims, my_pos, p2p, yzp, nray, bo, tb, fft_scratch) argument
1822 INTEGER, DIMENSION(:, :, 0:), INTENT(IN) :: yzp local
1878 jy = yzp(1, ir, my_pos)
1879 jz = yzp(2, ir, my_pos)
1932 jz = yzp(2, ir, ip)
1935 jy = yzp(1, ir, ip)
1936 jz = yzp(2, ir, ip) - bo(1, 3, mp) + 1
1974 jz = yzp(2, ir, my_pos)
1977 jy = yzp(1, ir, my_pos)