Parent Directory | Revision Log | Revision Graph
o first steps towards MNC-ification of PTRACERS - compiles and runs with linux_ia32_g77 - only outputs instantaneous tracer fields (so far!)
1 | edhill | 1.2 | C $Header: /u/gcmpack/MITgcm/pkg/ptracers/PTRACERS_SIZE.h,v 1.1 2004/07/13 16:47:11 jmc Exp $ |
2 | jmc | 1.1 | 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 | CEOP | ||
22 | #endif /* ALLOW_PTRACERS */ | ||
23 | edhill | 1.2 | |
24 | CEH3 ;;; Local Variables: *** | ||
25 | CEH3 ;;; mode:fortran *** | ||
26 | CEH3 ;;; End: *** |
ViewVC Help | |
Powered by ViewVC 1.1.22 |