Changeset 5196 for LMDZ6/trunk/libf

Timestamp:

Sep 17, 2024, 1:37:34 PM (2 months ago)

Author:

evignon

Message:

suppression d'un petit print dans la parametrisation de rugosite sur landice de Valentin

File:

• LMDZ6/trunk/libf/phylmd/surf_landice_mod.F90 (modified) (1 diff)

LMDZ6/trunk/libf/phylmd/surf_landice_mod.F90

@@ -466 +466 @@
     do j=1,knon 
       i=knindex(j)
-      print*, "tempsmoothlic", tempsmoothlic(i)
       tempsmoothlic(i)=temp_air(j)*coef_tempsmooth+tempsmoothlic(i)*(1.-coef_tempsmooth)
       if (tempsmoothlic(i) .lt. ta1) then