Merge pull request #2245 from GEOS-ESM/feature/mathomp4/2244-add-regr…

…id-print Fixes #2244. Add print of regrid method to history init
GEOS-ESM · Jul 20, 2023 · c678485 · c678485
2 parents ecda86f + e911fad
commit c678485
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 0 deletions.
diff --git a/CHANGELOG.md b/CHANGELOG.md
@@ -9,6 +9,7 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0
 
 ### Added
 
+- Added print of regrid method during History initialization
 - Added ability to use an `ESMF.rc` file to pass in pre-`ESMF_Initialize` options to ESMF (see [ESMF Docs](https://earthsystemmodeling.org/docs/release/latest/ESMF_refdoc/node4.html#SECTION04024000000000000000) for allowed flags.
   - NOTE: File *must* be called `ESMF.rc`
 - Added ability to run ExtDataDriver.x on a MAPL "tile" grid

diff --git a/gridcomps/History/MAPL_HistoryGridComp.F90 b/gridcomps/History/MAPL_HistoryGridComp.F90
@@ -2440,6 +2440,7 @@ subroutine Initialize ( gc, import, dumexport, clock, rc )
          print *, '    End_Date: ',       list(n)%end_date
          print *, '    End_Time: ',       list(n)%end_time
          endif
+         print *, ' Regrid Mthd: ',       regrid_method_int_to_string(list(n)%regrid_method)
 
          block
             integer :: im_world, jm_world,dims(3)