Merge branch 'dtc/develop' of https://github.com/panll/ccpp-physics i…

…nto HEAD
NCAR · Aug 5, 2020 · 79c0a74 · 79c0a74
2 parents 7b6a9cf + eba02e9
commit 79c0a74
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 0 deletions.
diff --git a/physics/drag_suite.F90 b/physics/drag_suite.F90
@@ -473,6 +473,7 @@ subroutine drag_suite_run(                                           &
    ! Initialize CCPP error handling variables
    errmsg = ''
    errflg = 0
+   var_temp2 = 0.
 
 
 !--------------------------------------------------------------------

diff --git a/physics/module_sf_noahmp_glacier.f90 b/physics/module_sf_noahmp_glacier.f90
@@ -1111,6 +1111,8 @@ subroutine glacier_flux (nsoil   ,nsnow   ,emg     ,isnow   ,df      ,dzsnso  ,z
         dtg    = 0.
         mozsgn = 0
         mozold = 0.
+        moz    = 0.
+
         h      = 0.
         fv     = 0.1