Changeset 4743


Ignore:
Timestamp:
2014-08-14T11:06:00+02:00 (6 years ago)
Author:
rfurner
Message:

initialising unitiated bdy arrays

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/UKMO/2014_Surge_Modelling/NEMOGCM/NEMO/OPA_SRC/BDY/bdyini.F90

    r4624 r4743  
    507507         ALLOCATE( dta_global(jpbdtau, 1, jpk) ) 
    508508         IF ( icount>0 ) ALLOCATE( dta_global2(jpbdtas, nrimmax, jpk) ) 
     509 
     510         nbidta(:,:,:)=0._wp 
     511         nbjdta(:,:,:)=0._wp 
     512         nbrdta(:,:,:)=0._wp 
    509513         !  
    510514      ENDIF 
Note: See TracChangeset for help on using the changeset viewer.