From b303859931b775fc049645afa6881a7d835fb555 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?=D0=92=D0=B8=D0=BA=D1=82=D0=BE=D1=80=D0=B8=D1=8F=20=D0=A1?=
 =?UTF-8?q?=D1=83=D1=8F=D0=B7=D0=BE=D0=B2=D0=B0?=
 <viktoriasuazova@MacBook-Pro-Viktoria.local>
Date: Tue, 4 Feb 2025 06:37:21 +0300
Subject: [PATCH] alltype8

---
 srcF/sfx_surface.f90 | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/srcF/sfx_surface.f90 b/srcF/sfx_surface.f90
index 36051e5..e356c31 100644
--- a/srcF/sfx_surface.f90
+++ b/srcF/sfx_surface.f90
@@ -96,20 +96,20 @@ module sfx_surface
     character(len = 16), parameter :: z0t_tag_user = 'zt_user'
     
 
-    integer, public, parameter :: ocean_z0m_id = z0m_ch     !< ocean surface
+    integer, public, parameter :: ocean_z0m_id = z0m_fe     !< ocean surface
     integer, public, parameter :: land_z0m_id = z0m_map_id        !< land surface
     integer, public, parameter :: lake_z0m_id = z0m_fe        !< lake surface
-    integer, public, parameter :: snow_z0m_id = z0m_ow        !< snow covered surface    
+    integer, public, parameter :: snow_z0m_id = z0m_and        !< snow covered surface    
     integer, public, parameter :: forest_z0m_id = z0m_map_id     !< forest csurface  
     integer, public, parameter :: usersf_z0m_id = z0m_ch       !< user surface  
     integer, public, parameter :: ice_z0m_id = z0m_map_id       !< ice surface  
 
 
-    integer, public, parameter :: ocean_z0t_id = z0t_kl_water     !< ocean surface
-    integer, public, parameter :: land_z0t_id = z0t_zi        !< land surface
-    integer, public, parameter :: lake_z0t_id = z0t_cz        !< lake surface
-    integer, public, parameter :: snow_z0t_id = z0t_cz         !< snow covered surface    
-    integer, public, parameter :: forest_z0t_id = z0t_zi      !< forest csurface  
+    integer, public, parameter :: ocean_z0t_id = z0t_ca     !< ocean surface
+    integer, public, parameter :: land_z0t_id = z0t_ot        !< land surface
+    integer, public, parameter :: lake_z0t_id = z0t_ot        !< lake surface
+    integer, public, parameter :: snow_z0t_id = z0t_zi         !< snow covered surface    
+    integer, public, parameter :: forest_z0t_id = z0t_ot      !< forest csurface  
     integer, public, parameter :: usersf_z0t_id = z0t_kl_water      !< user surface  
     integer, public, parameter :: ice_z0t_id = z0t_ca     !< user surface  
     
-- 
GitLab