init_job_name Subroutine

public subroutine init_job_name(jobname)

Set run_name and job_name to jobname. Used by job_manage

Arguments

Type IntentOptional Attributes Name
character(len=run_name_size), intent(in) :: jobname

Current job name


Contents

Source Code


Source Code

  subroutine init_job_name (jobname)
    implicit none
    !> Current job name
    character(run_name_size), intent (in) :: jobname
    job_name = trim(jobname)
    run_name => job_name
  end subroutine init_job_name