init_parity_layouts Subroutine

public subroutine init_parity_layouts(naky, nlambda, negrid, nspec, nproc, iproc)

Setup the module level p_lo instance

Arguments

Type IntentOptional 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

Contents

Source Code


Source Code

  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