INTERFACE:
subroutine CNSetPns(num, filter, val, pns)DESCRIPTION:
Set pft nitrogen state variables
USES:
use surfrdMod , only : crop_progARGUMENTS:
implicit none integer , intent(in) :: num integer , intent(in) :: filter(:) real(r8), intent(in) :: val type (pft_nstate_type), intent(inout) :: pnsREVISION HISTORY:
Created by Peter ThorntonLOCAL VARIABLES:
local pointers to implicit in/out arrays !OTHER LOCAL VARIABLES: integer :: fi,i ! loop index