C13StateUpdate0

INTERFACE:

 subroutine C13StateUpdate0(num_soilp, filter_soilp)

DESCRIPTION:

On the radiation time step, update cpool carbon state

USES:

    use clmtype
    use clm_time_manager, only: get_step_size

ARGUMENTS:

    implicit none
    integer, intent(in) :: num_soilp       ! number of soil pfts in filter
    integer, intent(in) :: filter_soilp(:) ! filter for soil pfts

CALLED FROM:

   subroutine CNEcosystemDyn

REVISION HISTORY:

   7/1/05: Created by Peter Thornton

LOCAL VARIABLES:

   local pointers to implicit in arrays
    real(r8), pointer :: psnshade_to_cpool(:)
    real(r8), pointer :: psnsun_to_cpool(:)
   local pointers to implicit in/out arrays
    real(r8), pointer :: cpool(:)              ! (gC/m2) temporary photosynthate C pool
   !OTHER LOCAL VARIABLES:
    integer :: p     ! indices
    integer :: fp   ! lake filter indices
    real(r8):: dt      ! radiation time step (seconds)