Skip to content

Commit

Permalink
Better comment on the failing setup due to ESMF_StateReconcile() issue.
Browse files Browse the repository at this point in the history
More complete test for geom/field sharing.
  • Loading branch information
theurich committed Nov 14, 2024
1 parent f0540b3 commit 83bc51d
Show file tree
Hide file tree
Showing 2 changed files with 9 additions and 2 deletions.
10 changes: 8 additions & 2 deletions AtmOcnMirrorFieldsProto/atm.F90
Original file line number Diff line number Diff line change
Expand Up @@ -245,7 +245,13 @@ subroutine ModifyAdvertised(model, rc)
!TODO: settings, and go between components on different threading levels.
!TODO: This is an edge case, but long term it should be supported.

#if 0
!TODO: The problem in StateReconcile() comes from the UNIQUE_GEOM_INFO_TREAT_on
!TODO: handling. Once that part is reworked inside StateReconcile() the mixed
!TODO: sharing case should work again!

!TODO: For now share Grid and Field for both fields.

#if 1
! set SharePolicyGeomObject = "share"
call NUOPC_SetAttribute(field, name="SharePolicyGeomObject", &
value="share", rc=rc)
Expand All @@ -254,7 +260,7 @@ subroutine ModifyAdvertised(model, rc)
file=__FILE__)) &
return ! bail out
#endif
#if 0
#if 1
! set SharePolicyField = "share"
call NUOPC_SetAttribute(field, name="SharePolicyField", &
value="share", rc=rc)
Expand Down
1 change: 1 addition & 0 deletions AtmOcnMirrorFieldsProto/ocn.F90
Original file line number Diff line number Diff line change
Expand Up @@ -96,6 +96,7 @@ subroutine Advertise(model, rc)
StandardName="air_pressure_at_sea_level", name="pmsl", &
#ifdef TEST_SHARING
SharePolicyGeomObject="share", &
SharePolicyField="share", &
#endif
rc=rc)
if (ESMF_LogFoundError(rcToCheck=rc, msg=ESMF_LOGERR_PASSTHRU, &
Expand Down

0 comments on commit 83bc51d

Please sign in to comment.