- Timestamp:
- Dec 16, 2009, 5:01:30 PM (15 years ago)
- Location:
- LMDZ4/branches/LMDZ4-dev/libf/phylmd
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/branches/LMDZ4-dev/libf/phylmd/phys_output_mod.F90
r1279 r1283 881 881 CALL histdef2d(iff,o_cldm%flag,o_cldm%name, "Mid-level cloudiness", "-") 882 882 CALL histdef2d(iff,o_cldh%flag,o_cldh%name, "High-level cloudiness", "-") 883 CALL histdef2d(iff,o_cldt%flag,o_cldt%name, "Total cloudiness", " %")883 CALL histdef2d(iff,o_cldt%flag,o_cldt%name, "Total cloudiness", "-") 884 884 CALL histdef2d(iff,o_cldq%flag,o_cldq%name, "Cloud liquid water path", "kg/m2") 885 885 CALL histdef2d(iff,o_lwp%flag,o_lwp%name, "Cloud water path", "kg/m2") -
LMDZ4/branches/LMDZ4-dev/libf/phylmd/phys_output_write.h
r1279 r1283 456 456 IF (o_cldt%flag(iff)<=lev_files(iff)) THEN 457 457 CALL histwrite_phy(nid_files(iff),o_cldt%name, 458 & itau_w,cldt *100)458 & itau_w,cldt) 459 459 ENDIF 460 460
Note: See TracChangeset
for help on using the changeset viewer.