From 58ffc10c3bbfc7f741082952c361ebbe3037e8cb Mon Sep 17 00:00:00 2001
From: Sean Bryan <sean.bryan@anu.edu.au>
Date: Mon, 11 Nov 2024 16:42:45 +1100
Subject: [PATCH] Initialise ssnow%rtevap_* variables in mpiworker

---
 src/offline/cable_mpiworker.F90 | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/offline/cable_mpiworker.F90 b/src/offline/cable_mpiworker.F90
index 881f579d1..9c16a683c 100644
--- a/src/offline/cable_mpiworker.F90
+++ b/src/offline/cable_mpiworker.F90
@@ -470,6 +470,8 @@ SUBROUTINE mpidrv_worker (comm)
 
              ssnow%otss_0   = ssnow%tgg(:,1)
              ssnow%otss     = ssnow%tgg(:,1)
+             ssnow%rtevap_sat(:) = 0.0
+             ssnow%rtevap_unsat(:) = 0.0
              canopy%fes_cor = 0.
              canopy%fhs_cor = 0.
              met%ofsd = 0.1