Changeset 2038 for LMDZ5/trunk/libf/dyn3d/gcm.F
- Timestamp:
- May 7, 2014, 11:05:48 AM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/dyn3d/gcm.F
r2021 r2038 462 462 463 463 464 day_end = day_ini + nday 464 if (nday>=0) then 465 day_end = day_ini + nday 466 else 467 day_end = day_ini - nday/day_step 468 endif 465 469 WRITE(lunout,300)day_ini,day_end 466 470 300 FORMAT('1'/,15x,'run du jour',i7,2x,'au jour',i7//)
Note: See TracChangeset
for help on using the changeset viewer.