Changeset 4145 for trunk/NEMOGCM/NEMO/OPA_SRC/C1D/step_c1d.F90
- Timestamp:
- 2013-11-01T18:47:40+01:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMOGCM/NEMO/OPA_SRC/C1D/step_c1d.F90
r3971 r4145 147 147 IF( lrst_oce ) CALL rst_write ( kstp ) ! write output ocean restart file 148 148 ! 149 #if defined key_iomput 150 IF( kstp == nitend .OR. indic < 0 ) CALL xios_context_finalize() ! needed for XIOS 151 ! 152 #endif 149 153 END SUBROUTINE stp_c1d 150 154
Note: See TracChangeset
for help on using the changeset viewer.