Changeset 14436
- Timestamp:
- 2021-02-11T12:48:59+01:00 (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/OCE/SBC/fldread.F90
r13546 r14436 912 912 !!---------------------------------------------------------------------- 913 913 ! 914 llprev = sdjf%nrecsec(sdjf%nreclast) < nsec000_1jan000 ! file ends before the beginning of the job -> file may not exist915 llnext = sdjf%nrecsec( 0 ) > nsecend_1jan000 ! file begins after the end of the job -> file may not exist914 llprev = sdjf%nrecsec(sdjf%nreclast) < nsec000_1jan000 ! file ends before the beginning of the job -> file may not exist 915 llnext = sdjf%nrecsec( 0 ) >= nsecend_1jan000 ! file begins after the end of the job -> file may not exist 916 916 917 917 llstop = sdjf%ln_clim .OR. .NOT. ( llprev .OR. llnext )
Note: See TracChangeset
for help on using the changeset viewer.