pkg/aim/AIM_GRID.h

C $Header: /u/gcmpack/MITgcm/pkg/aim/AIM_GRID.h,v 1.1 2002/09/27 20:01:57 jmc Exp $
C $Name:  $

#ifdef ALLOW_AIM
C     *==========================================================*
C     | AIM_GRID.h  define grid arrays required for AIM Physics  |
C     *==========================================================*

C--   COMMON /NB_LEVELS/ Number of non-empty levels 
C     NLEVxy  : Nb of levels at Cell Center
C     NLEVxyU : Nb of levels at U-point (Western  edge)
C     NLEVxyV : Nb of levels at V-point (Southern edge)

      COMMON /NB_LEVELS/ NLEVxy, NLEVxyU, NLEVxyV
      INTEGER NLEVxy  (NGP, MAX_NO_THREADS)
      INTEGER NLEVxyU (NGP, MAX_NO_THREADS)
      INTEGER NLEVxyV (NGP, MAX_NO_THREADS)

#endif /* ALLOW_AIM */ 
1	cnh	1.2	C $Header: /u/gcmpack/MITgcm/pkg/aim/AIM_GRID.h,v 1.1 2002/09/27 20:01:57 jmc Exp $
2	jmc	1.1	C $Name: $
3
4			#ifdef ALLOW_AIM
5			C ==========================================================
6			C \| AIM_GRID.h define grid arrays required for AIM Physics \|
7			C ==========================================================
8
9			C-- COMMON /NB_LEVELS/ Number of non-empty levels
10			C NLEVxy : Nb of levels at Cell Center
11			C NLEVxyU : Nb of levels at U-point (Western edge)
12			C NLEVxyV : Nb of levels at V-point (Southern edge)
13
14			COMMON /NB_LEVELS/ NLEVxy, NLEVxyU, NLEVxyV
15			INTEGER NLEVxy (NGP, MAX_NO_THREADS)
16			INTEGER NLEVxyU (NGP, MAX_NO_THREADS)
17			INTEGER NLEVxyV (NGP, MAX_NO_THREADS)
18
19			#endif /* ALLOW_AIM */