diff --git a/srcF/sfx_z0t_all_surface.f90 b/srcF/sfx_z0t_all_surface.f90 index 88d2e0ae66fe93c297150815fc6137824556b027..39a570e3567fd20b8af52870bdc229b697257f07 100644 --- a/srcF/sfx_z0t_all_surface.f90 +++ b/srcF/sfx_z0t_all_surface.f90 @@ -75,7 +75,7 @@ module sfx_z0t_all_surface B = min(B, B_max_ocean) z0_t = z0_m / exp(B) - write(*,*) 'kl_water', z0_t, B + !write(*,*) 'kl_water', z0_t, B end subroutine