Changeset 2054 for LMDZ5/trunk/libf/dyn3dmem/parallel_lmdz.F90
- Timestamp:
- Jun 3, 2014, 5:07:16 PM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/dyn3dmem/parallel_lmdz.F90
r1965 r2054 422 422 423 423 if (type_ocean == 'couple') then 424 #ifdef CPP_XIOS 425 !Fermeture propre de XIOS 426 CALL wxios_close() 427 #else 424 428 #ifdef CPP_COUPLE 425 429 call prism_terminate_proto(ierr) … … 428 432 endif 429 433 #endif 434 #endif 430 435 else 431 436 #ifdef CPP_XIOS
Note: See TracChangeset
for help on using the changeset viewer.