Changeset 1458 for LMDZ5/trunk/libf/phylmd/phyredem.F
- Timestamp:
- Nov 22, 2010, 4:32:14 PM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/phylmd/phyredem.F
r1454 r1458 289 289 WRITE(str2,'(i2.2)') nsrf 290 290 CALL put_field("TKE"//str2,"Energ. Cineti. Turb."//str2, 291 . pbl_tke(:,1:klev ,nsrf))291 . pbl_tke(:,1:klev+1,nsrf)) 292 292 ELSE 293 293 PRINT*, "Trop de sous-mailles"
Note: See TracChangeset
for help on using the changeset viewer.