Changeset 12142


Ignore:
Timestamp:
2019-12-10T12:50:13+01:00 (8 months ago)
Author:
smasson
Message:

trunk: minor bugfix in bdyini, see #2342

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/trunk/src/OCE/BDY/bdyini.F90

    r11536 r12142  
    398398      jpbdta = MAXVAL(nblendta(1:jpbgrd,1:nb_bdy)) 
    399399      ALLOCATE( nbidta(jpbdta, jpbgrd, nb_bdy), nbjdta(jpbdta, jpbgrd, nb_bdy), nbrdta(jpbdta, jpbgrd, nb_bdy) ) 
    400      
     400      nbrdta(:,:,:) = 0   ! initialize nbrdta as it may not be completely defined for each bdy 
     401       
    401402      ! Calculate global boundary index arrays or read in from file 
    402403      !------------------------------------------------------------                
Note: See TracChangeset for help on using the changeset viewer.