Changeset 2481 for LMDZ5/trunk/libf/phylmd/physiq_mod.F90

Timestamp:

Mar 29, 2016, 3:39:55 PM (8 years ago)

Author:

fhourdin

Message:

Introduction d'une dependance epmax=f(Cape) sur proposition de Camille Risi

File:

• LMDZ5/trunk/libf/phylmd/physiq_mod.F90 (modified) (2 diffs)

LMDZ5/trunk/libf/phylmd/physiq_mod.F90

@@ -266 +266 @@
     real phi2(klon,klev,klev)
     real d1a(klon,klev),dam(klon,klev)
-    real ev(klon,klev),ep(klon,klev)
+    real ev(klon,klev)
     real clw(klon,klev),elij(klon,klev,klev)
     real epmlmMm(klon,klev,klev),eplaMm(klon,klev)
@@ -2480 +2480 @@
                ev, ep,epmlmMm,eplaMm, &
                wdtrainA,wdtrainM,wght_cvfd,qtc_cv,sigt_cv, &
-               tau_cld_cv,coefw_cld_cv)
+               tau_cld_cv,coefw_cld_cv,epmax_diag)
           ! RomP <<<