Changeset 12132 for NEMO/trunk/src/OCE/IOM/iom.F90
- Timestamp:
- 2019-12-10T11:38:28+01:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/OCE/IOM/iom.F90
r11993 r12132 806 806 CHARACTER(LEN=100) :: clinfo ! info character 807 807 !--------------------------------------------------------------------- 808 ! 809 IF( iom_open_init == 0 ) RETURN ! avoid to use iom_file(jf)%nfid that us not yet initialized 808 810 ! 809 811 clinfo = ' iom_close ~~~ '
Note: See TracChangeset
for help on using the changeset viewer.