From f142caf45526df865eb6a18f0a9839a78207281f Mon Sep 17 00:00:00 2001 From: Melissa Sulprizio Date: Fri, 17 Nov 2023 08:45:04 -0500 Subject: [PATCH] Increase string length for netCDF variable name The GHGI v2 inventory in CH4 and carbon simulations within GEOS-Chem introduced netCDF varible names that exceeded the current defined string length (50 characters). This value has been increased to 100 to avoid errors. Signed-off-by: Melissa Sulprizio --- CHANGELOG.md | 4 ++++ src/Core/hco_config_mod.F90 | 2 +- src/Core/hco_types_mod.F90 | 2 +- 3 files changed, 6 insertions(+), 2 deletions(-) diff --git a/CHANGELOG.md b/CHANGELOG.md index 8f96a6b9..a6cb0989 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -5,6 +5,10 @@ All notable changes to this project will be documented in this file. The format is based on [Keep a Changelog](https://keepachangelog.com/en/1.0.0/), and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0.html). +##[ Unreleased 3.7.2] - TBD +### Changed +- Increased netCDF variable string length from 50 to 100 + ## [3.7.1] - 2023-10-10 ### Changed - Updated version numbers to 3.7.1 diff --git a/src/Core/hco_config_mod.F90 b/src/Core/hco_config_mod.F90 index 91d4d503..4ef9f761 100644 --- a/src/Core/hco_config_mod.F90 +++ b/src/Core/hco_config_mod.F90 @@ -635,7 +635,7 @@ SUBROUTINE Config_ReadCont( HcoConfig, IU_HCO, CFDIR, & LOGICAL :: Found CHARACTER(LEN= 63) :: cName CHARACTER(LEN=255) :: srcFile - CHARACTER(LEN= 50) :: srcVar + CHARACTER(LEN=100) :: srcVar CHARACTER(LEN= 31) :: srcTime CHARACTER(LEN= 31) :: TmCycle CHARACTER(LEN= 1) :: WildCard diff --git a/src/Core/hco_types_mod.F90 b/src/Core/hco_types_mod.F90 index 34af66cf..ab990b6d 100644 --- a/src/Core/hco_types_mod.F90 +++ b/src/Core/hco_types_mod.F90 @@ -338,7 +338,7 @@ MODULE HCO_TYPES_MOD !------------------------------------------------------------------------- TYPE :: FileData CHARACTER(LEN=255) :: ncFile ! file path+name - CHARACTER(LEN= 50) :: ncPara ! file parameter + CHARACTER(LEN=100) :: ncPara ! file parameter INTEGER :: ncYrs(2) ! year range INTEGER :: ncMts(2) ! month range INTEGER :: ncDys(2) ! day range