fixes #3369

[bena-nasa]

Fixes issue #3369

Types of change(s)

• Bug fix (non-breaking change which fixes an issue)
• New feature (non-breaking change which adds functionality)
• Breaking change (fix or feature that would cause existing functionality to change)
• Trivial change (affects only documentation or cleanup)
• Refactor (no functional changes, no api changes)

Checklist

• Tested this change with a run of GEOSgcm
• Ran the Unit Tests (make tests)

Description

Related Issue

[weiyuan-jiang]

I remember I used the non-collective call to get the coords. If it can't be use any more, then the call here may have problem too.
(

MAPL/base/Base/Base_Base_implementation.F90

Lines 2677 to 2680 in 572a644

	call ESMF_GridGetCoord(grid,coordDim=1, localDe=0, &
	staggerloc=ESMF_STAGGERLOC_CORNER, fArrayPtr = lons, _RC)
	call ESMF_GridGetCoord(grid,coordDim=2, localDe=0, &
	staggerloc=ESMF_STAGGERLOC_CORNER, fArrayPtr = lats, _RC)

)

[bena-nasa]

MAPL/base/Base/Base_Base_implementation.F90

Do we have a use case that even uses this non cubed-sphere branch? I agree that if we had non-cubed sphere mini-grids this would be a problem, but to my knowledge this is not a use case right now. I guess I could fix it to use the MAPL version of this call.