Merge pull request #1815 from GEOS-ESM/main

Auto GitFlow - main → develop
GEOS-ESM · Nov 15, 2022 · e09fa8d · e09fa8d
2 parents 8d45a33 + 8bb4b4a
commit e09fa8d
Show file tree

Hide file tree

Showing 3 changed files with 12 additions and 2 deletions.
diff --git a/CHANGELOG.md b/CHANGELOG.md
@@ -18,6 +18,12 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0
 
 ### Deprecated
 
+## [2.30.3] - 2022-11-15
+
+### Fixed
+
+- Fixed bug when writing fields in History with ungridded dimension when the split option is not requested
+
 ## [2.30.2] - 2022-11-09
 
 ### Fixed

diff --git a/CMakeLists.txt b/CMakeLists.txt
@@ -4,7 +4,7 @@ cmake_policy (SET CMP0054 NEW)
 
 project (
   MAPL
-  VERSION 2.30.2
+  VERSION 2.30.3
   LANGUAGES Fortran CXX C)  # Note - CXX is required for ESMF
 
 # Set the default build type to release

diff --git a/gridcomps/History/MAPL_HistoryGridComp.F90 b/gridcomps/History/MAPL_HistoryGridComp.F90
@@ -2061,7 +2061,11 @@ subroutine Initialize ( gc, import, dumexport, clock, rc )
          call MAPL_StateGet( export(list(n)%expSTATE(m)), &
                              trim(field_name), field, _RC )
 
-         split = hasSplitField(field, _RC)
+         if (list(n)%splitField) then
+            split = hasSplitField(field, _RC)
+         else
+            split = .false.
+         end if
          ! check if split is needed
          if (.not. split) then
             allocate(splitFields(1), __STAT__)