Ignore:
Timestamp:
Sep 14, 2022, 2:53:51 PM (20 months ago)
Author:
evignon
Message:

controle des z0 sur landice dans les .def et nettoyage surf_landice_mod
pour Valentin

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/surf_landice_mod.F90

    r3974 r4245  
    156156           PRINT*, 'alb_nir_sno_lic',alb_nir_sno_lic
    157157 
    158 !  z0m=1.e-3
    159 !  z0h = z0m
    160158  firstcall=.false.
    161159  ENDIF
    … …  
    351349!
    352350!****************************************************************************************
    353     z0m=1.e-3
    354     z0h = z0m
    355     z0m = SQRT(z0m**2+rugoro**2)
     351    z0m = z0m_landice
     352    z0h = z0h_landice
     353    !z0m = SQRT(z0m**2+rugoro**2)
    356354
    357355
Note: See TracChangeset for help on using the changeset viewer.