config_subrs Module



Variables

Type Visibility Attributes Name Initial
character(len=*), public, parameter :: fname = 'ESMF_Resource_File_Sample.rc'
character(len=1), public :: answer
character(len=10), public :: u_dataType
character(len=10), public :: v_dataType
character(len=10), public :: vf_dataType
character(len=ESMF_MAXPATHLEN), public :: restart_file
character(len=ESMF_MAXSTR), public :: failMsg
character(len=ESMF_MAXSTR), public :: name
integer, public, parameter :: EOL = 111
integer, public, parameter :: MAXLEV = 100
integer, public :: col
integer, public :: counter_success
integer, public :: counter_total
integer, public :: line
integer, public :: nDE
integer, public, allocatable, dimension(:) :: ncol
integer, public :: nlev
integer, public :: nlines
integer, public :: npets
integer, public :: nu
integer, public :: nv
integer, public :: rc
integer, public :: rc_opening
integer, public :: result = 0
logical, public :: Doing_QC
logical, public :: end
logical, public :: isCreated
logical, public :: optimize
logical, public :: sigVf(6)
logical, public :: unique
real(kind=ESMF_KIND_R4), public :: plev(MAXLEV)
real(kind=ESMF_KIND_R4), public :: sigU(6)
real(kind=ESMF_KIND_R4), public :: sigV(6)
real(kind=ESMF_KIND_R4), public :: success_rate
real(kind=ESMF_KIND_R4), public :: tau
real(kind=ESMF_KIND_R4), public :: temp
real(kind=ESMF_KIND_R4), public :: vCorr(MAXLEV,MAXLEV)
type(ESMF_Config), public, save :: cf
type(ESMF_Config), public, save :: cf1
type(ESMF_Config), public, save :: cf2
type(ESMF_Config), public, save :: cf_alias
type(ESMF_VM), public, save :: vm

Subroutines

public subroutine Finalization()

Arguments

None

public subroutine Initialization()

Arguments

None

public subroutine MultPar_MultLines()

Arguments

None

public subroutine MultPar_SingleLine_U()

Arguments

None

public subroutine MultPar_SingleLine_V()

Arguments

None

public subroutine MultPar_SingleLine_Vf()

Arguments

None

public subroutine Sections()

Arguments

None

public subroutine SinglePar()

Arguments

None

public subroutine SingleParSet()

Arguments

None

public subroutine Table()

Arguments

None