process_spectral_010_fw Subroutine

public subroutine process_spectral_010_fw(div_u, 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	Intent	Optional	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	::	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	Spectral equivalence constants
real(kind=dp),	intent(in),		device, dimension(:)	::	bx	Spectral equivalence constants
real(kind=dp),	intent(in),		device, dimension(:)	::	ay	Spectral equivalence constants
real(kind=dp),	intent(in),		device, dimension(:)	::	by	Spectral equivalence constants
real(kind=dp),	intent(in),		device, dimension(:)	::	az	Spectral equivalence constants
real(kind=dp),	intent(in),		device, dimension(:)	::	bz	Spectral equivalence constants

Called by

Help