OW for ICE/SNOW, mix for LAND/FOREST/ICE/SNOW V2

srcF/sfx_surface.f90

@@ -106,12 +106,12 @@ module sfx_surface
 
 
     integer, public, parameter :: ocean_z0t_id = z0t_kl_water     !< ocean surface
-    integer, public, parameter :: land_z0t_id = z0t_kl_land        !< land surface
-    integer, public, parameter :: lake_z0t_id = z0t_kl_land        !< lake surface
-    integer, public, parameter :: snow_z0t_id = z0t_kl_land         !< snow covered surface    
-    integer, public, parameter :: forest_z0t_id = z0t_kl_land      !< forest csurface  
-    integer, public, parameter :: usersf_z0t_id = z0t_kl_land      !< user surface  
-    integer, public, parameter :: ice_z0t_id = z0t_kl_land     !< user surface  
+    integer, public, parameter :: land_z0t_id = z0t_mix        !< land surface
+    integer, public, parameter :: lake_z0t_id = z0t_kl_water        !< lake surface
+    integer, public, parameter :: snow_z0t_id = z0t_mix         !< snow covered surface    
+    integer, public, parameter :: forest_z0t_id = z0t_mix      !< forest csurface  
+    integer, public, parameter :: usersf_z0t_id = z0t_kl_water      !< user surface  
+    integer, public, parameter :: ice_z0t_id = z0t_mix     !< user surface  
     
     ! --------------------------------------------------------------------------------
     real, parameter, private :: kappa = 0.40         !< von Karman constant [n/d]