From 14bceb85c52e6e7d0d909e56d83897ce1532abfb Mon Sep 17 00:00:00 2001 From: Charlie Koven Date: Thu, 10 Jan 2019 17:56:19 -0800 Subject: [PATCH] Update biogeochem/EDCanopyStructureMod.F90 Co-Authored-By: rgknox --- biogeochem/EDCanopyStructureMod.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/biogeochem/EDCanopyStructureMod.F90 b/biogeochem/EDCanopyStructureMod.F90 index 985f5244a8..9aefc379f7 100644 --- a/biogeochem/EDCanopyStructureMod.F90 +++ b/biogeochem/EDCanopyStructureMod.F90 @@ -394,7 +394,7 @@ subroutine DemoteFromLayer(currentSite,currentPatch,i_lyr) ! ----------------------------------------------------------- ! Rank ordered deterministic method ! ----------------------------------------------------------- - ! If there cohorts that have the exact same height (which is possible, really) + ! If there are cohorts that have the exact same height (which is possible, really) ! we don't want to unilaterally promote/demote one before the others. ! So we <>mote them as a unit ! now we need to go through and figure out how many equal-size cohorts there are.