switch from in to inout for output variables

ufs-community · Jul 31, 2023 · 9891fff · 9891fff
1 parent 1afb8fc
commit 9891fff
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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
 !