Changeset 2000 for LMDZ5/trunk/libf/phylmd/thermcell.h

Timestamp:

Mar 26, 2014, 7:05:47 PM (11 years ago)

Author:

fhourdin

Message:

Introduction d'un parametre pour controler l'altitude a laquelle on va chercher l'air
pour l'entrainement pour obtenir des stratocumulus
dz = fact_thermals_ed_dz * z (these Arnaud Jam)

File:

• LMDZ5/trunk/libf/phylmd/thermcell.h (modified) (2 diffs)

LMDZ5/trunk/libf/phylmd/thermcell.h

@@ -9 +9 @@
       real,parameter     :: r_aspect_thermals=2.,l_mix_thermals=30.
       real               :: alp_bl_k
-      real               :: tau_thermals
+      real               :: tau_thermals,fact_thermals_ed_dz
       integer,parameter  :: w2di_thermals=0
       integer            :: isplit
@@ -17 +17 @@
 
       common/ctherm1/iflag_thermals,nsplit_thermals,iflag_thermals_closure
-      common/ctherm2/tau_thermals,alp_bl_k
+      common/ctherm2/tau_thermals,alp_bl_k,fact_thermals_ed_dz
       common/ctherm4/iflag_coupl,iflag_clos,iflag_wake
       common/ctherm5/iflag_thermals_ed,iflag_thermals_optflux