CCC $Header$ 
CCC  TOP 1.0 , LOCEAN-IPSL (2005) 
C This software is governed by CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 
C ---------------------------------------------------------------------------
CDIR$ LIST
      SUBROUTINE trcdia(kt,kindic)
      IMPLICIT NONE
      INTEGER kt, kindic      
C
C outputs for tracer concentration
C
      CALL trcdit(kt,kindic)
#if defined key_trc_diatrd
C
C outputs for dynamical trends
C
      CALL trcdid(kt,kindic)

#endif
#if defined key_trc_diaadd
C
C outputs for additional arrays
C
      CALL trcdii(kt,kindic)
#endif
#if defined key_trc_diabio
C
C outputs for biological trends
C
      CALL trcdib(kt,kindic)
#endif
      RETURN 
      END