From 7912a1954983010f1f2ee5ce552139b8dda0b669 Mon Sep 17 00:00:00 2001
From: "samuel.trahan" <Samuel.Trahan@noaa.gov>
Date: Thu, 21 Sep 2023 22:24:02 +0000
Subject: [PATCH] Initialize err variables in set_soilveg.f

---
 physics/set_soilveg.f | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/physics/set_soilveg.f b/physics/set_soilveg.f
index 37f2c2a73..35f4ace37 100644
--- a/physics/set_soilveg.f
+++ b/physics/set_soilveg.f
@@ -44,6 +44,9 @@ subroutine set_soilveg(me,isot,ivet,nlunit,errmsg,errflg)
      &  DEFINED_SLOPE, FXEXP_DATA, NROOT_DATA, REFKDT_DATA, Z0_DATA,
      &  CZIL_DATA, LAI_DATA, CSOIL_DATA
 
+      errmsg = ''
+      errflg = 0
+
 cmy end locals
       if(ivet.eq.2) then