Ignore:
Timestamp:
2014-05-20T17:17:03+02:00 (7 years ago)
Author:
epico
Message:

bug fixes for the north-fold optimization. see ticket #1195

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90

    r4624 r4645  
    814814                   nsndto = nsndto + 1 
    815815                   isendto(nsndto) = jn 
    816                 ELSEIF ((sxM .le. sxT) .AND. (dxM .gt. dxT)) THEN 
     816                ELSEIF ((sxM .le. sxT) .AND. (dxM .ge. dxT)) THEN 
    817817                   nsndto = nsndto + 1 
    818818                   isendto(nsndto) = jn 
Note: See TracChangeset for help on using the changeset viewer.