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 2528 for trunk/NEMOGCM/NEMO/OPA_SRC/par_ORCA_R2.h90 – NEMO

Ignore:
Timestamp:
2010-12-27T18:33:53+01:00 (13 years ago)
Author:
rblod
Message:

Update NEMOGCM from branch nemo_v3_3_beta

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMOGCM/NEMO/OPA_SRC/par_ORCA_R2.h90

    • Property svn:eol-style deleted
    r1528 r2528  
    55   !!--------------------------------------------------------------------- 
    66   !!---------------------------------------------------------------------- 
    7    !!  OPA 9.0 , LOCEAN-IPSL (2005)  
     7   !! NEMO/OPA 3.3 , NEMO Consortium (2010) 
    88   !! $Id$  
    9    !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt  
     9   !! Software governed by the CeCILL licence (NEMOGCM/NEMO_CeCILL.txt) 
    1010   !!---------------------------------------------------------------------- 
    1111   CHARACTER (len=16)      & 
     
    8282      ! jpizoom =   61   ,    &  !: left bottom (i,j) indices of the zoom 
    8383      ! jpjzoom =   27   ,    &  !: in data domain indices (160W,60S) 
    84       jpizoom =   61   ,    &  !: left bottom (i,j) indices of the zoom 
    85       jpjzoom =    7   ,    &  !: in data domain indices (160W,75S) 
     84      ! jpizoom =   61   ,    &  !: left bottom (i,j) indices of the zoom 
     85      ! jpjzoom =    7   ,    &  !: in data domain indices (160W,75S) 
     86      jpizoom =   110   ,    &  !: left bottom (i,j) indices of the zoom 
     87      jpjzoom =   97   ,    &  !: in data domain indices (64W,31.5N) BATS site 
    8688      ! Domain characteristics 
    8789      jperio  =   0            !: lateral cond. type (between 0 and 6) 
     
    158160      &     ppdzmin = pp_not_used           ,  &  !: (meters) vertical thickness of the top layer 
    159161      &     pphmax  = pp_not_used                 !: (meters) Maximum depth of the ocean gdepw(jpk) 
     162   LOGICAL,  PARAMETER ::        & 
     163      &     ldbletanh = .FALSE.                   !: Use/do not use double tanf function for vertical coordinates 
     164   REAL(wp), PARAMETER ::        & 
     165      &     ppa2    = pp_not_used           ,  &  !: Double tanh function parameters 
     166      &     ppkth2  = pp_not_used           ,  &  !: 
     167      &     ppacr2  = pp_not_used                 !: 
    160168   !!--------------------------------------------------------------------- 
Note: See TracChangeset for help on using the changeset viewer.