Merge pull request #186 from rosscastle/Frierson_TC_Fix

Frierson Test Case Fix (Issue 184)
ExeClim · Oct 23, 2020 · 9cfd43e · 9cfd43e
2 parents dc4fed0 + a87d877
commit 9cfd43e
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/src/shared/diag_manager/diag_table.F90 b/src/shared/diag_manager/diag_table.F90
@@ -357,7 +357,7 @@ SUBROUTINE parse_diag_table(diag_subset, istat, err_msg)
     INTEGER, INTENT(out), OPTIONAL, TARGET :: istat
     CHARACTER(len=*), INTENT(out), OPTIONAL :: err_msg
 
-    INTEGER, PARAMETER :: DT_LINE_LENGTH = 256
+    INTEGER, PARAMETER :: DT_LINE_LENGTH = 512
 
     INTEGER :: stdlog_unit !< Fortran file unit number for the stdlog file.
     INTEGER :: record_len !< String length of the diag_table line read in.

diff --git a/src/shared/mpp/mpp.F90 b/src/shared/mpp/mpp.F90
@@ -1182,7 +1182,7 @@ module mpp_mod
 !  variables needed for subroutine read_input_nml (include/mpp_util.inc)
 !
 ! parameter defining length of character variables 
-  integer, parameter :: INPUT_STR_LENGTH = 256
+  integer, parameter :: INPUT_STR_LENGTH = 512
 ! public variable needed for reading input.nml from an internal file
   character(len=INPUT_STR_LENGTH), dimension(:), allocatable, public :: input_nml_file
 !***********************************************************************