Changeset 10523 for NEMO/trunk/src/OCE/IOM/iom.F90
- Timestamp:
- 2019-01-16T10:36:03+01:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/OCE/IOM/iom.F90
r10522 r10523 1354 1354 iom_getszuld = -1 1355 1355 IF( kiomid > 0 ) THEN 1356 IF( iom_file(kiomid)%iduld .GE. 0 ) THEN 1357 iom_getszuld = iom_file(kiomid)%lenuld 1358 ENDIF 1356 IF( iom_file(kiomid)%iduld > 0 ) iom_getszuld = iom_file(kiomid)%lenuld 1359 1357 ENDIF 1360 1358 END FUNCTION iom_getszuld
Note: See TracChangeset
for help on using the changeset viewer.