MODULE trcdia
   !!======================================================================
   !!                       *** MODULE trcdia ***
   !! TOP :   Output of passive tracers
   !!======================================================================
   !! History :   1.0  !  2005-03 (O. Aumont, A. El Moussaoui) original code
   !!----------------------------------------------------------------------
#if defined key_top
   !!----------------------------------------------------------------------
   !!   'key_top'                                                TOP models
   !!----------------------------------------------------------------------
   !!   trc_dia    :  output passive tracer fields
   !!----------------------------------------------------------------------
   USE trcdit

   IMPLICIT NONE
   PRIVATE

   PUBLIC trc_dia      ! called by ???

   !!----------------------------------------------------------------------
   !! NEMO/TOP 1.0 , LOCEAN-IPSL (2005) 
   !! $Header:$ 
   !! Software governed by the CeCILL licence (modipsl/doc/NEMO_CeCILL.txt)
   !!----------------------------------------------------------------------

CONTAINS

   SUBROUTINE trc_dia( kt, kindic )  
      !!---------------------------------------------------------------------
      !!                     ***  ROUTINE trc_dia  ***
      !!
      !! ** Purpose :   output passive tracers fields 
      !!---------------------------------------------------------------------
      INTEGER, INTENT( in ) :: kt, kindic
      !!---------------------------------------------------------------------
      
      CALL trcdit_wr( kt, kindic )      ! outputs for tracer concentration

# if defined key_trc_diatrd
      CALL trcdid_wr( kt, kindic )      ! outputs for dynamical trends
# endif

# if defined key_trc_diaadd
      CALL trcdii_wr( kt, kindic )      ! outputs for additional arrays
# endif

# if defined key_trc_diabio
      CALL trcdib_wr( kt, kindic )      ! outputs for biological trends
# endif
      !
   END SUBROUTINE trc_dia

#else
   !!----------------------------------------------------------------------
   !!  Dummy module :                                     No passive tracer
   !!----------------------------------------------------------------------
CONTAINS
   SUBROUTINE trc_dia                      ! Empty routine   
   END SUBROUTINE trc_dia   
#endif

   !!======================================================================
END MODULE trcdia