process_spectral_110_norm_z Subroutine

public subroutine process_spectral_110_norm_z(div_u, nz_h, nx, ny, nz, az, bz)

Step 1 (forward): normalise + Z periodic post-process Z is dim1 (serial j loop), periodic R2C — no sign flip needed since j only goes to nz/2+1.

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 :: nz
real(kind=dp), intent(in), device, dimension(:) :: az
real(kind=dp), intent(in), device, dimension(:) :: bz

Called by

proc~~process_spectral_110_norm_z~~CalledByGraph proc~process_spectral_110_norm_z m_cuda_spectral::process_spectral_110_norm_z 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_norm_z