Changeset 1220 for LMDZ4/branches/LMDZ4-dev/libf/dyn3d/create_etat0_limit.F
- Timestamp:
- Aug 5, 2009, 4:38:34 PM (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/branches/LMDZ4-dev/libf/dyn3d/create_etat0_limit.F
r1114 r1220 6 6 USE comgeomphy 7 7 USE infotrac 8 #ifdef CPP_IOIPSL 9 use ioipsl, only: ioconf_calendar 10 #endif 11 IMPLICIT NONE 8 12 c 9 13 c … … 44 48 call InitComgeomphy 45 49 50 #ifdef CPP_IOIPSL 51 call ioconf_calendar('360d') 52 #endif 53 46 54 WRITE(6,*) ' ********************* ' 47 55 WRITE(6,*) ' interbar = ',interbar
Note: See TracChangeset
for help on using the changeset viewer.