cable_input_module Module


Uses


Variables

Type Visibility Attributes Name Initial
integer, public :: ncid_met
integer, public :: ncid_rain
integer, public :: ncid_snow
integer, public :: ncid_lw
integer, public :: ncid_sw
integer, public :: ncid_ps
integer, public :: ncid_qa
integer, public :: ncid_ta
integer, public :: ncid_wd
integer, public :: ncid_mask
integer, private :: ok
integer, private, POINTER, DIMENSION(:) :: landGrid
real, private, POINTER, DIMENSION(:) :: elevation
real, private, POINTER, DIMENSION(:) :: avPrecip
type(met_varID_type), private :: id
type(met_units_type), private :: metunits
type(convert_units_type), private :: convert

Derived Types

type, private ::  met_varID_type

Components

Type Visibility Attributes Name Initial
integer, public :: SWdown
integer, public :: LWdown
integer, public :: Wind
integer, public :: Wind_E
integer, public :: PSurf
integer, public :: Tair
integer, public :: Qair
integer, public :: Rainf
integer, public :: Snowf
integer, public :: CO2air
integer, public :: Elev
integer, public :: LAI
integer, public :: avPrecip
integer, public :: iveg
integer, public :: isoil
integer, public :: patchfrac

type, private ::  met_units_type

Components

Type Visibility Attributes Name Initial
character(len=20), public :: SWdown
character(len=20), public :: LWdown
character(len=20), public :: Wind
character(len=20), public :: Wind_E
character(len=20), public :: PSurf
character(len=20), public :: Tair
character(len=20), public :: Qair
character(len=20), public :: Rainf
character(len=20), public :: Snowf
character(len=20), public :: CO2air
character(len=20), public :: Elev
character(len=20), public :: avPrecip

type, private ::  convert_units_type

Components

Type Visibility Attributes Name Initial
real, public :: PSurf
real, public :: Tair
real, public :: Qair
real, public :: Rainf
real, public :: CO2air
real, public :: Elev

Subroutines

public subroutine get_default_lai()

Arguments

None

public subroutine open_met_file(dels, koffset, kend, spinup, TFRZ)

Arguments

Type IntentOptional Attributes Name
real, intent(out) :: dels
integer, intent(inout) :: koffset
integer, intent(out) :: kend
logical, intent(in) :: spinup
real, intent(in) :: TFRZ

public subroutine get_met_data(spinup, spinConv, met, soil, rad, veg, kend, dels, TFRZ, ktau, kstart)

Arguments

Type IntentOptional Attributes Name
logical, intent(in) :: spinup
logical, intent(in) :: spinConv
type(met_type), intent(inout) :: met
type(soil_parameter_type), intent(in) :: soil
type(radiation_type), intent(in) :: rad
type(veg_parameter_type), intent(inout) :: veg
integer, intent(in) :: kend
real, intent(in) :: dels
real, intent(in) :: TFRZ
integer, intent(in) :: ktau
integer, intent(in) :: kstart

public subroutine close_met_file()

Arguments

None

public subroutine load_parameters(met, air, ssnow, veg, climate, bgc, soil, canopy, rough, rad, sum_flux, bal, logn, vegparmnew, casabiome, casapool, casaflux, sum_casapool, sum_casaflux, casamet, casabal, phen, POP, spinup, EMSOIL, TFRZ, LUC_EXPT, POPLUC)

Defines the priority order of sources of parameter values for CABLE, determines the total number of patches over all grid cells, and writes parameter values to CABLE's parameter arrays.

Read more…

Arguments

Type IntentOptional Attributes Name
type(met_type), intent(inout) :: met
type(air_type), intent(inout) :: air
type(soil_snow_type), intent(out) :: ssnow
type(veg_parameter_type), intent(out) :: veg
type(climate_type), intent(inout) :: climate
type(bgc_pool_type), intent(out) :: bgc
type(soil_parameter_type), intent(out) :: soil
type(canopy_type), intent(out) :: canopy
type(roughness_type), intent(out) :: rough
type(radiation_type), intent(out) :: rad
type(sum_flux_type), intent(out) :: sum_flux
type(balances_type), intent(out) :: bal
integer, intent(in) :: logn
logical, intent(in) :: vegparmnew
type(casa_biome), intent(out) :: casabiome
type(casa_pool), intent(out) :: casapool
type(casa_flux), intent(out) :: casaflux
type(casa_pool), intent(out) :: sum_casapool
type(casa_flux), intent(out) :: sum_casaflux
type(casa_met), intent(out) :: casamet
type(casa_balance), intent(out) :: casabal
type(phen_variable), intent(out) :: phen
type(POP_TYPE), intent(inout) :: POP
logical, intent(in) :: spinup
real, intent(in) :: EMSOIL
real, intent(in) :: TFRZ
type(LUC_EXPT_TYPE), intent(inout) :: LUC_EXPT
type(POPLUC_TYPE), intent(inout) :: POPLUC

private subroutine get_parameters_met(soil, veg, bgc, rough, completeSet)

Searches for CABLE parameters in the met forcing file, and if it finds any, uses these values to overwrite the values that have already been loaded from the default parameter loading and/or the restart file.

Read more…

Arguments

Type IntentOptional Attributes Name
type(soil_parameter_type), intent(inout) :: soil
type(veg_parameter_type), intent(inout) :: veg
type(bgc_pool_type), intent(inout) :: bgc
type(roughness_type), intent(inout) :: rough
logical, intent(out) :: completeSet

public subroutine allocate_cable_vars(air, bgc, canopy, met, bal, rad, rough, soil, ssnow, sum_flux, veg, arraysize)

Arguments

Type IntentOptional Attributes Name
type(air_type), intent(inout) :: air
type(bgc_pool_type), intent(inout) :: bgc
type(canopy_type), intent(inout) :: canopy
type(met_type), intent(inout) :: met
type(balances_type), intent(inout) :: bal
type(radiation_type), intent(inout) :: rad
type(roughness_type), intent(inout) :: rough
type(soil_parameter_type), intent(inout) :: soil
type(soil_snow_type), intent(inout) :: ssnow
type(sum_flux_type), intent(inout) :: sum_flux
type(veg_parameter_type), intent(inout) :: veg
integer, intent(in) :: arraysize