Skip to content
This repository was archived by the owner on Aug 28, 2024. It is now read-only.

Commit

Permalink
Changed behavior so lrhill_present is only set by the parameter input…
Browse files Browse the repository at this point in the history
… file to give the user the option to set a fixed value as in the previous versions.
  • Loading branch information
daminton committed May 16, 2023
1 parent dc41783 commit 027a2f1
Showing 1 changed file with 0 additions and 2 deletions.
2 changes: 0 additions & 2 deletions src/swiftest/swiftest_io.f90
Original file line number Diff line number Diff line change
Expand Up @@ -983,7 +983,6 @@ module subroutine swiftest_io_netcdf_open(self, param, readonly)
! Optional variables The User Doesn't Need to Know About
status = nf90_inq_varid(nc%id, nc%mass_varname, nc%mass_varid)
status = nf90_inq_varid(nc%id, nc%rhill_varname, nc%rhill_varid)
param%lrhill_present = (status == NF90_NOERR)
status = nf90_inq_varid(nc%id, nc%npl_varname, nc%npl_varid)
status = nf90_inq_varid(nc%id, nc%status_varname, nc%status_varid)
status = nf90_inq_varid(nc%id, nc%ntp_varname, nc%ntp_varid)
Expand Down Expand Up @@ -1232,7 +1231,6 @@ module function swiftest_io_netcdf_read_frame_system(self, nc, param) result(ier
status = nf90_get_var(nc%id, nc%rhill_varid, rtemp, start=[1, tslot], count=[idmax,1])
if (status == NF90_NOERR) then
pl%rhill(:) = pack(rtemp, plmask)
param%lrhill_present = .true.
end if
end if

Expand Down

0 comments on commit 027a2f1

Please sign in to comment.