Changeset 1192 for LMDZ4/branches/LMDZ4-dev/libf/phylmd/phytrac.F90
- Timestamp:
- Jun 24, 2009, 7:09:28 PM (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/branches/LMDZ4-dev/libf/phylmd/phytrac.F90
r1191 r1192 220 220 ! Initialize diagnostic output 221 221 ! ---------------------------- 222 #ifdef CPP_IOIPSL 222 223 INCLUDE "ini_histrac.h" 223 224 #endif 224 225 END IF 225 226 !############################################ END INITIALIZATION ####### … … 405 406 ! Ecriture des sorties 406 407 !============================================================= 408 #ifdef CPP_IOIPSL 407 409 INCLUDE "write_histrac.h" 408 410 #endif 409 411 410 412 END SUBROUTINE phytrac
Note: See TracChangeset
for help on using the changeset viewer.