pkg/gchem/GCHEM_FIELDS.h

C $Header: /u/gcmpack/MITgcm_contrib/darwin/pkg/gchem/GCHEM_FIELDS.h,v 1.1 2008/01/11 21:28:01 jahn Exp $
C $Name:  $

#ifdef ALLOW_GCHEM
CBOP
C    !ROUTINE: GCHEM_FIELDS.h
C    !INTERFACE:
 
C    !DESCRIPTION:
C Contains tracer fields specifically for chemical tracers.
C
C  gchemTendency :: 3DxPTRACER_num field that store the tendencies due
C                   to the bio-geochemical model

#ifndef GCHEM_SEPARATE_FORCING
      _RL gchemTendency(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy,
     &                  PTRACERS_num)
      COMMON /GCHEM_FIELDS/ 
     &     gchemTendency
#endif /* GCHEM_SEPARATE_FORCING */
CEOP
#endif /* ALLOW_GCHEM */

CEH3 ;;; Local Variables: ***
CEH3 ;;; mode:fortran ***
CEH3 ;;; End: ***
1	C $Header: /u/gcmpack/MITgcm_contrib/darwin/pkg/gchem/GCHEM_FIELDS.h,v 1.1 2008/01/11 21:28:01 jahn Exp $
2	C $Name: $
3
4	#ifdef ALLOW_GCHEM
5	CBOP
6	C !ROUTINE: GCHEM_FIELDS.h
7	C !INTERFACE:
8
9	C !DESCRIPTION:
10	C Contains tracer fields specifically for chemical tracers.
11	C
12	C gchemTendency :: 3DxPTRACER_num field that store the tendencies due
13	C to the bio-geochemical model
14
15	#ifndef GCHEM_SEPARATE_FORCING
16	_RL gchemTendency(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy,
17	& PTRACERS_num)
18	COMMON /GCHEM_FIELDS/
19	& gchemTendency
20	#endif /* GCHEM_SEPARATE_FORCING */
21	CEOP
22	#endif /* ALLOW_GCHEM */
23
24	CEH3 ;;; Local Variables: ***
25	CEH3 ;;; mode:fortran ***
26	CEH3 ;;; End: ***