set_job_id Subroutine

public subroutine set_job_id(jid)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: jid

Contents

Source Code


Source Code

  subroutine set_job_id(jid)
    integer, intent(in) :: jid
    job_id = jid
  end subroutine set_job_id