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 5909 – NEMO

Changeset 5909


Ignore:
Timestamp:
2015-11-23T12:28:51+01:00 (8 years ago)
Author:
jchanut
Message:

wrong array name

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/NEMOGCM/NEMO/OPA_SRC/DYN/dynspg_ts.F90

    r5836 r5909  
    10971097            DO ji =1, jpi 
    10981098               zxr2 = r1_e1t(ji,jj) * r1_e1t(ji,jj) 
    1099                zyr2 = r1_e1t(ji,jj) * r1_e1t(ji,jj) 
     1099               zyr2 = r1_e2t(ji,jj) * r1_e2t(ji,jj) 
    11001100               zcu(ji,jj) = SQRT( grav * ht(ji,jj) * (zxr2 + zyr2) ) 
    11011101            END DO 
Note: See TracChangeset for help on using the changeset viewer.