1 |
C $Header: /u/gcmpack/MITgcm/pkg/ptracers/PTRACERS_MOD.h,v 1.1 2008/05/08 19:50:08 jahn Exp $ |
2 |
C $Name: $ |
3 |
|
4 |
#ifdef ALLOW_PTRACERS |
5 |
#ifdef PTRACERS_ALLOW_DYN_STATE |
6 |
|
7 |
CBOP |
8 |
C !ROUTINE: PTRACERS_MOD.h |
9 |
C !INTERFACE: |
10 |
C #include PTRACERS_MOD.h |
11 |
|
12 |
C !DESCRIPTION: |
13 |
C Contains passive tracer modules and associated macros |
14 |
|
15 |
CEOP |
16 |
|
17 |
use ptracers_dyn_state_mod |
18 |
use ptracers_dyn_state_data_mod |
19 |
|
20 |
C This macro allows the second-order-moment member of the ptracers |
21 |
C internal state data structure to be used like an simple array. |
22 |
C Names are chosen such that macro expansion does not increase |
23 |
C line length |
24 |
#define _Ptracers_som(a,b,c,d,e,f,g) \ |
25 |
PtrISt(g)%som_P(a,b,c,d,e,f) |
26 |
|
27 |
#endif /* PTRACERS_ALLOW_DYN_STATE */ |
28 |
#endif /* ALLOW_PTRACERS */ |
29 |
|