process_spectral_110 Subroutine

public subroutine process_spectral_110(div_u, waves, n1, n2, n3, st1, st2, st3, nx, ny, nz, ax, bx, ay, by, az, bz)

Post-process div U* in spectral space, for non-periodic BC in both x- and y-directions (R2C Z-transpose layout: dim1 = Z r2c modes, dim2 = X modes, dim3 = Y modes).

Arguments

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

Divergence of velocity in spectral space, (nz/2+1, nx, ny) layout

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

Spectral equivalence constants, (nz/2+1, nx, ny) layout

integer, intent(in) :: n1

Local extents of div_u

integer, intent(in) :: n2

Local extents of div_u

integer, intent(in) :: n3

Local extents of div_u

integer, intent(in) :: st1

Offsets of the local block within the global spectral array

integer, intent(in) :: st2

Offsets of the local block within the global spectral array

integer, intent(in) :: st3

Offsets of the local block within the global spectral array

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

Calls

proc~~process_spectral_110~~CallsGraph proc~process_spectral_110 m_omp_spectral::process_spectral_110 proc~abort_run m_logger::abort_run proc~process_spectral_110->proc~abort_run proc~process_spectral_110_bw m_omp_spectral::process_spectral_110_bw proc~process_spectral_110->proc~process_spectral_110_bw proc~process_spectral_110_fw m_omp_spectral::process_spectral_110_fw proc~process_spectral_110->proc~process_spectral_110_fw proc~process_spectral_110_solve m_omp_spectral::process_spectral_110_solve proc~process_spectral_110->proc~process_spectral_110_solve interface~str m_logger::str proc~abort_run->interface~str mpi_abort mpi_abort proc~abort_run->mpi_abort mpi_barrier mpi_barrier proc~abort_run->mpi_barrier mpi_comm_rank mpi_comm_rank proc~abort_run->mpi_comm_rank mpi_comm_size mpi_comm_size proc~abort_run->mpi_comm_size mpi_finalized mpi_finalized proc~abort_run->mpi_finalized mpi_initialized mpi_initialized proc~abort_run->mpi_initialized

Called by

proc~~process_spectral_110~~CalledByGraph proc~process_spectral_110 m_omp_spectral::process_spectral_110 proc~fft_postprocess_110_omp m_omp_poisson_fft::omp_poisson_fft_t%fft_postprocess_110_omp proc~fft_postprocess_110_omp->proc~process_spectral_110