Skip to content

Commit

Permalink
need to add a fillvalue attribute here
Browse files Browse the repository at this point in the history
  • Loading branch information
jedwards4b committed Jul 12, 2022
1 parent d62218d commit f37147d
Showing 1 changed file with 1 addition and 0 deletions.
1 change: 1 addition & 0 deletions dshr/dshr_mod.F90
Original file line number Diff line number Diff line change
Expand Up @@ -1070,6 +1070,7 @@ subroutine dshr_restart_write(rpfile, case_name, model_name, inst_suffix, ymd, t
if (present(fld) .and. present(fldname)) then
rcode = pio_def_dim(pioid, 'gsize', sdat%model_gsize, dimid(1))
rcode = pio_def_var(pioid, trim(fldname), PIO_DOUBLE, dimid, varid)
rcode = pio_put_att(pioid, varid, "_FillValue", shr_const_spval)
endif
call shr_stream_restIO(pioid, sdat%stream, 'define')
rcode = pio_enddef(pioid)
Expand Down

0 comments on commit f37147d

Please sign in to comment.