Changeset 112 in lmdz_wrf for branches/LMDZ_WRFmeas/WRFV3/lmdz/thermcell_plume.F90
- Timestamp:
- Jul 25, 2014, 5:58:31 PM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/LMDZ_WRFmeas/WRFV3/lmdz/thermcell_plume.F90
r111 r112 222 222 lvarname = 'pphi' 223 223 CALL check_var3D(lfname, lvarname, pphi, ngrid, klev, largest, .FALSE.) 224 lvarname = 'alim_star' 225 CALL check_var3D(lfname, lvarname, alim_star, ngrid, klev, largest, .FALSE.) 226 lvarname = 'entr_star' 227 CALL check_var3D(lfname, lvarname, entr_star, ngrid, klev, largest, .FALSE.) 224 228 225 229 … … 352 356 endif 353 357 enddo 358 lfname='thermcell_plume calcul alim_star' 359 lvarname = 'alim_star' 360 CALL check_var3D(lfname, lvarname, alim_star, ngrid, klev, largest, .FALSE.) 361 lvarname = 'entr_star' 362 CALL check_var3D(lfname, lvarname, entr_star, ngrid, klev, largest, .FALSE.) 354 363 355 364 !---------------------------------------------------------------------------- … … 468 477 lvarname = 'pphi' 469 478 CALL check_var3D(lfname, lvarname, pphi, ngrid, klev, largest, .FALSE.) 479 lvarname = 'alim_star' 480 CALL check_var3D(lfname, lvarname, alim_star, ngrid, klev, largest, .FALSE.) 470 481 471 482
Note: See TracChangeset
for help on using the changeset viewer.