Commit 66a361574c1a58662c73c5d2bd97b26560e6db12

Authored by dumoda01
1 parent 1146a145
Exists in master and in 1 other branch snow

Ajustement de la diffusivite de fondbase sur les resultat de Bourgault et al

Showing 1 changed file with 2 additions and 1 deletions   Show diff stats
src/turbulence/kpp.F90
... ... @@ -254,7 +254,8 @@
254 254 REALTYPE, parameter :: nuwm = 1.0E-5
255 255  
256 256 ! interior diffusivity (m2/s) due to wave breaking (nuwm=1.0E-6)
257   - REALTYPE, parameter :: nuws = 1.0E-6
  257 +!DD REALTYPE, parameter :: nuws = 1.0E-6
  258 + REALTYPE, parameter :: nuws = 3.0E-6
258 259  
259 260 ! double diffusion constant for salinity in diffusive
260 261 ! convection case (sdd1=0.15)
... ...