Merge pull request ESCOMP#552 from glemieux/glemieux-litter-moisture-…

…nfsc-fix litter_moisture initialization fix
NordicESMhub · Jul 14, 2019 · 726235f · 726235f
2 parents 28052bd + 5740d06
commit 726235f
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/biogeochem/EDPatchDynamicsMod.F90 b/biogeochem/EDPatchDynamicsMod.F90
@@ -1604,6 +1604,7 @@ subroutine zero_patch(cp_p)
     currentPatch%root_litter_out(:) = 0.0_r8 ! As a newly created patch with no age, no frag or decomp has happened yet
 
     ! FIRE
+    currentPatch%litter_moisture(:)         = 0.0_r8 ! litter moisture
     currentPatch%fuel_eff_moist             = 0.0_r8 ! average fuel moisture content of the ground fuel 
     ! (incl. live grasses. omits 1000hr fuels)
     currentPatch%livegrass                  = 0.0_r8 ! total ag grass biomass in patch. 1=c3 grass, 2=c4 grass. gc/m2