- Timestamp:
- May 25, 2016, 2:15:42 PM (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/phylmd/readaerosol_interp.F90
r2344 r2523 313 313 ! the second half of the month 314 314 im2=im+1 315 day 2= month_mid(im+1)316 day 1= month_mid(im2+1)315 day1 = month_mid(im+1) 316 day2 = month_mid(im2+1) 317 317 IF (im2 > 12) THEN 318 318 ! the month is december, the following thus january … … 330 330 ! the second half of the month 331 331 im2=im+1 332 day 2= month_mid(im)333 day 1= month_mid(im2)332 day1 = month_mid(im) 333 day2 = month_mid(im2) 334 334 END IF 335 335 ELSE
Note: See TracChangeset
for help on using the changeset viewer.