RtmVar Module



Variables

Type Visibility Attributes Name Initial
real(kind=r8), public, parameter :: secspday = SHR_CONST_CDAY
integer, public, parameter :: isecspday = secspday
real(kind=r8), public, parameter :: spval = 1.e36_r8
integer, public, parameter :: ispval = -9999
real(kind=r8), public :: re = SHR_CONST_REARTH*0.001_r8
logical, public :: barrier_timers = .false.
character(len=CL), public :: caseid = ' '
character(len=CL), public :: ctitle = ' '
integer, public, parameter :: nsrStartup = 0
integer, public, parameter :: nsrContinue = 1
integer, public, parameter :: nsrBranch = 2
integer, public :: nsrest = iundef
logical, public :: brnch_retain_casename = .false.
logical, public :: noland = .false.
character(len=32), public :: decomp_option
character(len=32), public :: bypass_routing_option
character(len=32), public :: qgwl_runoff_option
character(len=32), public :: smat_option
character(len=CL), public :: hostname = ' '
character(len=CL), public :: username = ' '
character(len=CL), public :: version = " "
character(len=CL), public :: conventions = "CF-1.0"
character(len=CL), public :: source = "Model for Scale Adaptive River Transport MOSART1.0"
character(len=CL), public :: model_doi_url
integer, public :: iulog = 6
integer, public :: inst_index
character(len=16), public :: inst_name
character(len=16), public :: inst_suffix
character(len=CL), public :: nrevsn_rtm = ' '
character(len=CL), public :: finidat_rtm = ' '
character(len=CL), public :: frivinp_rtm = ' '
logical, public :: ice_runoff = .true.
integer, public :: rtmlon = 1
integer, public :: rtmlat = 1
character(len=CL), public :: rpntfil = 'rpointer.rof'

Subroutines

public subroutine RtmVarSet(caseid_in, ctitle_in, brnch_retain_casename_in, nsrest_in, version_in, hostname_in, username_in, model_doi_url_in)

Arguments

Type IntentOptional Attributes Name
character(len=CL), intent(in), optional :: caseid_in
character(len=CL), intent(in), optional :: ctitle_in
logical, intent(in), optional :: brnch_retain_casename_in
integer, intent(in), optional :: nsrest_in
character(len=CL), intent(in), optional :: version_in
character(len=CL), intent(in), optional :: hostname_in
character(len=CL), intent(in), optional :: username_in
character(len=CL), intent(in), optional :: model_doi_url_in

public subroutine RtmVarInit()

Arguments

None