Changeset 263 for trunk/LMDZ.MARS/libf/phymars/meso_inc

Timestamp:

Aug 5, 2011, 11:56:23 AM (13 years ago)

Author:

aslmd

Message:

MESOSCALE: Something was broken for MESOSCALE model in r259-r260 (flag_LES is not known in vdifc). Moved this to meso_inc/meso_inc_les.F. Also there was a problem with the new surface layer if calltherm is false because then wmax has no value... Fixed.

File:

• trunk/LMDZ.MARS/libf/phymars/meso_inc/meso_inc_les.F (modified) (1 diff)

trunk/LMDZ.MARS/libf/phymars/meso_inc/meso_inc_les.F

@@ -28 +28 @@
 
          DO ig=1,ngrid
+          wmax_th(ig)=0.  !! no additional gustiness needed in surface layer (see vdifc.F)
           DO l=1,nlayer
             zdvdif(ig,l) = 0.