Changeset 94 in lmdz_wrf for branches/LMDZ_WRFmeas/WRFV3/lmdz/thermcell_main.F90

Timestamp:

Jul 25, 2014, 2:41:55 PM (10 years ago)

Author:

lfita

Message:

NaNs? from zw2...

File:

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

branches/LMDZ_WRFmeas/WRFV3/lmdz/thermcell_main.F90

@@ -516 +516 @@
       lvarname = 'pdtadj'
       CALL check_var3D(lfname, lvarname, pdtadj, ngrid, nlay, largest, .FALSE.)
+      lvarname = 'zw2'
+      CALL check_var3D(lfname, lvarname, zw2, ngrid, nlay+1, largest, .FALSE.)
 
       if (prt_level.ge.1) print*,'apres thermcell_plume ',lev_out