accepted batch batches の commit 後に定期チェックポイントを書くかを返す。
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(app_config), | intent(in) | :: | app | |||
| integer(kind=i32), | intent(in) | :: | batches |
logical function periodic_checkpoint_due(app, batches) result(due) type(app_config), intent(in) :: app integer(i32), intent(in) :: batches due = app%write_output .and. app%checkpoint_stride > 0_i32 .and. batches > 0_i32 if (due) due = mod(batches, app%checkpoint_stride) == 0_i32 end function periodic_checkpoint_due