Changeset 12283 for NEMO/trunk/src/OCE/IOM/iom.F90
- Timestamp:
- 2019-12-23T11:40:48+01:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/OCE/IOM/iom.F90
r12276 r12283 813 813 CHARACTER(LEN=100) :: clinfo ! info character 814 814 !--------------------------------------------------------------------- 815 ! 816 IF( iom_open_init == 0 ) RETURN ! avoid to use iom_file(jf)%nfid that us not yet initialized 815 817 ! 816 818 clinfo = ' iom_close ~~~ '
Note: See TracChangeset
for help on using the changeset viewer.