cable_common_module Module


Uses

  • module~~cable_common_module~~UsesGraph module~cable_common_module cable_common_module module~cable_runtime_opts_mod cable_runtime_opts_mod module~cable_common_module->module~cable_runtime_opts_mod

Used by

  • module~~cable_common_module~~UsedByGraph module~cable_common_module cable_common_module module~cable_checks_module cable_checks_module module~cable_checks_module->module~cable_common_module module~cable_climate_mod cable_climate_mod module~cable_climate_mod->module~cable_common_module module~cable_driver_common_mod cable_driver_common_mod module~cable_driver_common_mod->module~cable_common_module module~cable_input_module cable_input_module module~cable_driver_common_mod->module~cable_input_module 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~cable_init_module cable_init_module module~cable_init_module->module~cable_common_module module~cable_input_module->module~cable_common_module module~cable_input_module->module~cable_checks_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_luc_expt CABLE_LUC_EXPT module~cable_luc_expt->module~cable_common_module module~cable_mpiworker~2 cable_mpiworker module~cable_mpiworker~2->module~cable_common_module module~cable_mpiworker~2->module~cable_driver_common_mod module~cable_output_module cable_output_module module~cable_output_module->module~cable_common_module module~cable_output_module->module~cable_checks_module module~cable_param_module->module~cable_common_module module~cable_param_module->module~cable_luc_expt module~cable_phenology_module cable_phenology_module module~cable_phenology_module->module~cable_common_module module~cable_plume_mip->module~cable_common_module module~cable_psm cable_psm module~cable_psm->module~cable_common_module module~cable_serial cable_serial module~cable_serial->module~cable_common_module module~cable_serial->module~cable_checks_module module~cable_serial->module~cable_climate_mod module~cable_serial->module~cable_driver_common_mod module~cable_serial->module~cable_input_module module~cable_serial->module~cable_luc_expt module~cable_serial->module~cable_output_module module~cable_serial->module~cable_plume_mip module~cable_serial->module~cable_site module~popluc_module POPLUC_Module module~cable_serial->module~popluc_module module~cbl_soil_snow_init_special_module cbl_soil_snow_init_special_module module~cable_serial->module~cbl_soil_snow_init_special_module module~cable_site->module~cable_common_module module~casa_cnp_module casa_cnp_module module~casa_cnp_module->module~cable_common_module module~casa_rplant_module casa_rplant_module module~casa_rplant_module->module~cable_common_module module~cbl_ssnow_data_mod cbl_ssnow_data_mod module~cbl_ssnow_data_mod->module~cable_common_module module~popluc_module->module~cable_common_module module~popluc_module->module~cable_luc_expt proc~alloc_climate_type alloc_climate_type proc~alloc_climate_type->module~cable_common_module proc~bgcdriver bgcdriver proc~bgcdriver->module~cable_common_module proc~bgcdriver->module~cable_phenology_module proc~biogeochem biogeochem proc~biogeochem->module~cable_common_module proc~biogeochem->module~casa_cnp_module proc~biogeochem->module~casa_rplant_module proc~carbon_pl carbon_pl proc~carbon_pl->module~cable_common_module proc~casa_feedback casa_feedback proc~casa_feedback->module~cable_common_module proc~casa_feedback->module~casa_cnp_module proc~casa_feedback~2 casa_feedback proc~casa_feedback~2->module~cable_common_module proc~casa_feedback~2->module~casa_cnp_module proc~casa_init casa_init proc~casa_init->module~cable_common_module proc~casa_poolout casa_poolout proc~casa_poolout->module~cable_common_module proc~casa_readbiome casa_readbiome proc~casa_readbiome->module~cable_common_module proc~casaonly_luc CASAONLY_LUC proc~casaonly_luc->module~cable_common_module proc~casaonly_luc->module~cable_luc_expt proc~casaonly_luc->module~popluc_module proc~cbm cbm proc~cbm->module~cable_common_module proc~create_landuse_cable_restart create_landuse_cable_restart proc~create_landuse_cable_restart->module~cable_common_module proc~create_landuse_cable_restart->module~cable_checks_module proc~create_landuse_cable_restart->module~cable_output_module proc~create_new_gridinfo create_new_gridinfo proc~create_new_gridinfo->module~cable_common_module proc~define_canopy define_canopy proc~define_canopy->module~cable_common_module proc~doysod2ymdhms DOYSOD2YMDHMS proc~doysod2ymdhms->module~cable_common_module proc~dryleaf dryLeaf proc~dryleaf->module~cable_common_module proc~fwsoil_calc_std fwsoil_calc_std proc~fwsoil_calc_std->module~cable_common_module proc~get_default_params get_default_params proc~get_default_params->module~cable_common_module proc~gwspatialparameters GWspatialParameters proc~gwspatialparameters->module~cable_common_module proc~gwstempv GWstempv proc~gwstempv->module~cable_common_module module~old_soil_conductivity_mod old_soil_conductivity_mod proc~gwstempv->module~old_soil_conductivity_mod module~total_soil_conductivity_mod total_soil_conductivity_mod proc~gwstempv->module~total_soil_conductivity_mod module~trimb_mod trimb_mod proc~gwstempv->module~trimb_mod proc~hydraulic_redistribution hydraulic_redistribution proc~hydraulic_redistribution->module~cable_common_module proc~is_casa_time IS_CASA_TIME proc~is_casa_time->module~cable_common_module proc~landuse_data landuse_data proc~landuse_data->module~cable_common_module proc~latent_heat_flux Latent_heat_flux proc~latent_heat_flux->module~cable_common_module proc~lucdriver LUCdriver proc~lucdriver->module~cable_common_module proc~lucdriver->module~cable_luc_expt proc~lucdriver->module~popluc_module proc~master_cable_params master_cable_params proc~master_cable_params->module~cable_common_module proc~master_casaonly_luc master_CASAONLY_LUC proc~master_casaonly_luc->module~cable_common_module proc~master_casaonly_luc->module~cable_luc_expt proc~master_casaonly_luc->module~popluc_module proc~master_climate_types master_climate_types proc~master_climate_types->module~cable_common_module proc~master_climate_types->module~cable_climate_mod proc~master_pop_types master_pop_types proc~master_pop_types->module~cable_common_module proc~master_spincasacnp master_spincasacnp proc~master_spincasacnp->module~cable_common_module proc~mpidrv_master~2 mpidrv_master proc~mpidrv_master~2->module~cable_common_module proc~mpidrv_master~2->module~cable_climate_mod proc~mpidrv_master~2->module~cable_input_module proc~mpidrv_master~2->module~cable_luc_expt proc~mpidrv_master~2->module~cable_output_module proc~mpidrv_master~2->module~cable_plume_mip proc~mpidrv_master~2->module~popluc_module proc~mpidrv_worker~2 mpidrv_worker proc~mpidrv_worker~2->module~cable_common_module proc~mpidrv_worker~2->module~cable_checks_module proc~mpidrv_worker~2->module~cable_climate_mod proc~mpidrv_worker~2->module~cable_input_module proc~mpidrv_worker~2->module~cable_output_module proc~mpidrv_worker~2->module~cbl_soil_snow_init_special_module proc~open_met_file open_met_file proc~open_met_file->module~cable_common_module proc~pop_io POP_IO proc~pop_io->module~cable_common_module proc~popdriver POPdriver proc~popdriver->module~cable_common_module proc~read_casa_dump read_casa_dump proc~read_casa_dump->module~cable_common_module proc~read_casa_restart_nc READ_CASA_RESTART_NC proc~read_casa_restart_nc->module~cable_common_module proc~read_gridinfo read_gridinfo proc~read_gridinfo->module~cable_common_module proc~read_luc_restart_nc READ_LUC_RESTART_NC proc~read_luc_restart_nc->module~cable_common_module proc~read_soilcolor read_soilcolor proc~read_soilcolor->module~cable_common_module proc~remove_trans remove_trans proc~remove_trans->module~cable_common_module proc~ruff_resist ruff_resist proc~ruff_resist->module~cable_common_module proc~sli_main sli_main proc~sli_main->module~cable_common_module proc~smoisturev smoisturev proc~smoisturev->module~cable_common_module proc~smoisturev->module~trimb_mod proc~snow_accum snow_accum proc~snow_accum->module~cable_common_module proc~snow_melting snow_melting proc~snow_melting->module~cable_common_module proc~snowcheck snowcheck proc~snowcheck->module~cable_common_module proc~soil_snow soil_snow proc~soil_snow->module~cable_common_module proc~soil_snow->module~cbl_ssnow_data_mod module~hydraulic_redistribution_mod hydraulic_redistribution_mod proc~soil_snow->module~hydraulic_redistribution_mod module~remove_trans_mod remove_trans_mod proc~soil_snow->module~remove_trans_mod module~snow_accum_mod snow_accum_mod proc~soil_snow->module~snow_accum_mod module~snow_melting_mod snow_melting_mod proc~soil_snow->module~snow_melting_mod module~snowcheck_mod snowcheck_mod proc~soil_snow->module~snowcheck_mod module~snowdensity_mod snowdensity_mod proc~soil_snow->module~snowdensity_mod module~snowl_adjust_mod snowl_adjust_mod proc~soil_snow->module~snowl_adjust_mod module~soilfreeze_mod soilfreeze_mod proc~soil_snow->module~soilfreeze_mod module~stempv_mod stempv_mod proc~soil_snow->module~stempv_mod module~surfbv_mod surfbv_mod proc~soil_snow->module~surfbv_mod proc~soilcarb soilcarb proc~soilcarb->module~cable_common_module proc~soilfreeze soilfreeze proc~soilfreeze->module~cable_common_module proc~spatialsoil spatialSoil proc~spatialsoil->module~cable_common_module proc~spec_init_snowcheck spec_init_snowcheck proc~spec_init_snowcheck->module~cable_common_module proc~spec_init_soil_snow spec_init_soil_snow proc~spec_init_soil_snow->module~cable_common_module proc~spincasacnp spincasacnp proc~spincasacnp->module~cable_common_module proc~stempv stempv proc~stempv->module~cable_common_module proc~stempv->module~old_soil_conductivity_mod proc~stempv->module~total_soil_conductivity_mod proc~stempv->module~trimb_mod proc~surf_wetness_fact Surf_wetness_fact proc~surf_wetness_fact->module~cable_common_module proc~surfbv surfbv proc~surfbv->module~cable_common_module module~smoisturev_mod smoisturev_mod proc~surfbv->module~smoisturev_mod proc~within_canopy within_canopy proc~within_canopy->module~cable_common_module proc~worker_cable_params worker_cable_params proc~worker_cable_params->module~cable_common_module proc~worker_cable_params->module~cable_input_module proc~worker_casaonly_luc worker_CASAONLY_LUC proc~worker_casaonly_luc->module~cable_common_module proc~worker_pop_types worker_pop_types proc~worker_pop_types->module~cable_common_module proc~worker_spincasacnp worker_spincasacnp proc~worker_spincasacnp->module~cable_common_module proc~write_casa_dump write_casa_dump proc~write_casa_dump->module~cable_common_module proc~write_casa_output_nc WRITE_CASA_OUTPUT_NC proc~write_casa_output_nc->module~cable_common_module proc~write_casa_restart_nc WRITE_CASA_RESTART_NC proc~write_casa_restart_nc->module~cable_common_module proc~write_default_params write_default_params proc~write_default_params->module~cable_common_module proc~write_landuse_casa_restart_nc WRITE_LANDUSE_CASA_RESTART_NC proc~write_landuse_casa_restart_nc->module~cable_common_module proc~write_luc_output_grid_nc WRITE_LUC_OUTPUT_GRID_NC proc~write_luc_output_grid_nc->module~cable_common_module proc~write_luc_output_nc WRITE_LUC_OUTPUT_NC proc~write_luc_output_nc->module~cable_common_module proc~write_luc_restart_nc WRITE_LUC_RESTART_NC proc~write_luc_restart_nc->module~cable_common_module proc~ymdhms2doysod YMDHMS2DOYSOD proc~ymdhms2doysod->module~cable_common_module program~cable_offline_driver cable_offline_driver program~cable_offline_driver->module~cable_common_module program~cable_offline_driver->module~cable_driver_common_mod program~cable_offline_driver->module~cable_plume_mip program~cable_offline_driver->module~cable_serial program~cable_offline_driver->module~cable_site module~cable_mpimaster cable_mpimaster program~cable_offline_driver->module~cable_mpimaster module~cable_mpimaster->module~cable_plume_mip module~cable_mpimaster~2 cable_mpimaster module~cable_mpimaster~2->module~cable_checks_module module~cable_mpimaster~2->module~cable_driver_common_mod module~cbl_soil_snow_init_special_module->module~cbl_ssnow_data_mod module~gwstempv_mod GWstempv_mod module~gwstempv_mod->module~cbl_ssnow_data_mod module~hydraulic_redistribution_mod->module~cbl_ssnow_data_mod module~old_soil_conductivity_mod->module~cbl_ssnow_data_mod module~remove_trans_mod->module~cbl_ssnow_data_mod module~smoisturev_mod->module~cbl_ssnow_data_mod module~snow_accum_mod->module~cbl_ssnow_data_mod module~snow_melting_mod->module~cbl_ssnow_data_mod module~snow_processes_soil_thermal_mod snow_processes_soil_thermal_mod module~snow_processes_soil_thermal_mod->module~cbl_ssnow_data_mod module~snowcheck_mod->module~cbl_ssnow_data_mod module~snowdensity_mod->module~cbl_ssnow_data_mod module~snowl_adjust_mod->module~cbl_ssnow_data_mod module~soilfreeze_mod->module~cbl_ssnow_data_mod module~stempv_mod->module~cbl_ssnow_data_mod module~surfbv_mod->module~cbl_ssnow_data_mod module~total_soil_conductivity_mod->module~cbl_ssnow_data_mod module~trimb_mod->module~cbl_ssnow_data_mod proc~casa_rplant casa_rplant proc~casa_rplant->module~casa_cnp_module proc~cru_get_subdiurnal_met CRU_GET_SUBDIURNAL_MET proc~cru_get_subdiurnal_met->module~cable_checks_module proc~load_parameters load_parameters proc~load_parameters->module~cable_luc_expt proc~load_parameters->module~popluc_module proc~plume_mip_get_met PLUME_MIP_GET_MET proc~plume_mip_get_met->module~cable_checks_module proc~worker_climate_types worker_climate_types proc~worker_climate_types->module~cable_climate_mod proc~snow_processes_soil_thermal snow_processes_soil_thermal proc~snow_processes_soil_thermal->module~gwstempv_mod proc~snow_processes_soil_thermal->module~snow_accum_mod proc~snow_processes_soil_thermal->module~snow_melting_mod proc~snow_processes_soil_thermal->module~snowcheck_mod proc~snow_processes_soil_thermal->module~snowdensity_mod proc~snow_processes_soil_thermal->module~snowl_adjust_mod

Variables

Type Visibility Attributes Name Initial
integer, public, SAVE :: ktau_gl
integer, public, SAVE :: kend_gl
integer, public, SAVE :: knode_gl
integer, public, SAVE :: kwidth_gl
logical, public :: L_fudge = .FALSE.
integer, public, SAVE :: CurYear
character(len=200), public :: myhome
logical, public :: calcsoilalbedo = .FALSE.
logical, public, SAVE :: l_casacnp
logical, public, SAVE :: l_laiFeedbk
logical, public, SAVE :: l_vcmaxFeedbk
logical, public :: l_luc = .FALSE.
logical, public :: l_thinforest = .FALSE.
logical, public :: l_landuse = .FALSE.
type(kbl_internal_switches), public, SAVE :: cable_runtime
type(filenames_type), public :: filename
logical, public :: redistrb = .FALSE.
type(gw_parameters_type), public, SAVE :: gw_params
real, public, DIMENSION(17), SAVE :: psi_c = (/-2550000.0, -2550000.0, -2550000.0, -2240000.0, -4280000.0, -2750000.0, -2750000.0, -2750000.0, -2750000.0, -2750000.0, -2750000.0, -2750000.0, -2750000.0, -2750000.0, -2750000.0, -2750000.0, -2750000.0/)
real, public, DIMENSION(17), SAVE :: psi_o = (/-66000.0, -66000.0, -66000.0, -35000.0, -83000.0, -74000.0, -74000.0, -74000.0, -74000.0, -74000.0, -74000.0, -74000.0, -74000.0, -74000.0, -74000.0, -74000.0, -74000.0/)
real, public, SAVE :: max_glacier_snowd = 1100.0
real, public, SAVE :: snow_ccnsw = 2.0
real, public, SAVE :: snmin = 1.
real, public, SAVE :: max_ssdn = 750.0
real, public, SAVE :: max_sconds = 2.51
real, public, SAVE :: frozen_limit = 0.85

Derived Types

type, public ::  kbl_internal_switches

Components

Type Visibility Attributes Name Initial
logical, public :: um = .FALSE.
logical, public :: um_explicit = .FALSE.
logical, public :: um_implicit = .FALSE.
logical, public :: um_radiation = .FALSE.
logical, public :: um_hydrology = .FALSE.
logical, public :: esm15 = .FALSE.
logical, public :: offline = .FALSE.
logical, public :: mk3l = .FALSE.

type, public ::  filenames_type

External files read/written by CABLE

Components

Type Visibility Attributes Name Initial
character(len=500), public :: met

name of file for CABLE input

character(len=500), public :: path = './'

path for output and restart files for CABLE and CASA

character(len=500), public :: out

name of file for CABLE output

character(len=500), public :: log

name of file for execution log

character(len=500), public :: restart_in = ' '

name of restart file to read

character(len=500), public :: restart_out

name of restart file to read

character(len=500), public :: LAI

name of file for default LAI

character(len=500), public :: TYPE

file for default veg/soil type

character(len=500), public :: veg

file for vegetation parameters

character(len=500), public :: soil

name of file for soil parameters

character(len=500), public :: soilcolor

file for soil color(soilcolor_global_1x1.nc)

character(len=500), public :: inits

name of file for initialisations

character(len=500), public :: soilIGBP

name of file for IGBP soil map

character(len=500), public :: gw_elev

name of file for gw/elevation data

character(len=500), public :: fxpft

filename for PFT fraction and transition,wood harvest, secondary harvest

character(len=500), public :: fxluh2cable

filename for mapping 12 luc states into 17 CABLE PFT

character(len=500), public :: gridnew

filename for updated gridinfo file

character(len=500), public :: trunk_sumbal = ".trunk_sumbal"

input filename for combined fluxes at each timestep (control run)

character(len=500), public :: new_sumbal = "new_sumbal"

output filename for combined fluxes at each timestep (current run)

type, public ::  organic_soil_params

Components

Type Visibility Attributes Name Initial
real, public :: hyds_vec_organic = 1.0e-4
real, public :: sucs_vec_organic = 10.3
real, public :: clappb_organic = 2.91
real, public :: ssat_vec_organic = 0.9
real, public :: watr_organic = 0.1
real, public :: sfc_vec_hk = 1.157407e-06
real, public :: swilt_vec_hk = 2.31481481e-8
real, public :: hyds_organic = 1.0e-4
real, public :: sucs_organic = 10.3
real, public :: bch_organic = 2.91
real, public :: ssat_organic = 0.9
real, public :: css_organic = 4000.0
real, public :: cnsd_organic = 0.1

type, public ::  gw_parameters_type

Components

Type Visibility Attributes Name Initial
real, public :: MaxHorzDrainRate = 2e-4
real, public :: EfoldHorzDrainRate = 2.0
real, public :: EfoldHorzDrainScale = 1.0
real, public :: MaxSatFraction = 2500.0
real, public :: hkrz = 0.5
real, public :: zdepth = 1.5
real, public :: frozen_frac = 0.05
real, public :: SoilEvapAlpha = 1.0
real, public :: IceAlpha = 3.0
real, public :: IceBeta = 1.0
real, public :: sfc_vec_hk = 1.157407e-06
real, public :: swilt_vec_hk = 2.31481481e-8
real, public :: ice_impedence = 5.0
real, public :: ssat_wet_factor = 0.85
type(organic_soil_params), public :: org
integer, public :: aquifer_recharge_function = -1
integer, public :: level_for_satfrac = 6
logical, public :: ssgw_ice_switch = .FALSE.
logical, public :: subsurface_sat_drainage = .TRUE.
logical, public :: cosby_univariate = .false.
logical, public :: cosby_multivariate = .false.
logical, public :: HC_SWC = .false.
logical, public :: BC_hysteresis = .false.

Functions

public elemental function IS_LEAPYEAR(YYYY)

Arguments

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

Return Value logical

public function LEAP_DAY(YYYY)

Arguments

Type IntentOptional Attributes Name
integer :: YYYY

Return Value integer