Ignore:
Timestamp:
2018-07-02T18:19:04+02:00 (3 years ago)
Author:
clem
Message:

solve problem described in ticket #2107

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/trunk/src/ICE/icedyn_adv_umx.F90

    r9604 r9866  
    231231            ztra       = ztrd(ji,jj)  - (  zfu_ho(ji,jj) - zfu_ho(ji-1,jj  )   & 
    232232               &                         + zfv_ho(ji,jj) - zfv_ho(ji  ,jj-1) ) * r1_e1e2t(ji,jj)   
    233             ptc(ji,jj) = ptc(ji,jj) + pdt * ztra 
     233            ptc(ji,jj) = ( ptc(ji,jj) + pdt * ztra ) * tmask(ji,jj,1) 
    234234         END DO 
    235235      END DO 
Note: See TracChangeset for help on using the changeset viewer.