ComputeSeedAmounts Subroutine

public subroutine ComputeSeedAmounts(bounds, num_soilp_with_inactive, filter_soilp_with_inactive, species, leafc_seed, deadstemc_seed, leaf_patch, leaf_storage_patch, leaf_xfer_patch, compute_here_patch, ignore_current_state_patch, seed_leaf_patch, seed_leaf_storage_patch, seed_leaf_xfer_patch, seed_deadstem_patch)

Arguments

Type	Intent	Optional	Attributes		Name
type(bounds_type),	intent(in)			::	bounds
integer,	intent(in)			::	num_soilp_with_inactive
integer,	intent(in)			::	filter_soilp_with_inactive(:)
integer,	intent(in)			::	species
real(kind=r8),	intent(in)			::	leafc_seed
real(kind=r8),	intent(in)			::	deadstemc_seed
real(kind=r8),	intent(in)			::	leaf_patch(bounds%begp:)
real(kind=r8),	intent(in)			::	leaf_storage_patch(bounds%begp:)
real(kind=r8),	intent(in)			::	leaf_xfer_patch(bounds%begp:)
logical,	intent(in)			::	compute_here_patch(bounds%begp:)
logical,	intent(in)			::	ignore_current_state_patch(bounds%begp:)
real(kind=r8),	intent(inout)			::	seed_leaf_patch(bounds%begp:)
real(kind=r8),	intent(inout)			::	seed_leaf_storage_patch(bounds%begp:)
real(kind=r8),	intent(inout)			::	seed_leaf_xfer_patch(bounds%begp:)
real(kind=r8),	intent(inout)			::	seed_deadstem_patch(bounds%begp:)