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 14857 for NEMO/trunk/tests/VORTEX – NEMO

Ignore:
Timestamp:
2021-05-12T18:47:25+02:00 (3 years ago)
Author:
hadcv
Message:

#2600: Fixes in MY_SRC for nn_hls = 2/tiling and traadv_fct.F90 for nn_hls = 1

File:
1 edited

Legend:

Unmodified
Added
Removed

  • NEMO/trunk/tests/VORTEX/MY_SRC/usrdef_istate.F90

    r14433 r14857  
    7676      ! 
    7777      ! temperature:          
    78       DO_2D( 1, 1, 1, 1 ) 
     78      DO_2D( nn_hls, nn_hls, nn_hls, nn_hls ) 
    7979         zx = glamt(ji,jj) * 1.e3 
    8080         zy = gphit(ji,jj) * 1.e3 
    … …  
    160160      ! Sea level: 
    161161      za = -zP0 * (1._wp-EXP(-zH)) / (grav*(zH-1._wp + EXP(-zH))) 
    162       DO_2D( 1, 1, 1, 1 ) 
     162      DO_2D( nn_hls, nn_hls, nn_hls, nn_hls ) 
    163163         zx = glamt(ji,jj) * 1.e3 
    164164         zy = gphit(ji,jj) * 1.e3 
Note: See TracChangeset for help on using the changeset viewer.