Skip to content

Commit

Permalink
Fixes #2304. Changed the index flag to ESMF_INDEX_DELOCAL
Browse files Browse the repository at this point in the history
  • Loading branch information
Atanas Trayanov authored and Atanas Trayanov committed Aug 9, 2023
1 parent 6001603 commit 181bc51
Show file tree
Hide file tree
Showing 2 changed files with 7 additions and 2 deletions.
1 change: 1 addition & 0 deletions CHANGELOG.md
Original file line number Diff line number Diff line change
Expand Up @@ -15,6 +15,7 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0

### Changed

- Modified tilegrid creation to use index flag ESMF_INDEX_DELOCAL instead of ESMF_INDEX_USER
- Renamed "geom" subdir and library to "field_utils"

### Fixed
Expand Down
8 changes: 6 additions & 2 deletions base/MAPL_LocStreamMod.F90
Original file line number Diff line number Diff line change
Expand Up @@ -1541,6 +1541,9 @@ subroutine MAPL_LocStreamAttachGrid(LocStream, GRID, ISMINE, RC)
JM_WORLD = DIMS(2)

_ASSERT(IM_WORLD==TILING%IM,'needs informative message')
if (JM_WORLD/=TILING%JM) then
print *,'error tiling jm/jm ',jm_world, tiling%jm
end if
_ASSERT(JM_WORLD==TILING%JM,'needs informative message')

! Find out which tiles are in local PE
Expand Down Expand Up @@ -1618,8 +1621,9 @@ subroutine MAPL_LocStreamCreateTileGrid(LocStream, GRID, RC)
call ESMF_GridSet(tilegrid, &
name="tile_grid_"//trim(Stream%NAME)//'@'//trim(GNAME), &
distgrid=distgrid, &
gridMemLBound=(/1/), &
indexFlag=ESMF_INDEX_USER, &
! gridMemLBound=(/1/), &
! indexFlag=ESMF_INDEX_USER, &
indexFlag=ESMF_INDEX_DELOCAL, &
distDim = (/1/), &
localArbIndexCount=arbIndexCount, &
localArbIndex=arbIndex, &
Expand Down

0 comments on commit 181bc51

Please sign in to comment.