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 11180 for NEMO/branches/UKMO/NEMO_4.0_surge/src/OCE/DOM/domzgr.F90 – NEMO

Ignore:
Timestamp:
2019-06-25T18:50:27+02:00 (5 years ago)
Author:
clne
Message:

Initial commit of code for 2d (surge) work in NEMO4.
This is aiming to replicate the 3.6 version in branches/UKMO/dev_r5518_Surge_Modelling

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/UKMO/NEMO_4.0_surge/src/OCE/DOM/domzgr.F90

    r10888 r11180  
    134134      IF( ln_sco      )   ioptio = ioptio + 1 
    135135      IF( ioptio /= 1 )   CALL ctl_stop( ' none or several vertical coordinate options used' ) 
    136  
     136      IF (ln_2d .AND. .NOT.ln_sco)   CALL ctl_stop( ' 2D mode must be used with ln_sco' )  
    137137 
    138138      !                                ! top/bottom ocean level indices for t-, u- and v-points (f-point also for top) 
Note: See TracChangeset for help on using the changeset viewer.