Changeset 3868


Ignore:
Timestamp:
Mar 23, 2021, 9:21:51 PM (3 years ago)
Author:
evignon
Message:

modification des z0 land et landice dans etat0phys_netcdf.F90 pour
eviter des valeurs de flux aberrantes au premier pas de temps

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/dynphy_lonlat/phylmd/etat0phys_netcdf.F90

    r3773 r3868  
    240240 
    241241  z0m(:,is_oce) = rugmer(:)
    242   z0m(:,is_ter) = MAX(1.0e-05,zstd(:)*zsig(:)/2.0)
    243   z0m(:,is_lic) = MAX(1.0e-05,zstd(:)*zsig(:)/2.0)
     242  z0m(:,is_ter) = 0.01 !MAX(1.0e-05,zstd(:)*zsig(:)/2.0)
     243  z0m(:,is_lic) = 0.001 !MAX(1.0e-05,zstd(:)*zsig(:)/2.0)
    244244  z0m(:,is_sic) = 0.001
    245245  z0h(:,:)=z0m(:,:)
Note: See TracChangeset for help on using the changeset viewer.