Changeset 5160 for LMDZ6/branches/Amaury_dev/libf/phylmdiso/reevap.F90
- Timestamp:
- Aug 3, 2024, 2:56:58 PM (3 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/Amaury_dev/libf/phylmdiso/reevap.F90
r5153 r5160 41 41 ivapcur= iqWIsoPha(ixt,ivap) 42 42 isolcur= iqWIsoPha(ixt,isol) 43 ! print*,'rrevap ; fl_cor_ebil:',fl_cor_ebil,' iflag_ice_thermo:',iflag_ice_thermo,' RVTMP2',RVTMP243 !PRINT *,'rrevap ; fl_cor_ebil:',fl_cor_ebil,' iflag_ice_thermo:',iflag_ice_thermo,' RVTMP2',RVTMP2 44 44 DO k = 1, klev ! re-evaporation de l'eau liquide nuageuse 45 45 DO i = 1, klon
Note: See TracChangeset
for help on using the changeset viewer.