require_matching_plane_summary_keys Subroutine

public subroutine require_matching_plane_summary_keys(found)

schema 9 以降の checkpoint では required のキーが全て揃っていなければ再開しない。

Arguments

Type IntentOptional Attributes Name
logical, intent(in) :: found(matching_plane_summary_key_count)

Source Code

  subroutine require_matching_plane_summary_keys(found)
    logical, intent(in) :: found(matching_plane_summary_key_count)

    if (.not. all(found .or. .not. receipt_keys%required)) then
      error stop 'Resume checkpoint schema-v9 summary is missing required matching-plane keys.'
    end if
  end subroutine require_matching_plane_summary_keys