C $Header: /u/gcmpack/MITgcm/pkg/ptracers/PTRACERS_TAVE.h,v 1.1 2010/01/02 23:45:46 jmc Exp $
C $Name:  $

#ifdef ALLOW_PTRACERS
#ifdef ALLOW_TIMEAVE

CBOP
C     !ROUTINE: PTRACERS_TAVE.h
C     !INTERFACE:
C     include "PTRACERS_TAVE.h"
C     !DESCRIPTION:
C     \bv
C     *================================================================*
C     | PTRACERS_TAVE.h
C     | o Time averages of pTracers variables
C     *================================================================*
C     | Time average of state variables is (generally) centered on the
C     |  middle of the time step (time average interval = TimeAve_half)
C     | Time average of intermediate and tandancy variables is centered
C     |  on the time step (time average interval=TimeAve_full)
C     *================================================================*
C     \ev
CEOP

C--   COMMON /PTRACER_TAVE_VARS/ time-averaged variables
C     ptracerFluxtave :: surface ptracer flux (mol/m2/s, >0 for increase in ptracer)
C     ptracertave     :: tracer values (mol/m3)
C     ptracer_half    :: cumulated time
C     ptracer_full    :: cumulated time
      COMMON /PTRACER_TAVE_VARS/
     &                  ptracerFluxtave, ptracertave,
     &                  ptracer_half   , ptracer_full

      _RL ptracerFluxtave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,   nSx,nSy,
     &                                                     PTRACERS_num)
      _RL ptracertave    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy,
     &                                                     PTRACERS_num)
      _RL ptracer_half(nSx,nSy), ptracer_full(nSx,nSy)

#endif /* ALLOW_TIMEAVE */
#endif /* ALLOW_PTRACERS */


CEH3 ;;; Local Variables: ***
CEH3 ;;; mode:fortran ***
CEH3 ;;; End: ***