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 7200 for branches/2016/dev_r6409_SIMPLIF_2_usrdef/NEMOGCM/TOOLS/DOMAINcfg/src/nemogcm.f90 – NEMO

Ignore:
Timestamp:
2016-11-06T17:31:33+01:00 (7 years ago)
Author:
gm
Message:

#1692 - branch SIMPLIF_2_usrdef: add depth_e3 module + management of ORCA family + domain_cfg filename (in&out) given in namelist

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2016/dev_r6409_SIMPLIF_2_usrdef/NEMOGCM/TOOLS/DOMAINcfg/src/nemogcm.f90

    r7189 r7200  
    131131         &             nn_isplt, nn_jsplt, nn_jctls, nn_jctle,   & 
    132132         &             nn_bench, nn_timing, nn_diacfl 
    133       NAMELIST/namcfg/ ln_e2_dep,                                & 
     133      NAMELIST/namcfg/ ln_e3_dep,                                & 
    134134         &             cp_cfg, cp_cfz, jp_cfg, jpidta, jpjdta, jpkdta, jpiglo, jpjglo, & 
    135135         &             jpizoom, jpjzoom, jperio, ln_use_jattr 
     
    288288         WRITE(numout,*) '~~~~~~~ ' 
    289289         WRITE(numout,*) '   Namelist namcfg' 
    290          WRITE(numout,*) '      vertical scale factors =T: e3.=dk[depth]       ln_e2_dep = ', ln_e2_dep 
     290         WRITE(numout,*) '      vertical scale factors =T: e3.=dk[depth]       ln_e3_dep = ', ln_e3_dep 
    291291         WRITE(numout,*) '                             =F: old definition                 ' 
    292292         WRITE(numout,*) '      configuration name                               cp_cfg  = ', TRIM(cp_cfg) 
     
    303303         WRITE(numout,*) '      use file attribute if exists as i/p j-start ln_use_jattr = ', ln_use_jattr 
    304304         ! 
    305          IF(.NOT.ln_e2_dep ) THEN 
     305         IF(.NOT.ln_e3_dep ) THEN 
    306306            WRITE(numout,cform_war) 
    307307            WRITE(numout,*) 
Note: See TracChangeset for help on using the changeset viewer.