process_spectral_010 Subroutine

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

Post-process div U* in spectral space, for non-periodic BC in y-dir.

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

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(inout),		dimension(:, :, :)	::	div_u	Divergence of velocity in spectral space
complex(kind=dp),	intent(in),		dimension(:, :, :)	::	waves	Spectral equivalence constants
integer,	intent(in)			::	nx_spec	Grid size in spectral space
integer,	intent(in)			::	ny_spec	Grid size in spectral space
integer,	intent(in)			::	nz_spec	Grid size in spectral space
integer,	intent(in)			::	x_sp_st	Offsets in the permuted pencils in spectral space
integer,	intent(in)			::	y_sp_st	Offsets in the permuted pencils in spectral space
integer,	intent(in)			::	z_sp_st	Offsets in the permuted pencils in spectral space
integer,	intent(in)			::	nx	Global cell size
integer,	intent(in)			::	ny	Global cell size
integer,	intent(in)			::	nz	Global cell size
real(kind=dp),	intent(in),		dimension(:)	::	ax
real(kind=dp),	intent(in),		dimension(:)	::	bx
real(kind=dp),	intent(in),		dimension(:)	::	ay
real(kind=dp),	intent(in),		dimension(:)	::	by
real(kind=dp),	intent(in),		dimension(:)	::	az
real(kind=dp),	intent(in),		dimension(:)	::	bz

Called by

Help