From bb3d58e0878964490ddc998bfd5593c53dab8b97 Mon Sep 17 00:00:00 2001
From: Gregory Lemieux <glemieux@users.noreply.github.com>
Date: Fri, 28 Jun 2024 12:39:38 -0600
Subject: [PATCH] initialize current tag for event code logging

---
 biogeochem/EDLoggingMortalityMod.F90 | 1 +
 1 file changed, 1 insertion(+)

diff --git a/biogeochem/EDLoggingMortalityMod.F90 b/biogeochem/EDLoggingMortalityMod.F90
index 6d373e995a..addb821f9a 100644
--- a/biogeochem/EDLoggingMortalityMod.F90
+++ b/biogeochem/EDLoggingMortalityMod.F90
@@ -287,6 +287,7 @@ subroutine LoggingMortality_frac( currentSite, bc_in, pft_i, dbh, canopy_layer,
                ! 0=use fates logging parameters directly when logging_time == .true.
                ! this means harvest the whole cohort area
                harvest_rate = 1._r8
+               cur_harvest_tag = 0
 
             else if (hlm_use_lu_harvest == itrue .and. hlm_harvest_units == hlm_harvest_area_fraction) then
                ! We are harvesting based on areal fraction, not carbon/biomass terms.