process_spectral_010_poisson Subroutine

public subroutine process_spectral_010_poisson(div_u, a_re, a_im, off, inc, nx_spec, n, nx, ny, nz)

Solve the Poisson equation at cell centres with non-perioic BC along y

Ref. JCP 228 (2009), 5989–6015, Sec 4

Arguments

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

Divergence of velocity in spectral space

real(kind=dp), intent(inout), device, dimension(:, :, :, :) :: a_re

Spectral equivalence constants

real(kind=dp), intent(inout), device, dimension(:, :, :, :) :: a_im

Spectral equivalence constants

integer, intent(in), value :: off

offset and increment. increment is 2 when considering only odd or even

integer, intent(in), value :: inc

offset and increment. increment is 2 when considering only odd or even

integer, intent(in), value :: nx_spec

Grid size in spectral space

integer, intent(in), value :: n

Grid size in spectral space

integer, intent(in), value :: nx

Grid size in spectral space

integer, intent(in), value :: ny

Grid size in spectral space

integer, intent(in), value :: nz

Grid size in spectral space


Called by

proc~~process_spectral_010_poisson~~CalledByGraph proc~process_spectral_010_poisson m_cuda_spectral::process_spectral_010_poisson proc~fft_postprocess_010_cuda m_cuda_poisson_fft::cuda_poisson_fft_t%fft_postprocess_010_cuda proc~fft_postprocess_010_cuda->proc~process_spectral_010_poisson