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 5308 for branches/UKMO/dev_r5107_eorca025_closea/NEMOGCM/NEMO/OPA_SRC/DOM/closea.F90 – NEMO

Ignore:
Timestamp:
2015-05-28T17:36:43+02:00 (9 years ago)
Author:
davestorkey
Message:

UKMO dev_r5107_eorca025_closea branch: apply changes to closea.F90.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/UKMO/dev_r5107_eorca025_closea/NEMOGCM/NEMO/OPA_SRC/DOM/closea.F90

    r5307 r5308  
    4949   !!---------------------------------------------------------------------- 
    5050   !! NEMO/OPA 3.3 , NEMO Consortium (2010) 
    51    !! $Id$ 
     51   !! $Id: closea.F90 4162 2013-11-07 10:19:49Z cetlod $ 
    5252   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    5353   !!---------------------------------------------------------------------- 
     
    148148            ncsi2(4)   = 76  ;  ncsj2(4)   = 61 
    149149            ncsir(4,1) = 84  ;  ncsjr(4,1) = 59  
    150             !                                        ! ======================= 
    151          CASE ( 025 )                                ! ORCA_R025 configuration 
    152             !                                        ! ======================= 
     150            !                                        ! ================================ 
     151         CASE ( 025 )                                ! ORCA_R025 extended configuration 
     152            !                                        ! ================================ 
    153153            ncsnr(1)   = 1    ; ncstt(1)   = 0               ! Caspian + Aral sea 
    154             ncsi1(1)   = 1330 ; ncsj1(1)   = 645 
    155             ncsi2(1)   = 1400 ; ncsj2(1)   = 795 
     154            ncsi1(1)   = 1330 ; ncsj1(1)   = 831 
     155            ncsi2(1)   = 1400 ; ncsj2(1)   = 981 
    156156            ncsir(1,1) = 1    ; ncsjr(1,1) = 1 
    157157            !                                         
    158158            ncsnr(2)   = 1    ; ncstt(2)   = 0               ! Azov Sea  
    159             ncsi1(2)   = 1284 ; ncsj1(2)   = 722 
    160             ncsi2(2)   = 1304 ; ncsj2(2)   = 747 
     159            ncsi1(2)   = 1284 ; ncsj1(2)   = 908 
     160            ncsi2(2)   = 1304 ; ncsj2(2)   = 933 
    161161            ncsir(2,1) = 1    ; ncsjr(2,1) = 1 
     162            ! 
     163            ncsnr(3)   = 1    ; ncstt(3)   = 0               ! North American Great Lakes   
     164            ncsi1(3)   = 781  ; ncsj1(3)   = 870  
     165            ncsi2(3)   = 847  ; ncsj2(3)   = 926  
     166            ncsir(3,1) = 1    ; ncsjr(3,1) = 1  
     167            !  
     168            ncsnr(4)   = 1    ; ncstt(4)   = 0               ! Lake Victoria   
     169            ncsi1(4)   = 1274 ; ncsj1(4)   = 672  
     170            ncsi2(4)   = 1289 ; ncsj2(4)   = 687  
     171            ncsir(4,1) = 1    ; ncsjr(4,1) = 1  
    162172            ! 
    163173         END SELECT 
Note: See TracChangeset for help on using the changeset viewer.