ie_idx_lz Function

private elemental function ie_idx_lz(lo, i)

FIXME : Add documentation

Arguments

Type IntentOptional Attributes Name
type(lz_layout_type), intent(in) :: lo
integer, intent(in) :: i

Return Value integer


Contents

Source Code

ie_idx_lz

Source Code

  elemental integer function ie_idx_lz (lo, i)
    implicit none
    type (lz_layout_type), intent (in) :: lo
    integer, intent (in) :: i
    ie_idx_lz = 1 + mod((i - lo%llim_world)/lo%ie_comp, lo%negrid)
  end function ie_idx_lz