C     $Header: /afs/andrew.cmu.edu/cit/meche/airshed/rcs/multiscale/common/parameter.h.bigger,v 1.2 1994/07/18 19:07:06 kw27 Exp $

C     $Log: parameter.h.bigger,v $
# Revision 1.2  1994/07/18  19:07:06  kw27
# Drew -- Added dummy CVS (RCS) headers to all files so that they will all have
# revision information in them.
#

C     *** CIT AIRSHED MODEL ***
C     INCLUDE FILE TO DEFINE MAXIMUM ARRAY SIZES
C     WRITTEN BY ROBERT HARLEY (FEBRUARY 1991)
C
C     CAUTIONARY NOTES:  IF CHANGES ARE MADE TO THIS FILE,
C     BE SURE TO CHECK THAT THE DEFINITION OF LBIGRC IS REVISED
C     (IF NGMX OR NGMY IS CHANGED).  ALSO, IF NEMAX OR NIMAX 
C     ARE CHANGED, VERIFY THE NEW DEFINITION OF LWORK.
c	*****************************************************************
c	*								*
c	*		*** CAUTION (01/30/92, Talat Odman) ***		*
c	*								*
c	*	NGMX, NGMY, NSMAX and LBIGRC must have the same 	*
c	*	values in 'parameter_2.h'				*
c	*								*
c	*****************************************************************
C
C     NSMAX  - MAXIMUM NUMBER OF CHEMICAL SPECIES
C     NIMAX  - MAXIMUM NUMBER OF INITIAL CONDITION SPECIES
C     NEMAX  - MAXIMUM NUMBER OF EMITTED SPECIES 
C     NHCMAX - MAXIMUM NUMBER OF HYDROCARBON SPECIES
C     NLUMAX - MAXIMUM NUMBER OF LAND USE TYPES
C     NRMAX  - MAXIMUM NUMBER OF CHEMICAL REACTIONS
C     NPMAX  - MAXIMUM NUMBER OF POINT SOURCES   
C     NCMAX  - MAXIMUM NUMBER OF SPECIAL COEFFICIENTS
C     LWORK  - LENGTH OF THE WORK VECTOR
C
      PARAMETER (NSMAX = 35, NIMAX = 10, NEMAX = 20)
      PARAMETER (NHCMAX = 20, NLUMAX = 32, NRMAX = 125)
      PARAMETER (NPMAX = 20000, NCMAX = 29)
C
C     MAXIMUM NUMBER OF GRID SQUARES (DO NOT SET NGMZ LARGER THAN 10)
C     NGMX   - MAXIMUM NUMBER OF MASTER GRID CELLS IN X DIRECTION
C     NGMY   - MAXIMUM NUMBER OF MASTER GRID CELLS IN Y DIRECTION
C     NGMZ   - MAXIMUM NUMBER OF VERTICAL COMPUTATIONAL CELLS
C     LBIGRC - SET TO LARGER OF NGMX AND NGMY
C
      PARAMETER (NGMX = 253, NGMY = 205, NGMZ = 5)
      PARAMETER (NXCOARSE = 64, NYCOARSE = 52)

C********FIX NEXT LINE!!!!!!!!!
      PARAMETER (LBIGRC = NGMX, NZP1 = NGMZ+1)
c
c     MAXNODE - maximum number of nodes
c
      PARAMETER (MAXNODE = 3328)
C
C     DEFINE LWORK USING THE LARGER OF NEMAX AND NIMAX
C
      PARAMETER (LWORK = MAXNODE * NEMAX)
C
C     DERIVED PARAMETERS FOR SCALAR AND VECTOR ARRAY DIMENSIONS
C
C     LWIND  - ELEMENTS IN THE 3D WIND FIELD ARRAY
C     LAREAS - ELEMENTS IN GROUND-LEVEL EMISSIONS ARRAY
C     LC     - ELEMENTS IN SPECIES CONCENTRATION ARRAY
C     LIC    - ELEMENTS IN INITIAL CONDITION CONCENTRATION ARRAY
C     LAVG   - ELEMENTS IN HOURLY AVERAGE GROUND-LEVEL CONC ARRAY
C
      PARAMETER (LSCAL  =  NGMX    * NGMY)
      PARAMETER (LWIND  =  MAXNODE * (NGMZ+1))
      PARAMETER (LAREAS =  MAXNODE * NEMAX)
      PARAMETER (LC     =  MAXNODE * NGMZ * NSMAX)
      PARAMETER (LIC    =  MAXNODE * NGMZ * NIMAX)
      PARAMETER (LAVG   =  MAXNODE * NSMAX)
C
C     DERIVED PARAMETERS FOR BOUNDARY CONDITION ARRAYS
C
      PARAMETER (LBR   = NGMY * NGMZ * NSMAX)
      PARAMETER (LBRIC = NGMY * NGMZ * NIMAX)
      PARAMETER (LBC   = NGMX * NGMZ * NSMAX)
      PARAMETER (LBCIC = NGMX * NGMZ * NIMAX)
C
C     TOTAL NUMBER OF STORAGE LOCATIONS REQUIRED FOR
C     A VERTICAL COLUMN OF SPECIES CONCENTRATIONS
C
      PARAMETER (LCOLSP = NSMAX * NGMZ)
C
C     TOTAL NUMBER OF STORAGE LOCATIONS REQUIRED TO SPECIFY
C     ALL CHEMICAL REACTION RATES IN A SINGLE VERTICAL COLUMN 
C
      PARAMETER (NRZ = NRMAX * NGMZ)
      PARAMETER (MAXRATIO = 4)