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

Commit

Permalink
Fixed time_chunk calculation for the situation in which the output du…
Browse files Browse the repository at this point in the history
…mps happen less frequently than the output writes
  • Loading branch information
daminton committed Oct 21, 2021
1 parent e4be671 commit fc91ba2
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/io/io.f90
Original file line number Diff line number Diff line change
Expand Up @@ -2138,7 +2138,7 @@ module subroutine io_write_frame_system(self, param)
else if ((param%out_type == NETCDF_FLOAT_TYPE) .or. (param%out_type == NETCDF_DOUBLE_TYPE)) then

param%nciu%id_chunk = pl%nbody + tp%nbody
param%nciu%time_chunk = param%istep_out / param%istep_dump
param%nciu%time_chunk = max(param%istep_dump / param%istep_out, 1)
if (lfirst) then
inquire(file=param%outfile, exist=fileExists)

Expand Down

0 comments on commit fc91ba2

Please sign in to comment.