Fixes #1363. Moved the split field logic to where we

put the fields in containers for averaging and/or regridding

CHANGELOG.md

@@ -23,7 +23,6 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0
 
 ### Changed
 
-- Now History creates a copy of the export state(s) so that we can remove the original un-split field to avoid duplicates
 - Changed the naming convention for the split name(s): we now take the entries from the field alias(es) without appending any digits. Also allowing the user to specify more entries in the alias, so that HISTORY.rc does not need to change when running GOCART with more wavelengths
 - A small performance improvement. cycle => exit in MAPL_Generic.F90
 - Made history global metadata configurable. This can be done in two ways

gridcomps/History/MAPL_HistoryCollection.F90

@@ -89,9 +89,9 @@ module MAPL_HistoryCollectionMod
      character(len=ESMF_MAXSTR),pointer :: PExtraFields(:) => null()
      character(len=ESMF_MAXSTR),pointer :: PExtraGridComp(:) => null()
      type (FieldSet), pointer :: field_set
-     logical, pointer                   :: r8_to_r4(:) => null()
-     type(ESMF_FIELD), pointer          :: r8(:) => null()
-     type(ESMF_FIELD), pointer          :: r4(:) => null()
+     logical, allocatable               :: r8_to_r4(:)
+     type(ESMF_FIELD), allocatable      :: r8(:)
+     type(ESMF_FIELD), allocatable      :: r4(:)
      character(len=ESMF_MAXSTR)         :: output_grid_label
      type(GriddedIOItemVector)          :: items
      character(len=ESMF_MAXSTR)         :: currentFile
@@ -114,7 +114,6 @@ function define_collection_attributes(this,rc) result(global_attributes)
         integer, optional, intent(out) :: rc
 
         type(StringStringMap) :: global_attributes
-        integer :: status
 
         call global_attributes%insert("Title",trim(this%descr))
         call global_attributes%insert("History","File written by MAPL_PFIO")