Skip to content

Commit d65ef33

Browse files
authored
Enable variable precision checkpoint-restart files (#456)
Co-authored-by: Ricky Wong <141156427+mo-rickywong@users.noreply.github.com> Committing to main after testing
1 parent 17d81d9 commit d65ef33

1 file changed

Lines changed: 4 additions & 0 deletions

File tree

‎components/lfric-xios/source/lfric_xios_metafile_mod.F90‎

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -199,7 +199,11 @@ subroutine add_field(metafile, dict_field_id, mode, operation, id_as_name, legac
199199

200200
character(20), parameter :: lfric_dict = 'lfric_dictionary'
201201
character(str_def) :: file_id
202+
#if (RDEF_PRECISION == 32)
203+
integer(i_def), parameter :: dflt_prec = 4
204+
#else
202205
integer(i_def), parameter :: dflt_prec = 8
206+
#endif
203207

204208
type(xios_file) :: file
205209
character(str_def) :: field_id

0 commit comments

Comments
 (0)