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 7761 for trunk/NEMOGCM/NEMO/SAS_SRC/nemogcm.F90 – NEMO

Ignore:
Timestamp:
2017-03-06T18:58:35+01:00 (7 years ago)
Author:
clem
Message:

make AGRIF and LIM3 fully compatible

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/NEMOGCM/NEMO/SAS_SRC/nemogcm.F90

    r7646 r7761  
    308308      jpim1 = jpi-1                                            ! inner domain indices 
    309309      jpjm1 = jpj-1                                            !   "           " 
    310       jpkm1 = jpk-1                                            !   "           " 
     310      jpkm1 = MAX( 1, jpk-1 )                                  !   "           " 
    311311      jpij  = jpi*jpj                                          !  jpi x j 
    312312 
    … …  
    370370      !           the environment of ocean BDY. Therefore bdy is called in both OPA and SAS modules.  
    371371      !           This is not clean and should be changed in the future.  
    372                             CALL     bdy_init 
     372                            CALL bdy_init 
    373373      ! ==> 
    374374                            CALL icb_init( rdt, nit000)   ! initialise icebergs instance 
Note: See TracChangeset for help on using the changeset viewer.