Changeset 1825 for LMDZ5/trunk/libf/dyn3dpar/gcm.F
- Timestamp:
- Aug 2, 2013, 4:36:53 PM (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/dyn3dpar/gcm.F
r1823 r1825 8 8 #ifdef CPP_IOIPSL 9 9 USE IOIPSL 10 #endif 11 12 13 #ifdef CPP_XIOS 14 ! ug Pour les sorties XIOS 15 USE wxios 10 16 #endif 11 17 … … 212 218 call InitComgeomphy 213 219 c$OMP END PARALLEL 220 #endif 221 222 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! 223 ! Initialisation de XIOS 224 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! 225 226 #ifdef CPP_XIOS 227 CALL wxios_init("LMDZ") 214 228 #endif 215 229
Note: See TracChangeset
for help on using the changeset viewer.