diff --git a/main/EDTypesMod.F90 b/main/EDTypesMod.F90 index d9a2083482..4aa90757a0 100644 --- a/main/EDTypesMod.F90 +++ b/main/EDTypesMod.F90 @@ -16,7 +16,7 @@ module EDTypesMod integer, parameter :: ican_upper = 1 ! Nominal index for the upper canopy integer, parameter :: ican_ustory = 2 ! Nominal index for understory in two-canopy system - integer, parameter :: nlevleaf = 40 ! number of leaf layers in canopy layer + integer, parameter :: nlevleaf = 80 ! number of leaf layers in canopy layer integer, parameter :: maxpft = 15 ! maximum number of PFTs allowed ! the parameter file may determine that fewer ! are used, but this helps allocate scratch