Setup the module level p_lo instance
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | naky | |||
integer, | intent(in) | :: | nlambda | |||
integer, | intent(in) | :: | negrid | |||
integer, | intent(in) | :: | nspec | |||
integer, | intent(in) | :: | nproc | |||
integer, | intent(in) | :: | iproc |
subroutine init_parity_layouts &
(naky, nlambda, negrid, nspec, nproc, iproc)
implicit none
integer, intent (in) :: naky, nlambda, negrid, nspec, nproc, iproc
if (initialized_parity_layouts) return
initialized_parity_layouts = .true.
p_lo = setup_parity_layouts(naky, nlambda, negrid, nspec, nproc, iproc)
end subroutine init_parity_layouts