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 |