add_lake_20200810: Merge shan's latest changes.

See ufs-community#111.
GeorgeGayno-NOAA · Aug 17, 2020 · e877ec4 · e877ec4
2 parents 95deb2f + 6f4af1b
commit e877ec4
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/sorc/orog_mask_tools.fd/lake.fd/lakefrac.F90 b/sorc/orog_mask_tools.fd/lake.fd/lakefrac.F90
@@ -518,7 +518,7 @@ SUBROUTINE write_lakedata_to_orodata(cs_res, cs_lakestat, cs_lakedpth)
     REAL :: geolon(cs_res*cs_res),geolat(cs_res*cs_res)
     REAL :: land_frac(cs_res*cs_res),slmsk(cs_res*cs_res),inland(cs_res*cs_res)
     real, parameter :: epsil=1.e-6   ! numerical min for lake_frac/land_frac
-    real            :: land_cutoff=1.e-6 ! land_frac=0 if it is < land_cutoff
+    real            :: land_cutoff=1.e-4 ! land_frac=0 if it is < land_cutoff
 
     INTEGER :: i, j