EDCohortDynamicsMod Module


Uses


Subroutines

public subroutine create_cohort(currentSite, patchptr, pft, nn, hite, dbh, prt, laimemory, status, recruitstatus, ctrim, clayer, spread, bc_in)

***/ Define cohort state variable ***/

Arguments

Type IntentOptional Attributes Name
type(ed_site_type), intent(inout), target :: currentSite
type(ed_patch_type), intent(inout), pointer :: patchptr
integer, intent(in) :: pft
real(kind=r8), intent(in) :: nn
real(kind=r8), intent(in) :: hite
real(kind=r8), intent(in) :: dbh
class(prt_vartypes), target :: prt
real(kind=r8), intent(in) :: laimemory
integer, intent(in) :: status
integer, intent(in) :: recruitstatus
real(kind=r8), intent(in) :: ctrim
integer, intent(in) :: clayer
real(kind=r8), intent(in) :: spread
type(bc_in_type), intent(in) :: bc_in

public subroutine InitPRTBoundaryConditions(new_cohort)

Arguments

Type IntentOptional Attributes Name
type(ed_cohort_type), intent(inout), target :: new_cohort

public subroutine InitPRTObject(prt)

allocate(cnp_allom_prt) prt => cnp_allom_prt

Arguments

Type IntentOptional Attributes Name
class(prt_vartypes), pointer :: prt

public subroutine nan_cohort(cc_p)

Arguments

Type IntentOptional Attributes Name
type(ed_cohort_type), intent(inout), target :: cc_p

public subroutine zero_cohort(cc_p)

Arguments

Type IntentOptional Attributes Name
type(ed_cohort_type), intent(inout), target :: cc_p

public subroutine terminate_cohorts(currentSite, currentPatch, level, call_index)

Arguments

Type IntentOptional Attributes Name
type(ed_site_type), intent(inout), target :: currentSite
type(ed_patch_type), intent(inout), target :: currentPatch
integer, intent(in) :: level
integer :: call_index

public subroutine SendCohortToLitter(csite, cpatch, ccohort, nplant)

Arguments

Type IntentOptional Attributes Name
type(ed_site_type), target :: csite
type(ed_patch_type), target :: cpatch
type(ed_cohort_type), target :: ccohort
real(kind=r8) :: nplant

public subroutine DeallocateCohort(currentCohort)

Arguments

Type IntentOptional Attributes Name
type(ed_cohort_type), intent(inout) :: currentCohort

public subroutine fuse_cohorts(currentSite, currentPatch, bc_in)

Arguments

Type IntentOptional Attributes Name
type(ed_site_type), intent(inout), target :: currentSite
type(ed_patch_type), intent(inout), target :: currentPatch
type(bc_in_type), intent(in) :: bc_in

public subroutine sort_cohorts(patchptr)

Arguments

Type IntentOptional Attributes Name
type(ed_patch_type), intent(inout), target :: patchptr

public subroutine insert_cohort(pcc, ptall, pshort, tnull, snull, storebigcohort, storesmallcohort)

Arguments

Type IntentOptional Attributes Name
type(ed_cohort_type), intent(inout), target :: pcc
type(ed_cohort_type), intent(inout), target :: ptall
type(ed_cohort_type), intent(inout), target :: pshort
integer, intent(in) :: tnull
integer, intent(in) :: snull
type(ed_cohort_type), intent(inout), optional, pointer :: storebigcohort
type(ed_cohort_type), intent(inout), optional, pointer :: storesmallcohort

public subroutine copy_cohort(currentCohort, copyc)

Arguments

Type IntentOptional Attributes Name
type(ed_cohort_type), intent(in), target :: currentCohort
type(ed_cohort_type), intent(inout), target :: copyc

public subroutine count_cohorts(currentPatch)

Arguments

Type IntentOptional Attributes Name
type(ed_patch_type), intent(inout), target :: currentPatch

public subroutine UpdateCohortBioPhysRates(currentCohort)

Arguments

Type IntentOptional Attributes Name
type(ed_cohort_type), intent(inout) :: currentCohort

public subroutine EvaluateAndCorrectDBH(currentCohort, delta_dbh, delta_hite)

Arguments

Type IntentOptional Attributes Name
type(ed_cohort_type), intent(inout) :: currentCohort
real(kind=r8), intent(out) :: delta_dbh
real(kind=r8), intent(out) :: delta_hite