/[MITgcm]/MITgcm_contrib/SOSE/code_ad/PTRACERS_SIZE.h
ViewVC logotype

Contents of /MITgcm_contrib/SOSE/code_ad/PTRACERS_SIZE.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.1 - (show annotations) (download)
Fri Apr 23 19:55:12 2010 UTC (15 years, 3 months ago) by mmazloff
Branch: MAIN
CVS Tags: HEAD
File MIME type: text/plain
original files

1 C $Header: /u/gcmpack/MITgcm/pkg/ptracers/PTRACERS_SIZE.h,v 1.4 2006/02/15 04:00:44 heimbach Exp $
2 C $Name: $
3
4 #ifdef ALLOW_PTRACERS
5
6 CBOP
7 C !ROUTINE: PTRACERS_SIZE.h
8 C !INTERFACE:
9 C #include PTRACERS_SIZE.h
10
11 C !DESCRIPTION:
12 C Contains passive tracer array size (number of tracers).
13
14 C PTRACERS_num defines how many passive tracers are allocated/exist.
15 C and is set here (default 1)
16 C
17 C Number of tracers
18 INTEGER PTRACERS_num
19 PARAMETER(PTRACERS_num = 1 )
20
21 #ifdef ALLOW_AUTODIFF_TAMC
22 INTEGER iptrkey
23 INTEGER maxpass
24 PARAMETER( maxpass = PTRACERS_num + 2 )
25 #endif
26
27 CEOP
28 #endif /* ALLOW_PTRACERS */
29
30 CEH3 ;;; Local Variables: ***
31 CEH3 ;;; mode:fortran ***
32 CEH3 ;;; End: ***

  ViewVC Help
Powered by ViewVC 1.1.22