fixed logical comparison operator in create_cohort, typo from prev co…

…mmit
NGEET · Mar 5, 2016 · 2c3e52d · 2c3e52d
1 parent a3a9692
commit 2c3e52d
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/biogeochem/EDPhysiologyMod.F90 b/biogeochem/EDPhysiologyMod.F90
@@ -1017,8 +1017,7 @@ subroutine recruitment( t, currentPatch )
           cohortstatus = currentPatch%siteptr%dstatus
        endif
 
-
-       if (temp_cohort%n >= 0.0_r8 )then
+       if (temp_cohort%n > 0.0_r8 )then
            if ( DEBUG ) write(iulog,*) 'EDPhysiologyMod.F90 call create_cohort '
            call create_cohort(currentPatch, temp_cohort%pft, temp_cohort%n, temp_cohort%hite, temp_cohort%dbh, &
                 temp_cohort%balive, temp_cohort%bdead, temp_cohort%bstore,  &