process_spectral_010 Subroutine

public subroutine process_spectral_010(div_u, waves, nx_spec, ny_spec, y_sp_st, nx, ny, nz, ax, bx, ay, by, az, bz)

Post-processes the divergence of velocity in spectral space, including scaling w.r.t. grid size.

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

complex(kind=dp), intent(in), device, dimension(:, :, :) :: waves

Spectral equivalence constants

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 :: y_sp_st

Offset in y direction in the permuted slabs 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(:) :: ay
real(kind=dp), intent(in), device, dimension(:) :: by
real(kind=dp), intent(in), device, dimension(:) :: az
real(kind=dp), intent(in), device, dimension(:) :: bz

Called by

proc~~process_spectral_010~2~~CalledByGraph proc~process_spectral_010~2 m_cuda_spectral::process_spectral_010 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~2