Changeset 56 in lmdz_wrf


Ignore:
Timestamp:
Jul 23, 2014, 5:38:16 PM (10 years ago)
Author:
lfita
Message:

Adding 't' dependency on zh_dair_col

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/LMDZ_WRFmeas/WRFV3/lmdz/diagphy_mod.F90

    r55 r56  
    673673            varname = 'zh_dair_col'
    674674            CALL check_var(fname, varname, zh_dair_col, klon, largest*10.e6, .FALSE.)
    675             PRINT *,'      zh_dair_col = func(q,ql,qs,paprs)'
     675            PRINT *,'      zh_dair_col = func(q,ql,qs,paprs,t)'
    676676            varname = 'q'
    677677            CALL check_var3D(fname, varname, q, klon, klev, largest, .FALSE.)
     
    682682            varname = 'paprs'
    683683            CALL check_var3D(fname, varname, paprs, klon, klev, largest*10.e6, .FALSE.)
     684            varname = 't'
     685            CALL check_var3D(fname, varname, t, klon, klev, largest, .FALSE.)
    684686          END IF
    685687          PRINT *,'    h_qw_tot= ',h_qw_tot
Note: See TracChangeset for help on using the changeset viewer.