Changeset 76 in lmdz_wrf for branches


Ignore:
Timestamp:
Jul 24, 2014, 4:10:31 PM (10 years ago)
Author:
lfita
Message:

More checks

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/LMDZ_WRFmeas/WRFV3/lmdz/thermcell_dq.F90

    r75 r76  
    147147      lvarname = 'dq'
    148148      CALL check_var3D(lfname, lvarname, dq, ngrid, nlay, largest, .FALSE.)
     149      lfname='after tendencies _dq 000'
     150      lvarname = 'q'
     151      CALL check_var3D(lfname, lvarname, q, ngrid, nlay, largest, .FALSE.)
     152      lvarname = 'dq'
     153      CALL check_var3D(lfname, lvarname, dq, ngrid, nlay, largest, .FALSE.)
     154      lvarname = 'qold'
     155      CALL check_var3D(lfname, lvarname, qold, ngrid, nlay, largest, .FALSE.)
    149156
    150157! Tendencies
Note: See TracChangeset for help on using the changeset viewer.