Ignore:
Timestamp:
2017-02-21T16:46:07+01:00 (4 years ago)
Author:
jpalmier
Message:

JPALM — 21-02-2017 — merge the branch with Richard optim branch, and add 2 fixes in trcnam_medusa

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/NERC/dev_r5518_NOC_MEDUSA_Stable/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90

    r7516 r7709  
    7474#if defined key_top 
    7575   USE trcini          ! passive tracer initialisation 
     76   USE trc, ONLY: numstr  ! tracer stats unit number 
    7677#endif 
    7778   USE lib_mpp         ! distributed memory computing 
     
    596597      IF( numdct_heat     /= -1 )   CLOSE( numdct_heat     )   ! heat transports 
    597598      IF( numdct_salt     /= -1 )   CLOSE( numdct_salt     )   ! salt transports 
     599      IF( numstr          /= -1 )   CLOSE( numstr          )   ! tracer statistics  
    598600 
    599601      ! 
Note: See TracChangeset for help on using the changeset viewer.