New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 14436 – NEMO

Changeset 14436


Ignore:
Timestamp:
2021-02-11T12:48:59+01:00 (3 years ago)
Author:
smasson
Message:

trunk: minor bugfix in fldread, #2623

File:
1 edited

Legend:

Unmodified
Added
Removed

  • NEMO/trunk/src/OCE/SBC/fldread.F90

    r13546 r14436  
    912912      !!---------------------------------------------------------------------- 
    913913      ! 
    914       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  
     914      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  
    916916 
    917917      llstop = sdjf%ln_clim .OR. .NOT. ( llprev .OR. llnext ) 
Note: See TracChangeset for help on using the changeset viewer.