Parent Directory
| 
Revision Log
| 
Revision Graph
- new CPP option GCHEM_ADD2TR_TENDENCY around definition of gchemTendency array (replacing #ifndef GCHEM_SEPARATE_FORCING) ; - change dimension of array "gchemTendency" from PTRACERS_num to GCHEM_tendTr_num (which is set in new header file: GCHEM_SIZE.h)
| 1 | jmc | 1.2 | C $Header: /u/gcmpack/MITgcm/pkg/gchem/GCHEM_FIELDS.h,v 1.1 2004/11/28 23:48:31 mlosch Exp $ |
| 2 | mlosch | 1.1 | C $Name: $ |
| 3 | |||
| 4 | #ifdef ALLOW_GCHEM | ||
| 5 | CBOP | ||
| 6 | C !ROUTINE: GCHEM_FIELDS.h | ||
| 7 | C !INTERFACE: | ||
| 8 | jmc | 1.2 | |
| 9 | mlosch | 1.1 | C !DESCRIPTION: |
| 10 | C Contains tracer fields specifically for chemical tracers. | ||
| 11 | C | ||
| 12 | C gchemTendency :: 3DxPTRACER_num field that store the tendencies due | ||
| 13 | C to the bio-geochemical model | ||
| 14 | |||
| 15 | jmc | 1.2 | #ifdef GCHEM_ADD2TR_TENDENCY |
| 16 | mlosch | 1.1 | _RL gchemTendency(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy, |
| 17 | jmc | 1.2 | & GCHEM_tendTr_num) |
| 18 | COMMON /GCHEM_FIELDS/ | ||
| 19 | mlosch | 1.1 | & gchemTendency |
| 20 | jmc | 1.2 | #endif /* GCHEM_ADD2TR_TENDENCY */ |
| 21 | mlosch | 1.1 | CEOP |
| 22 | #endif /* ALLOW_GCHEM */ | ||
| 23 | |||
| 24 | CEH3 ;;; Local Variables: *** | ||
| 25 | CEH3 ;;; mode:fortran *** | ||
| 26 | CEH3 ;;; End: *** |
| ViewVC Help | |
| Powered by ViewVC 1.1.22 |