pkg/cfc/CFC_SIZE.h

C $Header:  $
C $Name:  $

#ifndef CFC_SIZE_H
#define CFC_SIZE_H

CBOP
C    !ROUTINE: CFC_SIZE.h
C    !INTERFACE:
C #include CFC_SIZE.h

C    !DESCRIPTION:
C Contains CFC tracer array size (number of tracers).

C CFC_Tr_num   :: defines how many CFC tracer are allocated.
      INTEGER CFC_Tr_num
      PARAMETER( CFC_Tr_num = 2 )

C CFC_pTr_i1   :: pTracer index of first CFC tracer
      COMMON /CFC_INDEX/ CFC_pTr_i1
      INTEGER CFC_pTr_i1
CEOP
#endif /* CFC_SIZE_H */

CEH3 ;;; Local Variables: ***
CEH3 ;;; mode:fortran ***
CEH3 ;;; End: ***
1	jmc	1.1	C $Header: $
2			C $Name: $
3
4			#ifndef CFC_SIZE_H
5			#define CFC_SIZE_H
6
7			CBOP
8			C !ROUTINE: CFC_SIZE.h
9			C !INTERFACE:
10			C #include CFC_SIZE.h
11
12			C !DESCRIPTION:
13			C Contains CFC tracer array size (number of tracers).
14
15			C CFC_Tr_num :: defines how many CFC tracer are allocated.
16			INTEGER CFC_Tr_num
17			PARAMETER( CFC_Tr_num = 2 )
18
19			C CFC_pTr_i1 :: pTracer index of first CFC tracer
20			COMMON /CFC_INDEX/ CFC_pTr_i1
21			INTEGER CFC_pTr_i1
22			CEOP
23			#endif /* CFC_SIZE_H */
24
25			CEH3 ;;; Local Variables: ***
26			CEH3 ;;; mode:fortran ***
27			CEH3 ;;; End: ***