Changeset 5160 for LMDZ6/branches/Amaury_dev/libf/phylmd/ecrad/radiation/radiation_monochromatic.F90
- Timestamp:
- Aug 3, 2024, 2:56:58 PM (3 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/Amaury_dev/libf/phylmd/ecrad/radiation/radiation_monochromatic.F90
r5159 r5160 293 293 & ', longwave optical depth = ', & 294 294 & sum(od_lw_cloud(1,:,jcol)*cloud%fraction(jcol,:)) 295 ! print*, 'LWP = ', sum(lwp_kg_m2(:,istartcol)*cloud%fraction(istartcol,:))295 ! PRINT *, 'LWP = ', sum(lwp_kg_m2(:,istartcol)*cloud%fraction(istartcol,:)) 296 296 end do 297 297 end if
Note: See TracChangeset
for help on using the changeset viewer.