process_spectral_100_fw Subroutine

public subroutine process_spectral_100_fw(div_u, nx_spec, ny_spec, nx, ny, nz, ax, bx, az, bz)

Stage 1 (forward): normalisation followed by the dim3 and dim1 postprocess. Every mode is handled on its own here.

Arguments

Type IntentOptional Attributes Name
complex(kind=dp), intent(inout), device, dimension(:, :, :) :: div_u

Divergence of velocity in spectral space

integer, intent(in), value :: nx_spec

Grid size in spectral space

integer, intent(in), value :: ny_spec

Grid size in spectral space

integer, intent(in), value :: nx

Grid size

integer, intent(in), value :: ny

Grid size

integer, intent(in), value :: nz

Grid size

real(kind=dp), intent(in), device, dimension(:) :: ax
real(kind=dp), intent(in), device, dimension(:) :: bx
real(kind=dp), intent(in), device, dimension(:) :: az
real(kind=dp), intent(in), device, dimension(:) :: bz

Calls

proc~~process_spectral_100_fw~~CallsGraph proc~process_spectral_100_fw m_cuda_spectral::process_spectral_100_fw proc~postprocess_dim13_fw m_cuda_spectral::postprocess_dim13_fw proc~process_spectral_100_fw->proc~postprocess_dim13_fw

Called by

proc~~process_spectral_100_fw~~CalledByGraph proc~process_spectral_100_fw m_cuda_spectral::process_spectral_100_fw proc~fft_postprocess_100_cuda m_cuda_poisson_fft::cuda_poisson_fft_t%fft_postprocess_100_cuda proc~fft_postprocess_100_cuda->proc~process_spectral_100_fw