Changeset 9240


Ignore:
Timestamp:
2018-01-15T19:19:18+01:00 (4 months ago)
Author:
Christian Ethe
Message:

v3.6 stable : bugfix on PISCES, see ticket #2003

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2015/nemo_v3_6_STABLE/NEMOGCM/NEMO/TOP_SRC/PISCES/P4Z/p4zsbc.F90

    r9238 r9240  
    199199      REAL(wp), DIMENSION(nbtimes) :: zsteps                 ! times records 
    200200      REAL(wp), DIMENSION(:), ALLOCATABLE :: rivinput 
    201       REAL(wp), DIMENSION(:,:,:), ALLOCATABLE :: zdust, zndepo, zriver, zcmask 
     201      REAL(wp), DIMENSION(:,:,:), ALLOCATABLE :: zriver, zcmask 
    202202      ! 
    203203      CHARACTER(len=100) ::  cn_dir          ! Root directory for location of ssr files 
     
    267267      ! dust input from the atmosphere 
    268268      ! ------------------------------ 
     269      sumdepsi  = 0._wp 
    269270      IF( ln_dust ) THEN  
    270271         ! 
     
    364365      ! nutrient input from dust 
    365366      ! ------------------------ 
     367      nitdepinput = 0._wp 
    366368      IF( ln_ndepo ) THEN 
    367369         ! 
Note: See TracChangeset for help on using the changeset viewer.