Changeset 1518 for LMDZ5/trunk/libf/phylmd/physiq.F

Timestamp:

May 12, 2011, 3:32:22 PM (13 years ago)

Author:

idelkadi

Message:

Modifications des routines de convection :

• correction de bug : le champ sigd n'etait pas decompresse avant d'etre sorti de la convection.
• sortir de nouveaux champs de convection (plcl, plfc, wb)

File:

• LMDZ5/trunk/libf/phylmd/physiq.F (modified) (3 diffs)

LMDZ5/trunk/libf/phylmd/physiq.F

@@ -871 +871 @@
       REAL dnwd0(klon,klev)     ! unsaturated downdraft mass flux
       REAL tvp(klon,klev)       ! virtual temp of lifted parcel
+      REAL plcl(klon)           ! Lifting Condensation Level
+      REAL plfc(klon)           ! Level of Free Convection
+      REAL wbeff(klon)          ! saturated updraft velocity at LFC
       CHARACTER*40 capemaxcels  !max(CAPE)
 
@@ -879 +882 @@
       INTEGER ntra              ! nb traceurs pour convect4.3
       REAL pori_con(klon)    ! pressure at the origin level of lifted parcel
-      REAL plcl_con(klon),dtma_con(klon),dtlcl_con(klon)
+      REAL dtma_con(klon),dtlcl_con(klon)
       REAL dtvpdt1(klon,klev), dtvpdq1(klon,klev)
       REAL dplcldt(klon), dplcldr(klon)
@@ -2186 +2189 @@
      .        d_t_con,d_q_con,d_u_con,d_v_con,d_tr,
      .        rain_con, snow_con, ibas_con, itop_con, sigd,
-     .        ema_cbmf,upwd,dnwd,dnwd0,
+     .        ema_cbmf,plcl,plfc,wbeff,upwd,dnwd,dnwd0,
      .        Ma,mip,Vprecip,cape,cin,tvp,Tconv,iflagctrl,
      .        pbase,bbase,dtvpdt1,dtvpdq1,dplcldt,dplcldr,qcondc,wd,