From d80ef2083419929ced7e1fa151238bd45bd258c8 Mon Sep 17 00:00:00 2001
From: Gregory Lemieux <glemieux@users.noreply.github.com>
Date: Thu, 26 Jan 2023 13:10:01 -0700
Subject: [PATCH] add local variable initialization for get_harvest_debt

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

diff --git a/biogeochem/EDLoggingMortalityMod.F90 b/biogeochem/EDLoggingMortalityMod.F90
index f711f3bcef..73ea7231e7 100644
--- a/biogeochem/EDLoggingMortalityMod.F90
+++ b/biogeochem/EDLoggingMortalityMod.F90
@@ -1147,6 +1147,12 @@ subroutine get_harvest_debt(site_in, bc_in, harvest_tag)
       real(r8) :: harvest_debt_sec_young
 
       if(logging_time) then
+
+         ! Initialize the local variables
+         harvest_debt_pri = 0._r8
+         harvest_debt_sec_mature = 0._r8
+         harvest_debt_sec_young = 0._r8
+ 
          ! First we need to get harvest rate for all three categories
          do h_index = 1, hlm_num_lu_harvest_cats
             ! Primary forest harvest rate