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 4333 for branches/2013/dev_MERGE_2013/NEMOGCM/NEMO/OPA_SRC/BDY/bdyini.F90 – NEMO

Ignore:
Timestamp:
2013-12-11T18:34:00+01:00 (10 years ago)
Author:
clem
Message:

remove remaining bugs in LIM3, so that it can run in both regional and global config

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/2013/dev_MERGE_2013/NEMOGCM/NEMO/OPA_SRC/BDY/bdyini.F90

    r4294 r4333  
    488488            DO igrd = 1, jpbgrd 
    489489               id_dummy = iom_varid( inum, 'nbi'//cgrid(igrd), kdimsz=kdimsz )   
    490                nblendta(igrd,ib_bdy) = kdimsz(1) 
    491                jpbdtau = MAX(jpbdtau, kdimsz(1)) 
     490               !clem nblendta(igrd,ib_bdy) = kdimsz(1) 
     491               !clem jpbdtau = MAX(jpbdtau, kdimsz(1)) 
     492               nblendta(igrd,ib_bdy) = MAXVAL(kdimsz) 
     493               jpbdtau = MAX(jpbdtau, MAXVAL(kdimsz)) 
    492494            ENDDO 
    493495            CALL iom_close( inum ) 
Note: See TracChangeset for help on using the changeset viewer.