snow Module

---------------------------------------------------------------------------

---------------------------------------------------------------------------

---------------------------------------------------------------------------


Uses

  • module~~snow~~UsesGraph module~snow snow module~utilities utilities module~snow->module~utilities

Used by

  • module~~snow~~UsedByGraph module~snow snow proc~catchment_assign_subcatch catchment_assign_subcatch proc~catchment_assign_subcatch->module~snow proc~catchment_initialise_subcatchm catchment_initialise_subcatchm proc~catchment_initialise_subcatchm->module~snow proc~catchment_read_subcatch_params catchment_read_subcatch_params proc~catchment_read_subcatch_params->module~snow proc~hydrotope_process hydrotope_process proc~hydrotope_process->module~snow proc~initialise initialise proc~initialise->module~snow proc~print_module_parameters print_module_parameters proc~print_module_parameters->module~snow proc~reservoir_subbasin reservoir_subbasin proc~reservoir_subbasin->module~snow proc~runsubbasin runsubbasin proc~runsubbasin->module~snow proc~terminate terminate proc~terminate->module~snow proc~time_process_day time_process_day proc~time_process_day->module~snow proc~time_process_month time_process_month proc~time_process_month->module~snow proc~vegetation_adjust_energy_ratio vegetation_adjust_energy_ratio proc~vegetation_adjust_energy_ratio->module~snow proc~vegetation_process vegetation_process proc~vegetation_process->module~snow proc~vegetation_temperature_stress vegetation_temperature_stress proc~vegetation_temperature_stress->module~snow

Variables

Type Visibility Attributes Name Initial
logical, public, save :: bSnowModule = .true.
real(kind=dp), public, save :: balanc
real(kind=dp), public, save, dimension(:), allocatable :: bsn_gmrate
real(kind=dp), public, save, dimension(:), allocatable :: bsn_smrate
real(kind=dp), public, save, dimension(:), allocatable :: bsn_tmelt
real(kind=dp), public, save, dimension(:), allocatable :: bsn_tsnfall
real(kind=dp), public, save, dimension(:), allocatable :: elev0
real(kind=dp), public, save, dimension(:, :), allocatable :: gla
integer, public, parameter :: gla_day_out = 273
real(kind=dp), public, save :: glac_acc_mm
real(kind=dp), public, save :: glac_acc_mm0
integer, public :: glacier_weq_output_id = 0
real(kind=dp), public, save :: gmle
real(kind=dp), public, save, dimension(:), allocatable :: gmrate
real(kind=dp), public :: gmrate0 = 10.
real(kind=dp), public, save :: hsn
real(kind=dp), public, save :: hsn0
integer, public, save :: ieapg = 0
real(kind=dp), public, save :: prcor = 1.
real(kind=dp), public, save :: precip_elev_cor
real(kind=dp), public, save :: precipe
real(kind=dp), public, save :: psnow
real(kind=dp), public, save :: rnew = 0.08
real(kind=dp), public, save, dimension(:, :), allocatable :: rsn
real(kind=dp), public, save :: sml
real(kind=dp), public, save :: smle
real(kind=dp), public, save, dimension(:), allocatable :: smrate
real(kind=dp), public :: smrate0 = 1.0
real(kind=dp), public, save, dimension(:), allocatable :: sno
real(kind=dp), public, save, dimension(:, :), allocatable :: snoa
real(kind=dp), public, save :: snow1
real(kind=dp), public, save :: snowVal
real(kind=dp), public, save :: snow_acc_mm
real(kind=dp), public, save :: snow_acc_mm0
integer, public :: snow_depth_weq_output_id = 0
integer, public :: snowfall_weq_output_id = 0
real(kind=dp), public, save, dimension(:, :), allocatable :: sul
real(kind=dp), public, save, dimension(:, :), allocatable :: suz
real(kind=dp), public, save :: tgrad1
real(kind=dp), public, save :: tmax
real(kind=dp), public, save :: tmax_tmp
real(kind=dp), public, save, dimension(:), allocatable :: tmelt
real(kind=dp), public, save :: tmelt0
real(kind=dp), public, save :: tmin
real(kind=dp), public, save :: tmin_tmp
real(kind=dp), public, save :: tmit
real(kind=dp), public, save, dimension(:), allocatable :: tmx
real(kind=dp), public, save, dimension(:), allocatable :: tsnfall
real(kind=dp), public :: tsnfall0
real(kind=dp), public, save :: tx_tmp
real(kind=dp), public, save :: ulmax
real(kind=dp), public, save :: ulmax0 = 1.
real(kind=dp), public, save :: vsn
real(kind=dp), public, save :: xgrad1
real(kind=dp), public, save :: xprecip
real(kind=dp), public, save :: xprecip_elev_cor
real(kind=dp), public, save :: xsml
real(kind=dp), public, save :: xsnow
real(kind=dp), public, save :: xtmax
real(kind=dp), public, save :: xtmin
real(kind=dp), public, save :: xtmit
real(kind=dp), public, save :: xvsn

Subroutines

public subroutine dealloc_snow()

Arguments

None

public subroutine snow_allocate(mb, meap)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: mb
integer, intent(in) :: meap

public subroutine snow_allocate_subcatch(n_subcatch)

Arguments

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

public subroutine snow_degree_day_melting(j, jea)

Arguments

Type IntentOptional Attributes Name
integer :: j
integer :: jea

public subroutine snow_glacier_melt(j, jea)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: j
integer, intent(in) :: jea

public subroutine snow_initialise(mb, meap, subbasin_input_file_id, mstruc)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: mb
integer, intent(in) :: meap
integer, intent(in) :: subbasin_input_file_id
integer, intent(in), dimension(:, :, :) :: mstruc

public subroutine snow_initialise_subbasin()

Arguments

None

public subroutine snow_melting(j, jea, ida)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: j
integer, intent(in) :: jea
integer, intent(in) :: ida

public subroutine snow_process(j, jea, ida, mstruc, precip, tmn, tx)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: j
integer, intent(in) :: jea
integer, intent(in) :: ida
integer, intent(in), dimension(:, :, :) :: mstruc
real(kind=dp), intent(in) :: precip
real(kind=dp), intent(in), dimension(:) :: tmn
real(kind=dp), intent(in), dimension(:) :: tx

public subroutine snow_read_input(subbasin_input_file_id)

Arguments

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