Changeset 3900 for LMDZ6/trunk/libf/phylmd/inlandsis/VARphy.F90

Timestamp:

May 17, 2021, 3:35:58 PM (3 years ago)

Author:

evignon

Message:

Commission de la nouvelle interface LMDZ-SISVAT
la prochaine commission consistera a supprimer l'ancien repertoire sisvat
et a faire un peu de nettoyage.

File:

• LMDZ6/trunk/libf/phylmd/inlandsis/VARphy.F90 (modified) (2 diffs)

LMDZ6/trunk/libf/phylmd/inlandsis/VARphy.F90

@@ -26 +26 @@
       INTEGER, PARAMETER ::  iun=1                                             
       REAL, PARAMETER    ::  zer0 = 0.0e+0, half = 0.5e+0, un_1 = 1.0e+0,     &
-     &                       eps6 = 1.0e-6, R_1000=1.e3       
+     &                       eps6 = 1.0e-6, R_1000=1.e3   
       REAL, PARAMETER    ::  zero = 0.0e+0, demi = 0.5e+0, unun = 1.0e+0,     &
      &                       epsi = 1.0e-6, eps9 = 1.0e-9         
@@ -91 +91 @@
 ! A1.6 Turbulent and molecular diffusion
 !----------------------------------------
-      REAL, PARAMETER    ::  A_MolV = 1.35e-5, vonKrm = 0.40e0
+      REAL, PARAMETER    ::  A_MolV = 1.35e-5, vonKrm = 0.40e0, r_turb=3.0
+      REAL, PARAMETER    ::  A_turb=5.8, akmol=1.35e-5
 !C +...                A_MolV: Air Viscosity                 = 1.35d-5 m2/s   
 !C +                   vonKrm: von Karman constant           = 0.4            
-                                                                          
+!C +                   r_turb:   Turbulent Diffusivities Ratio K*/Km        
+!C +                   A_turb:    Stability  Coefficient Moment                                 
+!C +                   Air Viscosity                 = 1.35d-5 m2/s                 
+
+
 
 END MODULE VARphy