init_g2le_redistribute_local Subroutine

  1. le_grids.f90
  2. le_grids
  3. init_g2le_redistribute_local

private subroutine init_g2le_redistribute_local()

Uses

Constructs the redistribute mapping from the global g_lo data decomposition to the le_lo decomposition.

Arguments

None

Contents

Source Code

init_g2le_redistribute_local

Source Code

  subroutine init_g2le_redistribute_local
    use mp, only: nproc, iproc
    use species, only: nspec
    use theta_grid, only: ntgrid
    use kt_grids, only: naky, ntheta0
    use gs2_layouts, only: init_le_layouts, g_lo, le_lo

    !Early exit if possible
    if (leinit) return
    leinit = .true.

    !Setup the le layout object (le_lo)
    call init_le_layouts (ntgrid, naky, ntheta0, nspec, nproc, iproc)

    call setup_g2le_redistribute_local(g_lo, le_lo, g2le)
  end subroutine init_g2le_redistribute_local