From 9891fff7bd9eb8660a60ff203112298bf1349406 Mon Sep 17 00:00:00 2001
From: uturuncoglu <turuncu@ucar.edu>
Date: Mon, 31 Jul 2023 10:50:36 -0600
Subject: [PATCH] switch from in to inout for output variables

---
 physics/sfc_land.f | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/physics/sfc_land.f b/physics/sfc_land.f
index aec47ff77..d4e88c25a 100644
--- a/physics/sfc_land.f
+++ b/physics/sfc_land.f
@@ -112,7 +112,7 @@ subroutine sfc_land_run                                           &
      &       cmm_lnd, chh_lnd, zvfun_lnd
 
 !  ---  outputs:
-      real (kind=kind_phys), dimension(:), intent(out) ::               &
+      real (kind=kind_phys), dimension(:), intent(inout) ::             &
      &       sncovr1, qsurf, evap, hflx, ep, t2mmp, q2mp, gflux,        &
      &       runoff, drain, cmm, chh, zvfun
 !