river_allocate_subcatch Subroutine

  1. river.f95
  2. river
  3. river_allocate_subcatch

public subroutine river_allocate_subcatch(n_subcatch)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: n_subcatch

Called by

proc~~river_allocate_subcatch~~CalledByGraph proc~river_allocate_subcatch river_allocate_subcatch proc~catchment_initialise_subcatchm catchment_initialise_subcatchm proc~catchment_initialise_subcatchm->proc~river_allocate_subcatch proc~catchment_initialise_parameters catchment_initialise_parameters proc~catchment_initialise_parameters->proc~catchment_initialise_subcatchm proc~initialise initialise proc~initialise->proc~catchment_initialise_parameters program~swim swim program~swim->proc~initialise

Contents

Source Code

river_allocate_subcatch

Source Code

  subroutine river_allocate_subcatch(n_subcatch)
    integer, intent(in) :: n_subcatch
    allocate(bsn_roc2(n_subcatch))
    bsn_roc2 = 0.
    allocate(bsn_roc4(n_subcatch))
    bsn_roc4 = 0.
  end subroutine river_allocate_subcatch