C $Header: /home/ubuntu/mnt/e9_copy/MITgcm_contrib/nesting_sannino/nest_parent/NEST_PARENT_PARAMS.h,v 1.3 2010/11/28 02:25:39 jmc Exp $
C $Name:  $

#ifdef ALLOW_NEST_PARENT

C     *===============================================================*
C     | NEST_PARENT_PARAMS.h
C     | o Basic parameter header for NEST_PARENT coupler
C     |   parameterization.  These parameters are initialized by
C     |   and/or read in from data.nest_parent file.
C     *===============================================================*

C Parameters used in nest_parent routine arguments
C (needed for compilation of nest_parent routines even
C   if ALLOW_NEST_PARENT is not defined)

      INTEGER NST_LEV_TOT_P, NST_LEV_P, NCPUs_PAR_P
      PARAMETER (NST_LEV_TOT_P = 1)   !Number of Total Nesting Levels
      PARAMETER (NST_LEV_P     = 1)   !Which level am I?
      PARAMETER (NCPUs_PAR_P   = 40 )

      COMMON /NEST_PARENT_PAR_I/
     &       LeftB, RightB,
     &       MSTR_DRV_P, MSTR_PAR_P, MSTR_CLD_P
      INTEGER LEFTB
      INTEGER RIGHTB
      INTEGER MSTR_DRV_P(NST_LEV_TOT_P)
      INTEGER MSTR_PAR_P(NST_LEV_TOT_P)
      INTEGER MSTR_CLD_P(NST_LEV_TOT_P)

      INTEGER NCPUs_CLD_P(NST_LEV_TOT_P)
      DATA NCPUs_CLD_P / 20 /

      COMMON /NEST_PARENT_PAR_C/
     &                   dirNEST_PARENT
      CHARACTER*80 dirNEST_PARENT

#endif /* ALLOW_NEST_PARENT */

CEH3 ;;; Local Variables: ***
CEH3 ;;; mode:fortran ***
CEH3 ;;; End: ***