process_spectral_110_x_pair_fw Subroutine

public subroutine process_spectral_110_x_pair_fw(div_u, nz_h, nx, ny, x_sp_st, ax, bx)

Step 2 (forward): X paired even/odd split X is dim2 (thread i). Only i in [2, nx/2+1] executes. Writes to i and nx-i+2. Race-free (pair doesn't enter).

Arguments

Type IntentOptional Attributes Name
complex(kind=dp), intent(inout), device, dimension(:, :, :) :: div_u
integer, intent(in), value :: nz_h
integer, intent(in), value :: nx
integer, intent(in), value :: ny
integer, intent(in), value :: x_sp_st
real(kind=dp), intent(in), device, dimension(:) :: ax
real(kind=dp), intent(in), device, dimension(:) :: bx

Called by

proc~~process_spectral_110_x_pair_fw~~CalledByGraph proc~process_spectral_110_x_pair_fw m_cuda_spectral::process_spectral_110_x_pair_fw proc~fft_postprocess_110_cuda m_cuda_poisson_fft::cuda_poisson_fft_t%fft_postprocess_110_cuda proc~fft_postprocess_110_cuda->proc~process_spectral_110_x_pair_fw