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 10491 for NEMO/trunk/tests/ISOMIP/MY_SRC/usrdef_zgr.F90 – NEMO

Ignore:
Timestamp:
2019-01-09T20:53:37+01:00 (5 years ago)
Author:
mathiot
Message:

Minor changes in isf load computation to fit change in DOMAINcfg

File:
1 edited

Legend:

Unmodified
Added
Removed

  • NEMO/trunk/tests/ISOMIP/MY_SRC/usrdef_zgr.F90

    r10425 r10491  
    150150                  ! e3t into the ice shelf 
    151151                  pe3t (ji,jj,ik-1) = pdepw(ji,jj,ik  ) - pdepw(ji,jj,ik-1) 
     152                  pe3w (ji,jj,ik-1) = pdept(ji,jj,ik-1) - pdept(ji,jj,ik-2) 
    152153               END IF 
    153154            END DO 
Note: See TracChangeset for help on using the changeset viewer.