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 | C $Header: /u/gcmpack/MITgcm/pkg/ptracers/PTRACERS_SIZE.h,v 1.1 2004/07/13 16:47:11 jmc 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 | CEOP |
22 | #endif /* ALLOW_PTRACERS */ |
23 | |
24 | CEH3 ;;; Local Variables: *** |
25 | CEH3 ;;; mode:fortran *** |
26 | CEH3 ;;; End: *** |
ViewVC Help | |
Powered by ViewVC 1.1.22 |