Changeset 2054 for LMDZ5/trunk/libf/dyn3dpar/parallel_lmdz.F90
- Timestamp:
- Jun 3, 2014, 5:07:16 PM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/dyn3dpar/parallel_lmdz.F90
r1965 r2054 255 255 256 256 if (type_ocean == 'couple') then 257 #ifdef CPP_XIOS 258 !Fermeture propre de XIOS 259 CALL wxios_close() 260 #else 257 261 #ifdef CPP_COUPLE 258 262 call prism_terminate_proto(ierr) … … 261 265 endif 262 266 #endif 267 #endif 263 268 else 264 269 #ifdef CPP_XIOS
Note: See TracChangeset
for help on using the changeset viewer.