CAM
|
Functions/Subroutines | |
subroutine, public | init_soil_temperature () |
subroutine, public | soiltemperature (bounds, num_urbanl, filter_urbanl, num_nolakec, filter_nolakec, atm2lnd_vars, urbanparams_vars, canopystate_vars, waterstate_vars, waterflux_vars, solarabs_vars, soilstate_vars, energyflux_vars, temperature_vars) |
subroutine | solvetemperature (bounds, num_filter, filter, dtime, hs_h2osfc, hs_top_snow, hs_soil, hs_top, dhsdT, sabg_lyr_col, tk, tk_h2osfc, fact, fn, c_h2osfc, dz_h2osfc, jtop, jbot, temperature_vars, waterstate_vars, urban_column, tvector) |
subroutine, private | soilthermprop (bounds, num_nolakec, filter_nolakec, tk, cv, tk_h2osfc, urbanparams_vars, temperature_vars, waterstate_vars, soilstate_vars) |
subroutine, private | phasechangeh2osfc (bounds, num_nolakec, filter_nolakec, dhsdT, waterstate_vars, waterflux_vars, temperature_vars) |
subroutine, private | phasechange_beta (bounds, num_nolakec, filter_nolakec, dhsdT, soilstate_vars, waterstate_vars, waterflux_vars, energyflux_vars, temperature_vars) |
subroutine, public | computegroundheatfluxandderiv (bounds, num_nolakec, filter_nolakec, hs_h2osfc, hs_top_snow, hs_soil, hs_top, dhsdT, sabg_lyr_col, atm2lnd_vars, urbanparams_vars, canopystate_vars, waterstate_vars, waterflux_vars, solarabs_vars, energyflux_vars, temperature_vars) |
subroutine, public | computeheatdifffluxandfactor (bounds, num_nolakec, filter_nolakec, dtime, tk, cv, fn, fact, energyflux_vars, temperature_vars) |
subroutine, public | setrhsvec (bounds, num_filter, filter, dtime, hs_h2osfc, hs_top_snow, hs_soil, hs_top, dhsdT, sabg_lyr_col, tk, tk_h2osfc, fact, fn, c_h2osfc, dz_h2osfc, temperature_vars, waterstate_vars, urban_column, rvector) |
subroutine, public | setrhsvec_snow (bounds, num_filter, filter, hs_top_snow, hs_top, dhsdT, sabg_lyr_col, fact, fn, t_soisno, t_h2osfc, urban_column, rt) |
subroutine, public | setrhsvec_snowurban (bounds, num_filter, filter, hs_top_snow, hs_top, dhsdT, sabg_lyr_col, fact, fn, t_soisno, t_h2osfc, rt) |
subroutine, public | setrhsvec_snowurbannonroad (bounds, num_filter, filter, hs_top_snow, hs_top, dhsdT, sabg_lyr_col, fact, fn, t_soisno, rt) |
subroutine, public | setrhsvec_snowurbanroad (bounds, num_filter, filter, hs_top_snow, hs_top, dhsdT, sabg_lyr_col, fact, fn, t_soisno, t_h2osfc, rt) |
subroutine, public | setrhsvec_snownonurban (bounds, num_filter, filter, hs_top_snow, hs_top, dhsdT, sabg_lyr_col, fact, fn, t_soisno, rt) |
subroutine, public | setrhsvec_standingsurfacewater (bounds, num_filter, filter, dtime, hs_h2osfc, dhsdT, tk_h2osfc, c_h2osfc, dz_h2osfc, fn_h2osfc, t_soisno, t_h2osfc, rt) |
subroutine, public | setrhsvec_soil (bounds, num_filter, filter, hs_top_snow, hs_soil, hs_top, dhsdT, sabg_lyr_col, fact, fn, fn_h2osfc, c_h2osfc, frac_h2osfc, frac_sno_eff, t_soisno, urban_column, rt) |
subroutine, public | setrhsvec_soilurban (bounds, num_filter, filter, hs_top_snow, hs_soil, hs_top, dhsdT, sabg_lyr_col, fact, fn, fn_h2osfc, c_h2osfc, frac_sno_eff, t_soisno, rt) |
subroutine, public | setrhsvec_soilurbannonroad (bounds, num_filter, filter, hs_top_snow, hs_soil, hs_top, dhsdT, sabg_lyr_col, fact, fn, fn_h2osfc, c_h2osfc, t_soisno, rt) |
subroutine, public | setrhsvec_soilurbanroad (bounds, num_filter, filter, hs_top_snow, hs_soil, hs_top, dhsdT, sabg_lyr_col, fact, fn, fn_h2osfc, c_h2osfc, frac_sno_eff, t_soisno, rt) |
subroutine, public | setrhsvec_soilnonurban (bounds, num_filter, filter, hs_top_snow, hs_soil, hs_top, dhsdT, sabg_lyr_col, fact, fn, fn_h2osfc, c_h2osfc, frac_sno_eff, t_soisno, rt) |
subroutine, public | setrhsvec_soil_standingsurfacewater (bounds, num_filter, filter, hs_top_snow, hs_soil, hs_top, dhsdT, sabg_lyr_col, fact, fn, fn_h2osfc, c_h2osfc, frac_h2osfc, t_soisno, rt) |
subroutine, public | setmatrix (bounds, num_filter, filter, dtime, nband, dhsdT, tk, tk_h2osfc, fact, c_h2osfc, dz_h2osfc, waterstate_vars, urban_column, bmatrix) |
subroutine, public | assemblematrixfromsubmatrices (bounds, num_filter, filter, nband, bmatrix_snow, bmatrix_ssw, bmatrix_soil, bmatrix_snow_soil, bmatrix_ssw_soil, bmatrix_soil_snow, bmatrix_soil_ssw, bmatrix) |
subroutine, public | setmatrix_snow (bounds, num_filter, filter, nband, dhsdT, tk, fact, frac_sno_eff, urban_column, bmatrix_snow) |
subroutine, public | setmatrix_snowurban (bounds, num_filter, filter, nband, dhsdT, tk, fact, bmatrix_snow) |
subroutine, public | setmatrix_snowurbannonroad (bounds, num_filter, filter, nband, dhsdT, tk, fact, bmatrix_snow) |
subroutine, public | setmatrix_snowurbanroad (bounds, num_filter, filter, nband, dhsdT, tk, fact, bmatrix_snow) |
subroutine, public | setmatrix_snownonurban (bounds, num_filter, filter, nband, dhsdT, tk, fact, bmatrix_snow) |
subroutine, public | setmatrix_snow_soil (bounds, num_filter, filter, nband, tk, fact, urban_column, bmatrix_snow_soil) |
subroutine, public | setmatrix_snow_soilurban (bounds, num_filter, filter, nband, tk, fact, bmatrix_snow_soil) |
subroutine, public | setmatrix_snow_soilurbannonroad (bounds, num_filter, filter, nband, tk, fact, bmatrix_snow_soil) |
subroutine, public | setmatrix_snow_soilurbanroad (bounds, num_filter, filter, nband, tk, fact, bmatrix_snow_soil) |
subroutine, public | setmatrix_snow_soilnonurban (bounds, num_filter, filter, nband, tk, fact, bmatrix_snow_soil) |
subroutine, public | setmatrix_soil (bounds, num_filter, filter, nband, dhsdT, tk, tk_h2osfc, dz_h2osfc, fact, frac_h2osfc, frac_sno_eff, urban_column, bmatrix_soil) |
subroutine, public | setmatrix_soilurban (bounds, num_filter, filter, nband, dhsdT, tk, tk_h2osfc, dz_h2osfc, fact, frac_sno_eff, bmatrix_soil) |
subroutine, public | setmatrix_soilurbannonroad (bounds, num_filter, filter, nband, dhsdT, tk, tk_h2osfc, dz_h2osfc, fact, bmatrix_soil) |
subroutine, public | setmatrix_soilurbanroad (bounds, num_filter, filter, nband, dhsdT, tk, tk_h2osfc, dz_h2osfc, fact, frac_sno_eff, bmatrix_soil) |
subroutine, public | setmatrix_soilnonurban (bounds, num_filter, filter, nband, dhsdT, tk, tk_h2osfc, dz_h2osfc, fact, frac_sno_eff, bmatrix_soil) |
subroutine, public | setmatrix_soil_snow (bounds, num_filter, filter, nband, tk, fact, frac_sno_eff, urban_column, bmatrix_soil_snow) |
subroutine, public | setmatrix_soil_snowurban (bounds, num_filter, filter, nband, tk, fact, frac_sno_eff, bmatrix_soil_snow) |
subroutine, public | setmatrix_soil_snowurbannonroad (bounds, num_filter, filter, nband, tk, fact, bmatrix_soil_snow) |
subroutine, public | setmatrix_soil_snowurbanroad (bounds, num_filter, filter, nband, tk, fact, frac_sno_eff, bmatrix_soil_snow) |
subroutine, public | setmatrix_soil_snownonurban (bounds, num_filter, filter, nband, tk, fact, frac_sno_eff, bmatrix_soil_snow) |
subroutine, public | setmatrix_standingsurfacewater (bounds, num_filter, filter, dtime, nband, dhsdT, tk, tk_h2osfc, fact, c_h2osfc, dz_h2osfc, bmatrix_ssw) |
subroutine, public | setmatrix_standingsurfacewater_soil (bounds, num_filter, filter, dtime, nband, tk, tk_h2osfc, fact, c_h2osfc, dz_h2osfc, bmatrix_ssw_soil) |
subroutine, public | setmatrix_soil_standingsurfacewater (bounds, num_filter, filter, nband, tk_h2osfc, fact, dz_h2osfc, frac_h2osfc, bmatrix_soil_ssw) |
subroutine | prepare_data_for_em_ptm_driver (bounds, num_filter, filter, sabg_lyr, dhsdT, hs_soil, hs_top_snow, hs_h2osfc, energyflux_vars) |
Variables | |
integer, parameter | default_thermal_model = 0 |
integer, parameter | petsc_thermal_model = 1 |
integer | thermal_model |
subroutine, public soiltemperaturemod::assemblematrixfromsubmatrices | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc:bounds%endc,nband,-nlevsno:-1 ), intent(in) | bmatrix_snow, | ||
real(r8), dimension(bounds%begc:bounds%endc,nband, 0:0 ), intent(in) | bmatrix_ssw, | ||
real(r8), dimension(bounds%begc:bounds%endc,nband, 1:nlevgrnd), intent(in) | bmatrix_soil, | ||
real(r8), dimension(bounds%begc:bounds%endc,nband,-1:-1), intent(in) | bmatrix_snow_soil, | ||
real(r8), dimension(bounds%begc:bounds%endc,nband, 0:0 ), intent(in) | bmatrix_ssw_soil, | ||
real(r8), dimension(bounds%begc:bounds%endc,nband, 1:1 ), intent(in) | bmatrix_soil_snow, | ||
real(r8), dimension(bounds%begc:bounds%endc,nband, 1:1 ), intent(in) | bmatrix_soil_ssw, | ||
real(r8), dimension(bounds%begc: , 1:,-nlevsno: ), intent(out) | bmatrix | ||
) |
subroutine, public soiltemperaturemod::computegroundheatfluxandderiv | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_nolakec, | ||
integer, dimension( : ), intent(in) | filter_nolakec, | ||
real(r8), dimension( bounds%begc: ), intent(out) | hs_h2osfc, | ||
real(r8), dimension( bounds%begc: ), intent(out) | hs_top_snow, | ||
real(r8), dimension( bounds%begc: ), intent(out) | hs_soil, | ||
real(r8), dimension (bounds%begc: ), intent(out) | hs_top, | ||
real(r8), dimension( bounds%begc: ), intent(out) | dhsdT, | ||
real(r8), dimension( bounds%begc:, -nlevsno+1: ), intent(out) | sabg_lyr_col, | ||
type(atm2lnd_type), intent(in) | atm2lnd_vars, | ||
type(urbanparams_type), intent(in) | urbanparams_vars, | ||
type(canopystate_type), intent(in) | canopystate_vars, | ||
type(waterstate_type), intent(in) | waterstate_vars, | ||
type(waterflux_type), intent(in) | waterflux_vars, | ||
type(solarabs_type), intent(inout) | solarabs_vars, | ||
type(energyflux_type), intent(inout) | energyflux_vars, | ||
type(temperature_type), intent(in) | temperature_vars | ||
) |
subroutine, public soiltemperaturemod::computeheatdifffluxandfactor | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_nolakec, | ||
integer, dimension(:), intent(in) | filter_nolakec, | ||
real(r8), intent(in) | dtime, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension (bounds%begc: ,-nlevsno+1: ), intent(in) | cv, | ||
real(r8), dimension (bounds%begc: ,-nlevsno+1: ), intent(out) | fn, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(out) | fact, | ||
type(energyflux_type), intent(in) | energyflux_vars, | ||
type(temperature_type), intent(in) | temperature_vars | ||
) |
subroutine, public soiltemperaturemod::init_soil_temperature | ( | ) |
|
private |
|
private |
subroutine soiltemperaturemod::prepare_data_for_em_ptm_driver | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), dimension(bounds%begc:bounds%endc,-nlevsno+1:1), intent(in) | sabg_lyr, | ||
real(r8), dimension(bounds%begc:bounds%endc), intent(in) | dhsdT, | ||
real(r8), dimension(bounds%begc:bounds%endc), intent(in) | hs_soil, | ||
real(r8), dimension(bounds%begc:bounds%endc), intent(in) | hs_top_snow, | ||
real(r8), dimension(bounds%begc:bounds%endc), intent(in) | hs_h2osfc, | ||
type(energyflux_type), intent(inout) | energyflux_vars | ||
) |
subroutine, public soiltemperaturemod::setmatrix | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), intent(in) | dtime, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension(bounds%begc: ), intent(in) | tk_h2osfc, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension( bounds%begc: ), intent(in) | c_h2osfc, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dz_h2osfc, | ||
type(waterstate_type), intent(in) | waterstate_vars, | ||
logical, intent(in) | urban_column, | ||
real(r8), dimension(bounds%begc: , 1:,-nlevsno: ), intent(out) | bmatrix | ||
) |
subroutine, public soiltemperaturemod::setmatrix_snow | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension(bounds%begc: ), intent(in) | frac_sno_eff, | ||
logical, intent(in) | urban_column, | ||
real(r8), dimension(bounds%begc: , 1:, -nlevsno: ), intent(out) | bmatrix_snow | ||
) |
subroutine, public soiltemperaturemod::setmatrix_snow_soil | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
logical, intent(in) | urban_column, | ||
real(r8), dimension(bounds%begc: , 1:,-1: ), intent(out) | bmatrix_snow_soil | ||
) |
subroutine, public soiltemperaturemod::setmatrix_snow_soilnonurban | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension(bounds%begc: , 1:,-1: ), intent(inout) | bmatrix_snow_soil | ||
) |
subroutine, public soiltemperaturemod::setmatrix_snow_soilurban | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension(bounds%begc: , 1:,-1: ), intent(inout) | bmatrix_snow_soil | ||
) |
subroutine, public soiltemperaturemod::setmatrix_snow_soilurbannonroad | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension(bounds%begc: , 1:,-1: ), intent(inout) | bmatrix_snow_soil | ||
) |
subroutine, public soiltemperaturemod::setmatrix_snow_soilurbanroad | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension(bounds%begc: , 1:,-1: ), intent(inout) | bmatrix_snow_soil | ||
) |
subroutine, public soiltemperaturemod::setmatrix_snownonurban | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension(bounds%begc: , 1:, -nlevsno: ), intent(inout) | bmatrix_snow | ||
) |
subroutine, public soiltemperaturemod::setmatrix_snowurban | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension(bounds%begc: , 1:, -nlevsno: ), intent(inout) | bmatrix_snow | ||
) |
subroutine, public soiltemperaturemod::setmatrix_snowurbannonroad | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension(bounds%begc: , 1:, -nlevsno: ), intent(inout) | bmatrix_snow | ||
) |
subroutine, public soiltemperaturemod::setmatrix_snowurbanroad | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension(bounds%begc: , 1:, -nlevsno: ), intent(inout) | bmatrix_snow | ||
) |
subroutine, public soiltemperaturemod::setmatrix_soil | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension(bounds%begc: ), intent(in) | tk_h2osfc, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dz_h2osfc, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension(bounds%begc: ), intent(in) | frac_h2osfc, | ||
real(r8), dimension(bounds%begc: ), intent(in) | frac_sno_eff, | ||
logical, intent(in) | urban_column, | ||
real(r8), dimension(bounds%begc: , 1:, 1: ), intent(out) | bmatrix_soil | ||
) |
subroutine, public soiltemperaturemod::setmatrix_soil_snow | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension(bounds%begc: ), intent(in) | frac_sno_eff, | ||
logical, intent(in) | urban_column, | ||
real(r8), dimension(bounds%begc: , 1: ,1: ), intent(out) | bmatrix_soil_snow | ||
) |
subroutine, public soiltemperaturemod::setmatrix_soil_snownonurban | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension(bounds%begc: ), intent(in) | frac_sno_eff, | ||
real(r8), dimension(bounds%begc: , 1: ,1: ), intent(inout) | bmatrix_soil_snow | ||
) |
subroutine, public soiltemperaturemod::setmatrix_soil_snowurban | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension(bounds%begc: ), intent(in) | frac_sno_eff, | ||
real(r8), dimension(bounds%begc: , 1: ,1: ), intent(inout) | bmatrix_soil_snow | ||
) |
subroutine, public soiltemperaturemod::setmatrix_soil_snowurbannonroad | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension(bounds%begc: , 1: ,1: ), intent(inout) | bmatrix_soil_snow | ||
) |
subroutine, public soiltemperaturemod::setmatrix_soil_snowurbanroad | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension(bounds%begc: ), intent(in) | frac_sno_eff, | ||
real(r8), dimension(bounds%begc: , 1: ,1: ), intent(inout) | bmatrix_soil_snow | ||
) |
subroutine, public soiltemperaturemod::setmatrix_soil_standingsurfacewater | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ), intent(in) | tk_h2osfc, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dz_h2osfc, | ||
real(r8), dimension(bounds%begc: ), intent(in) | frac_h2osfc, | ||
real(r8), dimension(bounds%begc: , 1:, 1: ), intent(out) | bmatrix_soil_ssw | ||
) |
subroutine, public soiltemperaturemod::setmatrix_soilnonurban | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension(bounds%begc: ), intent(in) | tk_h2osfc, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dz_h2osfc, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension(bounds%begc: ), intent(in) | frac_sno_eff, | ||
real(r8), dimension(bounds%begc: , 1:, 1: ), intent(inout) | bmatrix_soil | ||
) |
subroutine, public soiltemperaturemod::setmatrix_soilurban | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension(bounds%begc: ), intent(in) | tk_h2osfc, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dz_h2osfc, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension(bounds%begc: ), intent(in) | frac_sno_eff, | ||
real(r8), dimension(bounds%begc: , 1:, 1: ), intent(inout) | bmatrix_soil | ||
) |
subroutine, public soiltemperaturemod::setmatrix_soilurbannonroad | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension(bounds%begc: ), intent(in) | tk_h2osfc, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dz_h2osfc, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension(bounds%begc: , 1:, 1: ), intent(inout) | bmatrix_soil | ||
) |
subroutine, public soiltemperaturemod::setmatrix_soilurbanroad | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension(bounds%begc: ), intent(in) | tk_h2osfc, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dz_h2osfc, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension(bounds%begc: ), intent(in) | frac_sno_eff, | ||
real(r8), dimension(bounds%begc: , 1:, 1: ), intent(inout) | bmatrix_soil | ||
) |
subroutine, public soiltemperaturemod::setmatrix_standingsurfacewater | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), intent(in) | dtime, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension(bounds%begc: ), intent(in) | tk_h2osfc, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension( bounds%begc: ), intent(in) | c_h2osfc, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dz_h2osfc, | ||
real(r8), dimension(bounds%begc: , 1:, 0: ), intent(out) | bmatrix_ssw | ||
) |
subroutine, public soiltemperaturemod::setmatrix_standingsurfacewater_soil | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), intent(in) | dtime, | ||
integer, intent(in) | nband, | ||
real(r8), dimension(bounds%begc: ,-nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension(bounds%begc: ), intent(in) | tk_h2osfc, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension( bounds%begc: ), intent(in) | c_h2osfc, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dz_h2osfc, | ||
real(r8), dimension(bounds%begc: , 1: ,0: ), intent(out) | bmatrix_ssw_soil | ||
) |
subroutine, public soiltemperaturemod::setrhsvec | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), intent(in) | dtime, | ||
real(r8), dimension( bounds%begc: ), intent(in) | hs_h2osfc, | ||
real(r8), dimension( bounds%begc: ), intent(in) | hs_top_snow, | ||
real(r8), dimension( bounds%begc: ), intent(in) | hs_soil, | ||
real(r8), dimension( bounds%begc: ), intent(in) | hs_top, | ||
real(r8), dimension( bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | sabg_lyr_col, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension( bounds%begc: ), intent(in) | tk_h2osfc, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fn, | ||
real(r8), dimension( bounds%begc: ), intent(in) | c_h2osfc, | ||
real(r8), dimension( bounds%begc: ), intent(in) | dz_h2osfc, | ||
type(temperature_type), intent(in) | temperature_vars, | ||
type(waterstate_type), intent(in) | waterstate_vars, | ||
logical, intent(in) | urban_column, | ||
real(r8), dimension( bounds%begc: , -nlevsno: ), intent(out) | rvector | ||
) |
subroutine, public soiltemperaturemod::setrhsvec_snow | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), dimension( bounds%begc: ), intent(in) | hs_top_snow, | ||
real(r8), dimension( bounds%begc: ), intent(in) | hs_top, | ||
real(r8), dimension( bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | sabg_lyr_col, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension (bounds%begc: , -nlevsno+1: ), intent(in) | fn, | ||
real(r8), dimension(bounds%begc:, -nlevsno+1:), intent(in) | t_soisno, | ||
real(r8), dimension(bounds%begc:), intent(in) | t_h2osfc, | ||
logical, intent(in) | urban_column, | ||
real(r8), dimension(bounds%begc: , -nlevsno: ), intent(out) | rt | ||
) |
subroutine, public soiltemperaturemod::setrhsvec_snownonurban | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), dimension( bounds%begc: ), intent(in) | hs_top_snow, | ||
real(r8), dimension( bounds%begc: ), intent(in) | hs_top, | ||
real(r8), dimension( bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | sabg_lyr_col, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension (bounds%begc: , -nlevsno+1: ), intent(in) | fn, | ||
real(r8), dimension(bounds%begc:, -nlevsno+1:), intent(in) | t_soisno, | ||
real(r8), dimension(bounds%begc: , -nlevsno: ), intent(inout) | rt | ||
) |
subroutine, public soiltemperaturemod::setrhsvec_snowurban | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), dimension( bounds%begc: ), intent(in) | hs_top_snow, | ||
real(r8), dimension( bounds%begc: ), intent(in) | hs_top, | ||
real(r8), dimension( bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | sabg_lyr_col, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension (bounds%begc: , -nlevsno+1: ), intent(in) | fn, | ||
real(r8), dimension(bounds%begc:, -nlevsno+1:), intent(in) | t_soisno, | ||
real(r8), dimension(bounds%begc:), intent(in) | t_h2osfc, | ||
real(r8), dimension(bounds%begc: , -nlevsno: ), intent(inout) | rt | ||
) |
subroutine, public soiltemperaturemod::setrhsvec_snowurbannonroad | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), dimension( bounds%begc: ), intent(in) | hs_top_snow, | ||
real(r8), dimension( bounds%begc: ), intent(in) | hs_top, | ||
real(r8), dimension( bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | sabg_lyr_col, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension (bounds%begc: , -nlevsno+1: ), intent(in) | fn, | ||
real(r8), dimension(bounds%begc:, -nlevsno+1:), intent(in) | t_soisno, | ||
real(r8), dimension(bounds%begc: , -nlevsno: ), intent(inout) | rt | ||
) |
subroutine, public soiltemperaturemod::setrhsvec_snowurbanroad | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), dimension( bounds%begc: ), intent(in) | hs_top_snow, | ||
real(r8), dimension( bounds%begc: ), intent(in) | hs_top, | ||
real(r8), dimension( bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | sabg_lyr_col, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension (bounds%begc: , -nlevsno+1: ), intent(in) | fn, | ||
real(r8), dimension(bounds%begc:, -nlevsno+1:), intent(in) | t_soisno, | ||
real(r8), dimension(bounds%begc: ), intent(in) | t_h2osfc, | ||
real(r8), dimension(bounds%begc: , -nlevsno: ), intent(inout) | rt | ||
) |
subroutine, public soiltemperaturemod::setrhsvec_soil | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), dimension(bounds%begc: ), intent(in) | hs_top_snow, | ||
real(r8), dimension(bounds%begc: ), intent(in) | hs_soil, | ||
real(r8), dimension(bounds%begc: ), intent(in) | hs_top, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension(bounds%begc:, -nlevsno+1: ), intent(in) | sabg_lyr_col, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension (bounds%begc: ,-nlevsno+1: ), intent(in) | fn, | ||
real(r8), dimension (bounds%begc: ), intent(in) | fn_h2osfc, | ||
real(r8), dimension( bounds%begc: ), intent(in) | c_h2osfc, | ||
real(r8), dimension(bounds%begc: ), intent(in) | frac_h2osfc, | ||
real(r8), dimension(bounds%begc: ), intent(in) | frac_sno_eff, | ||
real(r8), dimension(bounds%begc:, -nlevsno+1:), intent(in) | t_soisno, | ||
logical, intent(in) | urban_column, | ||
real(r8), dimension(bounds%begc: ,1: ), intent(out) | rt | ||
) |
subroutine, public soiltemperaturemod::setrhsvec_soil_standingsurfacewater | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), dimension(bounds%begc: ), intent(in) | hs_top_snow, | ||
real(r8), dimension(bounds%begc: ), intent(in) | hs_soil, | ||
real(r8), dimension(bounds%begc: ), intent(in) | hs_top, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension(bounds%begc:, -nlevsno+1: ), intent(in) | sabg_lyr_col, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension (bounds%begc: ,-nlevsno+1: ), intent(in) | fn, | ||
real(r8), dimension (bounds%begc: ), intent(in) | fn_h2osfc, | ||
real(r8), dimension( bounds%begc: ), intent(in) | c_h2osfc, | ||
real(r8), dimension(bounds%begc: ), intent(in) | frac_h2osfc, | ||
real(r8), dimension(bounds%begc:, -nlevsno+1:), intent(in) | t_soisno, | ||
real(r8), dimension(bounds%begc: ,1: ), intent(inout) | rt | ||
) |
subroutine, public soiltemperaturemod::setrhsvec_soilnonurban | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), dimension(bounds%begc: ), intent(in) | hs_top_snow, | ||
real(r8), dimension(bounds%begc: ), intent(in) | hs_soil, | ||
real(r8), dimension(bounds%begc: ), intent(in) | hs_top, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension(bounds%begc:, -nlevsno+1: ), intent(in) | sabg_lyr_col, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension (bounds%begc: ,-nlevsno+1: ), intent(in) | fn, | ||
real(r8), dimension (bounds%begc: ), intent(in) | fn_h2osfc, | ||
real(r8), dimension( bounds%begc: ), intent(in) | c_h2osfc, | ||
real(r8), dimension(bounds%begc: ), intent(in) | frac_sno_eff, | ||
real(r8), dimension(bounds%begc:, -nlevsno+1:), intent(in) | t_soisno, | ||
real(r8), dimension(bounds%begc: ,1: ), intent(inout) | rt | ||
) |
subroutine, public soiltemperaturemod::setrhsvec_soilurban | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), dimension(bounds%begc: ), intent(in) | hs_top_snow, | ||
real(r8), dimension(bounds%begc: ), intent(in) | hs_soil, | ||
real(r8), dimension(bounds%begc: ), intent(in) | hs_top, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension(bounds%begc:, -nlevsno+1: ), intent(in) | sabg_lyr_col, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension (bounds%begc: ,-nlevsno+1: ), intent(in) | fn, | ||
real(r8), dimension (bounds%begc: ), intent(in) | fn_h2osfc, | ||
real(r8), dimension( bounds%begc: ), intent(in) | c_h2osfc, | ||
real(r8), dimension(bounds%begc: ), intent(in) | frac_sno_eff, | ||
real(r8), dimension(bounds%begc:, -nlevsno+1:), intent(in) | t_soisno, | ||
real(r8), dimension(bounds%begc: ,1: ), intent(inout) | rt | ||
) |
subroutine, public soiltemperaturemod::setrhsvec_soilurbannonroad | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), dimension(bounds%begc: ), intent(in) | hs_top_snow, | ||
real(r8), dimension(bounds%begc: ), intent(in) | hs_soil, | ||
real(r8), dimension(bounds%begc: ), intent(in) | hs_top, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension(bounds%begc:, -nlevsno+1: ), intent(in) | sabg_lyr_col, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension (bounds%begc: ,-nlevsno+1: ), intent(in) | fn, | ||
real(r8), dimension (bounds%begc: ), intent(in) | fn_h2osfc, | ||
real(r8), dimension( bounds%begc: ), intent(in) | c_h2osfc, | ||
real(r8), dimension(bounds%begc:, -nlevsno+1:), intent(in) | t_soisno, | ||
real(r8), dimension(bounds%begc: ,1: ), intent(inout) | rt | ||
) |
subroutine, public soiltemperaturemod::setrhsvec_soilurbanroad | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), dimension(bounds%begc: ), intent(in) | hs_top_snow, | ||
real(r8), dimension(bounds%begc: ), intent(in) | hs_soil, | ||
real(r8), dimension(bounds%begc: ), intent(in) | hs_top, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension(bounds%begc:, -nlevsno+1: ), intent(in) | sabg_lyr_col, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension (bounds%begc: ,-nlevsno+1: ), intent(in) | fn, | ||
real(r8), dimension (bounds%begc: ), intent(in) | fn_h2osfc, | ||
real(r8), dimension( bounds%begc: ), intent(in) | c_h2osfc, | ||
real(r8), dimension(bounds%begc: ), intent(in) | frac_sno_eff, | ||
real(r8), dimension(bounds%begc:, -nlevsno+1:), intent(in) | t_soisno, | ||
real(r8), dimension(bounds%begc: ,1: ), intent(inout) | rt | ||
) |
subroutine, public soiltemperaturemod::setrhsvec_standingsurfacewater | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), intent(in) | dtime, | ||
real(r8), dimension(bounds%begc: ), intent(in) | hs_h2osfc, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension(bounds%begc: ), intent(in) | tk_h2osfc, | ||
real(r8), dimension( bounds%begc: ), intent(in) | c_h2osfc, | ||
real(r8), dimension(bounds%begc: ), intent(in) | dz_h2osfc, | ||
real(r8), dimension (bounds%begc: ), intent(out) | fn_h2osfc, | ||
real(r8), dimension(bounds%begc:, -nlevsno+1:), intent(in) | t_soisno, | ||
real(r8), dimension(bounds%begc:), intent(in) | t_h2osfc, | ||
real(r8), dimension(bounds%begc:bounds%endc, 1:1 ), intent(out) | rt | ||
) |
subroutine, public soiltemperaturemod::soiltemperature | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_urbanl, | ||
integer, dimension(:), intent(in) | filter_urbanl, | ||
integer, intent(in) | num_nolakec, | ||
integer, dimension(:), intent(in) | filter_nolakec, | ||
type(atm2lnd_type), intent(in) | atm2lnd_vars, | ||
type(urbanparams_type), intent(in) | urbanparams_vars, | ||
type(canopystate_type), intent(in) | canopystate_vars, | ||
type(waterstate_type), intent(inout) | waterstate_vars, | ||
type(waterflux_type), intent(inout) | waterflux_vars, | ||
type(solarabs_type), intent(inout) | solarabs_vars, | ||
type(soilstate_type), intent(inout) | soilstate_vars, | ||
type(energyflux_type), intent(inout) | energyflux_vars, | ||
type(temperature_type), intent(inout) | temperature_vars | ||
) |
|
private |
subroutine soiltemperaturemod::solvetemperature | ( | type(bounds_type), intent(in) | bounds, |
integer, intent(in) | num_filter, | ||
integer, dimension(:), intent(in) | filter, | ||
real(r8), intent(in) | dtime, | ||
real(r8), dimension( bounds%begc: ), intent(in) | hs_h2osfc, | ||
real(r8), dimension( bounds%begc: ), intent(in) | hs_top_snow, | ||
real(r8), dimension( bounds%begc: ), intent(in) | hs_soil, | ||
real(r8), dimension( bounds%begc: ), intent(in) | hs_top, | ||
real(r8), dimension( bounds%begc: ), intent(in) | dhsdT, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | sabg_lyr_col, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | tk, | ||
real(r8), dimension( bounds%begc: ), intent(in) | tk_h2osfc, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fact, | ||
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(in) | fn, | ||
real(r8), dimension( bounds%begc: ), intent(in) | c_h2osfc, | ||
real(r8), dimension( bounds%begc: ), intent(in) | dz_h2osfc, | ||
integer, dimension(bounds%begc: ), intent(in) | jtop, | ||
integer, dimension(bounds%begc: ), intent(in) | jbot, | ||
type(temperature_type), intent(in) | temperature_vars, | ||
type(waterstate_type), intent(in) | waterstate_vars, | ||
logical, intent(in) | urban_column, | ||
real(r8), dimension( bounds%begc: , -nlevsno: ), intent(out) | tvector | ||
) |
integer, parameter soiltemperaturemod::default_thermal_model = 0 |
integer, parameter soiltemperaturemod::petsc_thermal_model = 1 |
integer soiltemperaturemod::thermal_model |