cable_mpimaster Module


Uses

  • module~~cable_mpimaster~2~~UsesGraph module~cable_mpimaster~2 cable_mpimaster module~cable_checks_module cable_checks_module module~cable_mpimaster~2->module~cable_checks_module module~cable_driver_common_mod cable_driver_common_mod module~cable_mpimaster~2->module~cable_driver_common_mod module~cable_io_vars_module cable_IO_vars_module module~cable_mpimaster~2->module~cable_io_vars_module module~cable_mpicommon cable_mpicommon module~cable_mpimaster~2->module~cable_mpicommon module~casa_cable casa_cable module~cable_mpimaster~2->module~casa_cable module~casa_inout_module casa_inout_module module~cable_mpimaster~2->module~casa_inout_module module~cable_checks_module->module~cable_io_vars_module module~cable_abort_module cable_abort_module module~cable_checks_module->module~cable_abort_module module~cable_common_module cable_common_module module~cable_checks_module->module~cable_common_module module~cable_def_types_mod cable_def_types_mod module~cable_checks_module->module~cable_def_types_mod module~cable_driver_common_mod->module~cable_io_vars_module module~cable_driver_common_mod->module~cable_common_module module~cable_cru CABLE_CRU module~cable_driver_common_mod->module~cable_cru module~cable_input_module cable_input_module module~cable_driver_common_mod->module~cable_input_module module~cable_mpi_mod cable_mpi_mod module~cable_driver_common_mod->module~cable_mpi_mod module~cable_namelist_util cable_namelist_util module~cable_driver_common_mod->module~cable_namelist_util module~cable_phys_constants_mod cable_phys_constants_mod module~cable_driver_common_mod->module~cable_phys_constants_mod module~cable_plume_mip CABLE_PLUME_MIP module~cable_driver_common_mod->module~cable_plume_mip module~cable_site CABLE_site module~cable_driver_common_mod->module~cable_site module~casadimension casadimension module~cable_driver_common_mod->module~casadimension module~casavariable casavariable module~cable_driver_common_mod->module~casavariable module~cable_io_vars_module->module~cable_def_types_mod module~cable_mpicommon->module~cable_def_types_mod module~casa_inout_module->module~casavariable module~cable_abort_module->module~cable_io_vars_module module~cable_runtime_opts_mod cable_runtime_opts_mod module~cable_common_module->module~cable_runtime_opts_mod module~cable_cru->module~cable_io_vars_module module~casa_ncdf_module casa_ncdf_module module~cable_cru->module~casa_ncdf_module netcdf netcdf module~cable_cru->netcdf module~cable_climate_type_mod cable_climate_type_mod module~cable_def_types_mod->module~cable_climate_type_mod module~cable_input_module->module~cable_checks_module module~cable_input_module->module~cable_io_vars_module module~cable_input_module->module~casa_inout_module module~cable_input_module->module~cable_abort_module module~cable_input_module->module~cable_common_module module~cable_input_module->module~cable_def_types_mod module~cable_input_module->module~casadimension module~cable_input_module->module~casavariable module~cable_init_module cable_init_module module~cable_input_module->module~cable_init_module module~cable_param_module cable_param_module module~cable_input_module->module~cable_param_module module~cable_read_module cable_read_module module~cable_input_module->module~cable_read_module module~cable_input_module->module~casa_ncdf_module module~casa_readbiome_module casa_readbiome_module module~cable_input_module->module~casa_readbiome_module module~casaparm casaparm module~cable_input_module->module~casaparm module~cbl_sinbet_mod cbl_sinbet_mod module~cable_input_module->module~cbl_sinbet_mod module~phenvariable phenvariable module~cable_input_module->module~phenvariable module~pop_types POP_Types module~cable_input_module->module~pop_types module~popluc_types POPLUC_Types module~cable_input_module->module~popluc_types module~cable_input_module->netcdf iso_fortran_env iso_fortran_env module~cable_mpi_mod->iso_fortran_env mpi mpi module~cable_mpi_mod->mpi module~cable_plume_mip->module~cable_io_vars_module module~cable_plume_mip->module~cable_common_module module~cable_plume_mip->module~casa_ncdf_module module~cable_plume_mip->netcdf module~cable_site->module~cable_io_vars_module module~cable_site->module~cable_common_module module~cable_site->module~casa_ncdf_module module~casadimension->module~cable_def_types_mod module~casavariable->module~casadimension module~cable_init_module->module~cable_io_vars_module module~cable_init_module->module~cable_abort_module module~cable_init_module->module~cable_common_module module~cable_init_module->module~cable_def_types_mod module~cable_init_module->module~cable_read_module module~cable_init_module->netcdf module~cable_param_module->module~cable_io_vars_module module~cable_param_module->module~cable_abort_module module~cable_param_module->module~cable_common_module module~cable_param_module->module~cable_def_types_mod module~cable_param_module->module~casadimension module~cable_param_module->module~casavariable module~cable_param_module->module~phenvariable module~cable_luc_expt CABLE_LUC_EXPT module~cable_param_module->module~cable_luc_expt module~cable_pft_params_mod cable_pft_params_mod module~cable_param_module->module~cable_pft_params_mod module~cable_soil_params_mod cable_soil_params_mod module~cable_param_module->module~cable_soil_params_mod module~cable_read_module->module~cable_io_vars_module module~cable_read_module->module~cable_abort_module module~cable_read_module->module~cable_def_types_mod module~cable_read_module->netcdf module~casaparm->module~casadimension module~phenvariable->module~casadimension module~pop_constants POP_Constants module~pop_types->module~pop_constants module~typedef TypeDef module~pop_types->module~typedef module~popluc_constants POPLUC_CONSTANTS module~popluc_types->module~popluc_constants module~popluc_types->module~typedef module~cable_luc_expt->module~cable_io_vars_module module~cable_luc_expt->module~cable_common_module module~cable_luc_expt->module~cable_def_types_mod module~cable_luc_expt->module~casa_ncdf_module module~cable_luc_expt->netcdf module~grid_constants_mod_cbl grid_constants_mod_cbl module~cable_pft_params_mod->module~grid_constants_mod_cbl module~cable_soil_params_mod->module~grid_constants_mod_cbl module~pop_constants->module~typedef module~popluc_constants->module~typedef

Variables

Type Visibility Attributes Name Initial
integer, private :: wnp
integer, private, ALLOCATABLE, DIMENSION(:,:) :: m3d_t
integer, private, ALLOCATABLE, DIMENSION(:,:) :: mat_t
integer, private, ALLOCATABLE, DIMENSION(:) :: vec_t
integer, private, ALLOCATABLE, DIMENSION(:) :: inp_ts
integer, private, ALLOCATABLE, DIMENSION(:) :: recv_ts
integer, private, ALLOCATABLE, DIMENSION(:) :: restart_ts
integer, private, ALLOCATABLE, DIMENSION(:) :: casa_ts
integer, private, ALLOCATABLE, DIMENSION(:) :: casa_dump_ts
integer, private, ALLOCATABLE, DIMENSION(:) :: casa_LUC_ts
integer, private, ALLOCATABLE, DIMENSION(:) :: climate_ts
integer, private :: pop_ts
integer, private, ALLOCATABLE, DIMENSION(:) :: inp_req
integer, private, ALLOCATABLE, DIMENSION(:,:) :: inp_stats
integer, private, ALLOCATABLE, DIMENSION(:) :: recv_req
integer, private, ALLOCATABLE, DIMENSION(:,:) :: recv_stats
type(lpdecomp_t), private, ALLOCATABLE, DIMENSION(:) :: wland

Subroutines

public subroutine mpidrv_master(comm, trunk_sumbal, dels, koffset, kend, PLUME, CRU)

Arguments

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

Reference value for quasi-bitwise reproducibility checks.

real, intent(inout) :: dels

Time step size in seconds

integer, intent(inout) :: koffset

Timestep to start at

integer, intent(inout) :: kend

No. of time steps in run

type(PLUME_MIP_TYPE), intent(in) :: PLUME
type(CRU_TYPE), intent(in) :: CRU

private subroutine master_decomp(comm, mland)

Arguments

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

private subroutine master_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(inout) :: met
type(air_type), intent(inout) :: air
type(soil_snow_type), intent(inout) :: ssnow
type(veg_parameter_type), intent(inout) :: veg
type(bgc_pool_type), intent(inout) :: bgc
type(soil_parameter_type), intent(inout) :: soil
type(canopy_type), intent(inout) :: canopy
type(roughness_type), intent(inout) :: rough
type(radiation_type), intent(inout) :: rad
type(sum_flux_type), intent(inout) :: sum_flux
type(balances_type), intent(inout) :: bal

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

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: comm
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

private subroutine master_intypes(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 master_outtypes(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 master_casa_types(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 master_climate_types(comm, climate, ktauday)

Arguments

Type IntentOptional Attributes Name
integer :: comm
type(climate_type) :: climate
integer :: ktauday

private subroutine master_restart_types(comm, canopy, air)

Arguments

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

private subroutine master_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 master_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 master_pop_types(comm, pop)

Arguments

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

private subroutine master_receive_pop(pop, comm)

Arguments

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

private subroutine master_send_input(comm, dtypes, ktau)

Arguments

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

private subroutine master_receive(comm, ktau, types)

Arguments

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

private subroutine master_end(icycle, restart)

Arguments

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

private subroutine master_spincasacnp(dels, kstart, kend, mloop, veg, soil, casabiome, casapool, casaflux, casamet, casabal, phen, POP, climate, 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) :: icomm
integer, intent(in) :: ocomm

private subroutine master_CASAONLY_LUC(dels, kstart, kend, veg, casabiome, casapool, casaflux, casamet, casabal, phen, POP, climate, LUC_EXPT, POPLUC, 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(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
type(LUC_EXPT_TYPE), intent(inout) :: LUC_EXPT
type(POPLUC_TYPE), intent(inout) :: POPLUC
integer, intent(in) :: icomm
integer, intent(in) :: ocomm