diff --git a/biogeochem/FatesLitterMod.F90 b/biogeochem/FatesLitterMod.F90
index e16cce69db..7d55dc9aab 100644
--- a/biogeochem/FatesLitterMod.F90
+++ b/biogeochem/FatesLitterMod.F90
@@ -447,7 +447,7 @@ subroutine adjust_SF_CWD_frac(dbh,ncwd,SF_val_CWD_frac,SF_val_CWD_frac_adj)
 
      !ARGUMENTS
      real(r8), intent(in)               :: dbh !dbh of cohort [cm]
-     type(integer), intent(in)          :: ncwd !number of cwd pools
+     integer,  intent(in)               :: ncwd !number of cwd pools
      real(r8), intent(in)               :: SF_val_CWD_frac(:) !fates parameter specifying the
                                                               !fraction of struct + sapw going
                                                               !to each CWD class