cable_mpiworker Module



Variables

Type Visibility Attributes Name Initial
integer, private :: inp_t
integer, private :: send_t
integer, private :: casa_t
integer, private :: casa_dump_t
integer, private :: casa_LUC_t
integer, private :: climate_t
integer, private :: pop_t
integer, private :: restart_t
real, private, allocatable :: heat_cap_lower_limit(:,:)

Subroutines

public subroutine mpidrv_worker(comm)

Arguments

Type IntentOptional Attributes Name
integer :: comm

private subroutine worker_decomp(comm)

Arguments

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

private subroutine worker_cable_params(comm, met, air, ssnow, veg, bgc, soil, canopy, rough, rad, sum_flux, bal)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: comm
type(met_type), intent(out) :: met
type(air_type), intent(out) :: air
type(soil_snow_type), intent(out) :: ssnow
type(veg_parameter_type), intent(out) :: veg
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

private subroutine worker_casa_params(comm, casabiome, casapool, casaflux, casamet, casabal, phen)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: comm
type(casa_biome), intent(out) :: casabiome
type(casa_pool), intent(out) :: casapool
type(casa_flux), intent(out) :: casaflux
type(casa_met), intent(out) :: casamet
type(casa_balance), intent(out) :: casabal
type(phen_variable), intent(out) :: phen

private subroutine worker_intype(comm, met, veg)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: comm
type(met_type), intent(in) :: met
type(veg_parameter_type), intent(in) :: veg

private subroutine worker_outtype(comm, met, canopy, ssnow, rad, bal, air, soil, veg)

Arguments

Type IntentOptional Attributes Name
integer :: comm
type(met_type), intent(in) :: met
type(canopy_type), intent(in) :: canopy
type(soil_snow_type), intent(in) :: ssnow
type(radiation_type), intent(in) :: rad
type(balances_type), intent(inout) :: bal
type(air_type), intent(in) :: air
type(soil_parameter_type), intent(in) :: soil
type(veg_parameter_type), intent(in) :: veg

private subroutine worker_casa_type(comm, casapool, casaflux, casamet, casabal, phen)

Arguments

Type IntentOptional Attributes Name
integer :: comm
type(casa_pool), intent(inout) :: casapool
type(casa_flux), intent(inout) :: casaflux
type(casa_met), intent(inout) :: casamet
type(casa_balance), intent(inout) :: casabal
type(phen_variable), intent(inout) :: phen

private subroutine worker_climate_types(comm, climate, ktauday)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: comm
type(climate_type), intent(inout) :: climate
integer, intent(in) :: ktauday

private subroutine worker_restart_type(comm, canopy, air, bgc)

Arguments

Type IntentOptional Attributes Name
integer :: comm
type(canopy_type), intent(in) :: canopy
type(air_type), intent(in) :: air
type(bgc_pool_type), intent(in) :: bgc

private subroutine worker_casa_dump_types(comm, casamet, casaflux, phen)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: comm
type(casa_met), intent(inout) :: casamet
type(casa_flux), intent(inout) :: casaflux
type(phen_variable), intent(inout) :: phen

private subroutine worker_casa_LUC_types(comm, casapool, casabal)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: comm
type(casa_pool), intent(in) :: casapool
type(casa_balance), intent(in) :: casabal

private subroutine worker_pop_types(comm, veg, pop)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: comm
type(veg_parameter_type), intent(in) :: veg
type(POP_TYPE), intent(inout) :: pop

private subroutine worker_send_pop(pop, comm)

Arguments

Type IntentOptional Attributes Name
type(POP_TYPE), intent(in) :: pop
integer, intent(in) :: comm

private subroutine worker_end(icycle, restart)

Arguments

Type IntentOptional Attributes Name
integer :: icycle
logical :: restart

private subroutine worker_spincasacnp(dels, kstart, kend, mloop, veg, soil, casabiome, casapool, casaflux, casamet, casabal, phen, POP, climate, LALLOC, icomm, ocomm)

Arguments

Type IntentOptional Attributes Name
real, intent(in) :: dels
integer, intent(in) :: kstart
integer, intent(in) :: kend
integer, intent(in) :: mloop
type(veg_parameter_type), intent(inout) :: veg
type(soil_parameter_type), intent(inout) :: soil
type(casa_biome), intent(inout) :: casabiome
type(casa_pool), intent(inout) :: casapool
type(casa_flux), intent(inout) :: casaflux
type(casa_met), intent(inout) :: casamet
type(casa_balance), intent(inout) :: casabal
type(phen_variable), intent(inout) :: phen
type(POP_TYPE), intent(inout) :: POP
type(climate_type), intent(inout) :: climate
integer, intent(in) :: LALLOC
integer, intent(in) :: icomm
integer, intent(in) :: ocomm

private subroutine worker_CASAONLY_LUC(dels, kstart, kend, veg, soil, casabiome, casapool, casaflux, casamet, casabal, phen, POP, climate, LALLOC, icomm, ocomm)

Arguments

Type IntentOptional Attributes Name
real, intent(in) :: dels
integer, intent(in) :: kstart
integer, intent(in) :: kend
type(veg_parameter_type), intent(inout) :: veg
type(soil_parameter_type), intent(inout) :: soil
type(casa_biome), intent(inout) :: casabiome
type(casa_pool), intent(inout) :: casapool
type(casa_flux), intent(inout) :: casaflux
type(casa_met), intent(inout) :: casamet
type(casa_balance), intent(inout) :: casabal
type(phen_variable), intent(inout) :: phen
type(POP_TYPE), intent(inout) :: POP
type(climate_type), intent(inout) :: climate
integer, intent(in) :: LALLOC
integer, intent(in) :: icomm
integer, intent(in) :: ocomm