Changeset 69 in lmdz_wrf for branches/LMDZ_WRFmeas/WRFV3/lmdz/physiq.F90

Timestamp:

Jul 24, 2014, 1:00:11 PM (10 years ago)

Author:

lfita

Message:

Adding just after thermals

File:

• branches/LMDZ_WRFmeas/WRFV3/lmdz/physiq.F90 (modified) (1 diff)

branches/LMDZ_WRFmeas/WRFV3/lmdz/physiq.F90

@@ -2828 +2828 @@
        &      ,zqla,ztva )
 
+      lfname='just after thermals'
+      lvarname = 't_seri'
+      CALL check_var3D(lfname, lvarname, t_seri, klon, klev, largest, .FALSE.)
+      lvarname = 'q_seri'
+      CALL check_var3D(lfname, lvarname, q_seri, klon, klev, largest, .FALSE.)
+      lvarname = 'd_t_ajsb'
+      CALL check_var3D(lfname, lvarname, d_t_ajsb, klon, klev, largest, .FALSE.)
+      lvarname = 'd_q_ajsb'
+      CALL check_var3D(lfname, lvarname, d_q_ajsb, klon, klev, largest, .FALSE.)
+
 !ccc nrlmd le 10/04/2012
 !c-----------Stochastic triggering-----------