CNSetPnf

INTERFACE:

 subroutine CNSetPnf(num, filter, val, pnf)

DESCRIPTION:

Set pft nitrogen flux variables

USES:

     use surfrdMod , only : crop_prog

ARGUMENTS:

     implicit none
     integer , intent(in) :: num
     integer , intent(in) :: filter(:)
     real(r8), intent(in) :: val
     type (pft_nflux_type), intent(inout) :: pnf

REVISION HISTORY:

   Created by Peter Thornton

LOCAL VARIABLES:

   local pointers to implicit in/out arrays
   !OTHER LOCAL VARIABLES:
    integer :: fi,i     ! loop index