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 5753 for branches – NEMO

Changeset 5753 for branches


Ignore:
Timestamp:
2015-09-16T14:56:48+02:00 (9 years ago)
Author:
cetlod
Message:

dev_r5721_CNRS9_NOC3_LDF:minor corrections to avoid compilation error when running OBC configuration

Location:
branches/2015/dev_r5721_CNRS9_NOC3_LDF/NEMOGCM
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • branches/2015/dev_r5721_CNRS9_NOC3_LDF/NEMOGCM/NEMO/OPA_SRC/DOM/dom_oce.F90

    r5737 r5753  
    161161   REAL(wp), PUBLIC, ALLOCATABLE, SAVE, DIMENSION(:,:) ::   glamt , glamu, glamv , glamf    !: longitude at t, u, v, f-points [degree] 
    162162   REAL(wp), PUBLIC, ALLOCATABLE, SAVE, DIMENSION(:,:) ::   gphit , gphiu, gphiv , gphif    !: latitude  at t, u, v, f-points [degree] 
    163    REAL(wp), PUBLIC, ALLOCATABLE, SAVE, DIMENSION(:,:) ::   e1t   , e2t  , r1_e1t, r1_e2t   !: t-point horizontal scale factors    [m] 
    164    REAL(wp), PUBLIC, ALLOCATABLE, SAVE, DIMENSION(:,:) ::   e1u   , e2u  , r1_e1u, r1_e2u   !: horizontal scale factors at u-point [m] 
    165    REAL(wp), PUBLIC, ALLOCATABLE, SAVE, DIMENSION(:,:) ::   e1v   , e2v  , r1_e1v, r1_e2v   !: horizontal scale factors at v-point [m] 
    166    REAL(wp), PUBLIC, ALLOCATABLE, SAVE, DIMENSION(:,:) ::   e1f   , e2f  , r1_e1f, r1_e2f   !: horizontal scale factors at f-point [m] 
     163   REAL(wp), PUBLIC, ALLOCATABLE, SAVE, TARGET, DIMENSION(:,:) ::   e1t   , e2t  , r1_e1t, r1_e2t   !: t-point horizontal scale factors    [m] 
     164   REAL(wp), PUBLIC, ALLOCATABLE, SAVE, TARGET, DIMENSION(:,:) ::   e1u   , e2u  , r1_e1u, r1_e2u   !: horizontal scale factors at u-point [m] 
     165   REAL(wp), PUBLIC, ALLOCATABLE, SAVE, TARGET, DIMENSION(:,:) ::   e1v   , e2v  , r1_e1v, r1_e2v   !: horizontal scale factors at v-point [m] 
     166   REAL(wp), PUBLIC, ALLOCATABLE, SAVE, TARGET, DIMENSION(:,:) ::   e1f   , e2f  , r1_e1f, r1_e2f   !: horizontal scale factors at f-point [m] 
    167167   ! 
    168168   REAL(wp), PUBLIC, ALLOCATABLE, SAVE, DIMENSION(:,:) ::   e1e2t , r1_e1e2t                !: associated metrics at t-point 
  • branches/2015/dev_r5721_CNRS9_NOC3_LDF/NEMOGCM/SETTE/sette.sh

    r5589 r5753  
    301301    set_namelist namelist_cfg nn_fwb 0 
    302302    set_namelist namelist_cfg jpni 2 
    303     set_namelist namelist_cfg jpnj 2 
    304     set_namelist namelist_cfg jpnij 4 
     303    set_namelist namelist_cfg jpnj 4 
     304    set_namelist namelist_cfg jpnij 8 
    305305    set_namelist namelist_cfg nn_solv 2 
    306306    set_namelist namelist_top_cfg ln_trcdta .false. 
     
    337337    set_namelist namelist_cfg nn_fwb 0 
    338338    set_namelist namelist_cfg jpni 2 
    339     set_namelist namelist_cfg jpnj 2 
    340     set_namelist namelist_cfg jpnij 4 
     339    set_namelist namelist_cfg jpnj 4 
     340    set_namelist namelist_cfg jpnij 8 
    341341    set_namelist namelist_cfg nn_solv 2 
    342342    set_namelist namelist_top_cfg ln_diatrc .false. 
     
    482482    set_namelist namelist_cfg ln_clobber .true. 
    483483    set_namelist namelist_cfg jpni 2 
    484     set_namelist namelist_cfg jpnj 2 
    485     set_namelist namelist_cfg jpnij 4 
     484    set_namelist namelist_cfg jpnj 4 
     485    set_namelist namelist_cfg jpnij 8 
    486486    set_namelist namelist_top_cfg ln_trcdta .false. 
    487487    set_namelist namelist_top_cfg ln_diatrc .false. 
     
    516516    set_namelist namelist_cfg ln_clobber .true. 
    517517    set_namelist namelist_cfg jpni 2 
    518     set_namelist namelist_cfg jpnj 2 
    519     set_namelist namelist_cfg jpnij 4 
     518    set_namelist namelist_cfg jpnj 4 
     519    set_namelist namelist_cfg jpnij 8 
    520520    set_namelist namelist_top_cfg ln_diatrc .false. 
    521521    set_namelist namelist_top_cfg ln_rsttr .true. 
Note: See TracChangeset for help on using the changeset viewer.