CAM
|
Data Types | |
type | soil_tortuosity_type |
Functions/Subroutines | |
subroutine, public | tracer_param_init (bounds) |
subroutine | calc_gaseous_diffusion_soil_tortuosity (bounds, lbj, ubj, jtops, num_soilc, filter_soilc, biophysforc, tau_gas, bstatus) |
subroutine | calc_aqueous_diffusion_soil_tortuosity (bounds, lbj, ubj, jtops, numf, filter, biophysforc, tau_liq, betr_status) |
subroutine | calc_bulk_diffusivity (bounds, col, lbj, ubj, jtops, numf, filter, bunsencef_col, biophysforc, tau_soi, betrtracer_vars, bulkdiffus, betr_status) |
subroutine | calc_bulk_conductances (bounds, lbj, ubj, jtops, numf, filter, bulkdiffus, dz, betrtracer_vars, hmconductance_col, betr_status) |
subroutine | calc_henrys_coeff (bounds, lbj, ubj, jtops, numf, filter, t_soisno, soi_pH, betrtracer_vars, aqu2neutralcef_col, henrycef_col, betr_status) |
subroutine | calc_bunsen_coeff (bounds, lbj, ubj, jtops, numf, filter, henrycef_col, t_soisno, smp_l, betrtracer_vars, bunsencef_col, betr_status) |
subroutine | calc_dual_phase_convert_coeff (bounds, lbj, ubj, jtops, numf, filter, biophysforc, betrtracer_vars, tracerstate_vars, tracercoeff_vars, betr_status) |
subroutine, public | convert_mobile2gas (bounds, lbj, ubj, jtops, numf, filter, do_forward, gas2bulkcef_mobile_col, betrtracer_vars, tracer_conc_mobile, betr_status) |
subroutine, public | set_multi_phase_diffusion (bounds, col, lbj, ubj, jtops, numf, filter, biophysforc, betrtracer_vars, tracercoeff_vars, betr_status) |
subroutine, public | set_phase_convert_coeff (bounds, lbj, ubj, jtops, numf, filter, dz, biophysforc, betrtracer_vars, tracerstate_vars, tracercoeff_vars, betr_status) |
subroutine, public | calc_tracer_infiltration (bounds, jtops, numf, filter, bunsencef_topsoi, betrtracer_vars, tracerboundarycond_vars, biogeo_flux, tracer_flx_infl, betr_status) |
subroutine | calc_equil_to_liquid_convert_coeff (bounds, lbj, ubj, jtops, numf, filter, t_soisno, h2osoi_ice, dz, betrtracer_vars, aqu2equilsolidcef_col, betr_status) |
subroutine, public | get_zwt (bounds, numf, filter, zi, biophysforc, zwt, jwt, betr_status) |
subroutine, public | calc_aerecond (bounds, col, pft, num_soilp, filter_soilp, jwt, biophysforc, betrtracer_vars, betr_aerecond_vars, tracercoeff_vars, betr_status) |
subroutine, public | betr_annualupdate (betr_time, bounds, pft, num_soilc, filter_soilc, num_soilp, filter_soilp, biophysforc, betr_aerecond_vars, tracercoeff_vars, betr_status) |
subroutine | calc_rhovap (bounds, lbj, ubj, jtops, num_soilc, filter_soilc, t_soisno, smp_l, rho_vap, betr_status) |
Variables | |
character(len= *), parameter, private | mod_filename = __FILE__ |
character(len= *), parameter | filename = __FILE__ |
real(r8), parameter | minval_diffus = 1.e-20_r8 |
real(r8), parameter | minval_airvol = 1.e-10_r8 |
type(soil_tortuosity_type), target | tau_soil |
subroutine, public tracerparamsmod::betr_annualupdate | ( | type(betr_time_type), intent(in) | betr_time, |
type(bounds_type), intent(in) | bounds, | ||
type(betr_patch_type), intent(in) | pft, | ||
integer, intent(in) | num_soilc, | ||
integer, dimension(:), intent(in) | filter_soilc, | ||
integer, intent(in) | num_soilp, | ||
integer, dimension(:), intent(in) | filter_soilp, | ||
type(betr_biogeophys_input_type), intent(in) | biophysforc, | ||
type(betr_aerecond_type), intent(inout) | betr_aerecond_vars, | ||
type(tracercoeff_type), intent(inout) | tracercoeff_vars, | ||
type(betr_status_type), intent(out) | betr_status | ||
) |
subroutine, public tracerparamsmod::calc_aerecond | ( | type(bounds_type), intent(in) | bounds, |
type(betr_column_type), intent(in) | col, | ||
type(betr_patch_type), intent(in) | pft, | ||
integer, intent(in) | num_soilp, | ||
integer, dimension(:), intent(in) | filter_soilp, | ||
integer, dimension(bounds%begc: ), intent(in) | jwt, | ||
type(betr_biogeophys_input_type), intent(in) | biophysforc, | ||
type(betrtracer_type), intent(in) | betrtracer_vars, | ||
type(betr_aerecond_type), intent(in) | betr_aerecond_vars, | ||
type(tracercoeff_type), intent(inout) | tracercoeff_vars, | ||
type(betr_status_type), intent(out) | betr_status | ||
) |
subroutine tracerparamsmod::calc_aqueous_diffusion_soil_tortuosity | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | lbj, | ||
integer, intent(in) | ubj, | ||
integer, dimension(bounds%begc: ), intent(in) | jtops, | ||
integer, intent(in) | numf, | ||
integer, dimension(:), intent(in) | filter, | ||
type(betr_biogeophys_input_type), intent(in) | biophysforc, | ||
real(r8), dimension(bounds%begc: , lbj: ), intent(inout) | tau_liq, | ||
type(betr_status_type), intent(out) | betr_status | ||
) |
subroutine tracerparamsmod::calc_bulk_conductances | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | lbj, | ||
integer, intent(in) | ubj, | ||
integer, dimension(bounds%begc: ), intent(in) | jtops, | ||
integer, intent(in) | numf, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), dimension(bounds%begc: ,lbj: ,1: ), intent(in) | bulkdiffus, | ||
real(r8), dimension(bounds%begc: , lbj: ), intent(in) | dz, | ||
type(betrtracer_type), intent(in) | betrtracer_vars, | ||
real(r8), dimension(bounds%begc: , lbj: ,1: ), intent(inout) | hmconductance_col, | ||
type(betr_status_type), intent(out) | betr_status | ||
) |
subroutine tracerparamsmod::calc_bulk_diffusivity | ( | type(bounds_type), intent(in) | bounds, |
type(betr_column_type), intent(in) | col, | ||
integer, intent(in) | lbj, | ||
integer, intent(in) | ubj, | ||
integer, dimension(bounds%begc: ), intent(in) | jtops, | ||
integer, intent(in) | numf, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), dimension(bounds%begc: ,lbj: ,1: ), intent(in) | bunsencef_col, | ||
type(betr_biogeophys_input_type), intent(in) | biophysforc, | ||
type(soil_tortuosity_type), intent(in) | tau_soi, | ||
type(betrtracer_type), intent(in) | betrtracer_vars, | ||
real(r8), dimension(bounds%begc: ,lbj: , 1: ), intent(out) | bulkdiffus, | ||
type(betr_status_type), intent(out) | betr_status | ||
) |
subroutine tracerparamsmod::calc_bunsen_coeff | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | lbj, | ||
integer, intent(in) | ubj, | ||
integer, dimension(bounds%begc: ), intent(in) | jtops, | ||
integer, intent(in) | numf, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), dimension(bounds%begc: , lbj: , 1: ), intent(in) | henrycef_col, | ||
real(r8), dimension(bounds%begc: , lbj: ), intent(in) | t_soisno, | ||
real(r8), dimension(bounds%begc: , lbj: ), intent(in) | smp_l, | ||
type(betrtracer_type), intent(in) | betrtracer_vars, | ||
real(r8), dimension(bounds%begc: , lbj: , 1: ), intent(inout) | bunsencef_col, | ||
type(betr_status_type), intent(out) | betr_status | ||
) |
subroutine tracerparamsmod::calc_dual_phase_convert_coeff | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | lbj, | ||
integer, intent(in) | ubj, | ||
integer, dimension(bounds%begc: ), intent(in) | jtops, | ||
integer, intent(in) | numf, | ||
integer, dimension(:), intent(in) | filter, | ||
type(betr_biogeophys_input_type), intent(in) | biophysforc, | ||
type(betrtracer_type), intent(in) | betrtracer_vars, | ||
type(tracerstate_type), intent(in) | tracerstate_vars, | ||
type(tracercoeff_type), intent(inout) | tracercoeff_vars, | ||
type(betr_status_type), intent(out) | betr_status | ||
) |
subroutine tracerparamsmod::calc_equil_to_liquid_convert_coeff | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | lbj, | ||
integer, intent(in) | ubj, | ||
integer, dimension(bounds%begc: ), intent(in) | jtops, | ||
integer, intent(in) | numf, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), dimension(bounds%begc: , lbj: ), intent(in) | t_soisno, | ||
real(r8), dimension(bounds%begc: , lbj: ), intent(in) | h2osoi_ice, | ||
real(r8), dimension(bounds%begc: , lbj: ), intent(in) | dz, | ||
type(betrtracer_type), intent(in) | betrtracer_vars, | ||
real(r8), dimension(bounds%begc:bounds%endc, lbj:ubj, 1:betrtracer_vars%nsolid_equil_tracer_groups), intent(inout) | aqu2equilsolidcef_col, | ||
type(betr_status_type), intent(out) | betr_status | ||
) |
subroutine tracerparamsmod::calc_gaseous_diffusion_soil_tortuosity | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | lbj, | ||
integer, intent(in) | ubj, | ||
integer, dimension(bounds%begc: ), intent(in) | jtops, | ||
integer, intent(in) | num_soilc, | ||
integer, dimension(:), intent(in) | filter_soilc, | ||
type(betr_biogeophys_input_type), intent(in) | biophysforc, | ||
real(r8), dimension(bounds%begc: , lbj: ), intent(inout) | tau_gas, | ||
type(betr_status_type), intent(out) | bstatus | ||
) |
subroutine tracerparamsmod::calc_henrys_coeff | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | lbj, | ||
integer, intent(in) | ubj, | ||
integer, dimension(bounds%begc: ), intent(in) | jtops, | ||
integer, intent(in) | numf, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), dimension(bounds%begc: , lbj: ), intent(in) | t_soisno, | ||
real(r8), dimension(bounds%begc: , lbj: ), intent(in) | soi_pH, | ||
type(betrtracer_type), intent(in) | betrtracer_vars, | ||
real(r8), dimension(bounds%begc: , lbj: , 1: ), intent(inout) | aqu2neutralcef_col, | ||
real(r8), dimension(bounds%begc: , lbj: , 1: ), intent(inout) | henrycef_col, | ||
type(betr_status_type), intent(out) | betr_status | ||
) |
subroutine tracerparamsmod::calc_rhovap | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | lbj, | ||
integer, intent(in) | ubj, | ||
integer, dimension(bounds%begc: ), intent(in) | jtops, | ||
integer, intent(in) | num_soilc, | ||
integer, dimension(:), intent(in) | filter_soilc, | ||
real(r8), dimension(bounds%begc: , lbj: ), intent(in) | t_soisno, | ||
real(r8), dimension(bounds%begc: , lbj: ), intent(in) | smp_l, | ||
real(r8), dimension(bounds%begc: , lbj: ), intent(inout) | rho_vap, | ||
type(betr_status_type), intent(out) | betr_status | ||
) |
subroutine, public tracerparamsmod::calc_tracer_infiltration | ( | type(bounds_type), intent(in) | bounds, |
integer, dimension(bounds%begc: ), intent(in) | jtops, | ||
integer, intent(in) | numf, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), dimension(bounds%begc: , 1: ), intent(in) | bunsencef_topsoi, | ||
type(betrtracer_type), intent(in) | betrtracer_vars, | ||
type(tracerboundarycond_type), intent(in) | tracerboundarycond_vars, | ||
type(betr_biogeo_flux_type), intent(in) | biogeo_flux, | ||
real(r8), dimension(bounds%begc: , 1: ), intent(inout) | tracer_flx_infl, | ||
type(betr_status_type), intent(out) | betr_status | ||
) |
subroutine, public tracerparamsmod::convert_mobile2gas | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | lbj, | ||
integer, intent(in) | ubj, | ||
integer, dimension(bounds%begc: ), intent(in) | jtops, | ||
integer, intent(in) | numf, | ||
integer, dimension(:), intent(in) | filter, | ||
logical, intent(in) | do_forward, | ||
real(r8), dimension(bounds%begc: ,lbj: , 1: ), intent(in) | gas2bulkcef_mobile_col, | ||
type(betrtracer_type), intent(in) | betrtracer_vars, | ||
real(r8), dimension(bounds%begc: ,lbj: , 1: ), intent(inout) | tracer_conc_mobile, | ||
type(betr_status_type), intent(out) | betr_status | ||
) |
subroutine, public tracerparamsmod::get_zwt | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | numf, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), dimension(bounds%begc: , 0: ), intent(in) | zi, | ||
type(betr_biogeophys_input_type), intent(in) | biophysforc, | ||
real(r8), dimension( bounds%begc: ), intent(inout) | zwt, | ||
integer, dimension(bounds%begc: ), intent(inout) | jwt, | ||
type(betr_status_type), intent(out) | betr_status | ||
) |
subroutine, public tracerparamsmod::set_multi_phase_diffusion | ( | type(bounds_type), intent(in) | bounds, |
type(betr_column_type), intent(in) | col, | ||
integer, intent(in) | lbj, | ||
integer, intent(in) | ubj, | ||
integer, dimension(bounds%begc: ), intent(in) | jtops, | ||
integer, intent(in) | numf, | ||
integer, dimension(:), intent(in) | filter, | ||
type(betr_biogeophys_input_type), intent(in) | biophysforc, | ||
type(betrtracer_type), intent(in) | betrtracer_vars, | ||
type(tracercoeff_type), intent(inout) | tracercoeff_vars, | ||
type(betr_status_type), intent(out) | betr_status | ||
) |
subroutine, public tracerparamsmod::set_phase_convert_coeff | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | lbj, | ||
integer, intent(in) | ubj, | ||
integer, dimension(bounds%begc:bounds%endc), intent(in) | jtops, | ||
integer, intent(in) | numf, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), dimension(bounds%begc: ,lbj: ), intent(in) | dz, | ||
type(betr_biogeophys_input_type), intent(in) | biophysforc, | ||
type(betrtracer_type), intent(in) | betrtracer_vars, | ||
type(tracerstate_type), intent(in) | tracerstate_vars, | ||
type(tracercoeff_type), intent(inout) | tracercoeff_vars, | ||
type(betr_status_type), intent(out) | betr_status | ||
) |
subroutine, public tracerparamsmod::tracer_param_init | ( | type(bounds_type), intent(in) | bounds | ) |
|
private |
|
private |
|
private |
|
private |
|
private |