Changeset 96 in lmdz_wrf


Ignore:
Timestamp:
Jul 25, 2014, 2:52:35 PM (10 years ago)
Author:
lfita
Message:

Wrong check_var!!! on Ale_bl

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r92 r96  
    372372      CALL check_var(lfname, lvarname, Alp_bl, klon, largest, .FALSE.)
    373373      lvarname = 'Alp'
    374       CALL check_var3D(lfname, lvarname, Alp, klon, largest*10.e5, .FALSE.)
     374      CALL check_var(lfname, lvarname, Alp, klon, largest*10.e5, .FALSE.)
    375375      lvarname = 'Ale_bl'
    376376      CALL check_var(lfname, lvarname, Ale_bl, klon, largest, .FALSE.)
    377377      lvarname = 'Ale'
    378       CALL check_var3D(lfname, lvarname, Ale, klon, largest*10.e5, .FALSE.)
     378      CALL check_var(lfname, lvarname, Ale, klon, largest*10.e5, .FALSE.)
    379379
    380380       DO i=1,klon
Note: See TracChangeset for help on using the changeset viewer.