Consistent character(char_len) :: stdname in ice_import_export.F90 (CICE-Consortium#1029)

For operational implementation, clean up compiler Warning: CHARACTER expression will be truncated in assignment (80/128) at (1) [-Wcharacter-truncation]. NUOPC standard names here are all shorter than 80 characters. Part of ufs-community/ufs-weather-model#2703

Author: NickSzapiro-NOAA

cicecore/drivers/nuopc/cmeps/ice_import_export.F90

@@ -79,7 +79,7 @@ module ice_import_export
   ! Private module data
 
   type fld_list_type
-    character(len=128) :: stdname
+    character(char_len) :: stdname
     integer :: ungridded_lbound = 0
     integer :: ungridded_ubound = 0
   end type fld_list_type
@@ -1409,7 +1409,7 @@ subroutine fldlist_realize(state, fldList, numflds, flds_scalar_name, flds_scala
     ! local variables
     integer                :: n
     type(ESMF_Field)       :: field
-    character(len=80)      :: stdname
+    character(char_len)    :: stdname
     character(ESMF_MAXSTR) :: msg
     character(len=*),parameter  :: subname='(ice_import_export:fld_list_realize)'
     ! ----------------------------------------------