Changeset 96 in lmdz_wrf for branches/LMDZ_WRFmeas/WRFV3
- Timestamp:
- Jul 25, 2014, 2:52:35 PM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/LMDZ_WRFmeas/WRFV3/lmdz/calltherm.F90
r92 r96 372 372 CALL check_var(lfname, lvarname, Alp_bl, klon, largest, .FALSE.) 373 373 lvarname = 'Alp' 374 CALL check_var 3D(lfname, lvarname, Alp, klon, largest*10.e5, .FALSE.)374 CALL check_var(lfname, lvarname, Alp, klon, largest*10.e5, .FALSE.) 375 375 lvarname = 'Ale_bl' 376 376 CALL check_var(lfname, lvarname, Ale_bl, klon, largest, .FALSE.) 377 377 lvarname = 'Ale' 378 CALL check_var 3D(lfname, lvarname, Ale, klon, largest*10.e5, .FALSE.)378 CALL check_var(lfname, lvarname, Ale, klon, largest*10.e5, .FALSE.) 379 379 380 380 DO i=1,klon
Note: See TracChangeset
for help on using the changeset viewer.