Set canopy layers to 3, max cohorts to 150 main/EDTypes

jkshuman · Jul 23, 2021 · a3b9295 · a3b9295
1 parent e8648ef
commit a3b9295
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/main/EDTypesMod.F90 b/main/EDTypesMod.F90
@@ -26,9 +26,9 @@ module EDTypesMod
   integer, parameter, public :: maxPatchesPerSite  = 14   ! maximum number of patches to live on a site
   integer, parameter, public :: maxPatchesPerSite_by_disttype(n_anthro_disturbance_categories)  = &
                                                      (/ 10, 4 /)  !!! MUST SUM TO maxPatchesPerSite !!!
-  integer,  public :: maxCohortsPerPatch = 100            ! maximum number of cohorts per patch
+  integer,  public :: maxCohortsPerPatch = 150            ! maximum number of cohorts per patch
 
-  integer, parameter, public :: nclmax = 2                ! Maximum number of canopy layers
+  integer, parameter, public :: nclmax = 3                ! Maximum number of canopy layers
   integer, parameter, public :: ican_upper = 1            ! Nominal index for the upper canopy
   integer, parameter, public :: ican_ustory = 2           ! Nominal index for diagnostics that refer
                                                           ! to understory layers (all layers that