Changeset 106 in lmdz_wrf


Ignore:
Timestamp:
Jul 25, 2014, 4:32:58 PM (10 years ago)
Author:
lfita
Message:

Fixing wrong check_var call

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r105 r106  
    269269!      CALL check_var(lfname, lvarname, 1./rhobarz(:,l), ngrid, klev+1, largest, .FALSE.)
    270270      lvarname = 'entr'
    271       CALL check_var(lfname, lvarname, entr(:,l), ngrid, klev, largest, .FALSE.)
     271      CALL check_var(lfname, lvarname, entr(:,l), ngrid, largest, .FALSE.)
    272272      lvarname = 'detr'
    273       CALL check_var(lfname, lvarname, detr(:,l), ngrid, klev, largest, .FALSE.)
     273      CALL check_var(lfname, lvarname, detr(:,l), ngrid, largest, .FALSE.)
    274274
    275275      if (prt_level.ge.10) &
Note: See TracChangeset for help on using the changeset viewer.