specify string length for icepack warnings

E3SM-Project · Sep 30, 2023 · 35980d6 · 35980d6
1 parent 92b264e
commit 35980d6
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/components/mpas-seaice/src/shared/mpas_seaice_icepack.F b/components/mpas-seaice/src/shared/mpas_seaice_icepack.F
@@ -17232,7 +17232,7 @@ subroutine seaice_icepack_write_warnings(logAsErrors)
          icepack_warnings_clear, &
          icepack_warnings_getall
 
-    character(len=strKINDWarnings), dimension(:), allocatable :: &
+    character(len=256), dimension(:), allocatable :: & ! icepack char_len_long=256
          warnings
 
     logical, intent(in) :: &