C $Header: /u/gcmpack/MITgcm/model/inc/SET_GRID.h,v 1.1 2011/12/12 18:58:51 jmc Exp $ C $Name: $ C CBOP C !ROUTINE: SET_GRID.h C !INTERFACE: C #include SET_GRID.h C !DESCRIPTION: C Header file holding some 1-D arrays which are used to set-up the model grid. C========================================================================== C IMPORTANT : This header file can only be included after the options C file PACKAGES_CONFIG.h and the header file W2_EXCH2_SIZE.h C========================================================================== CEOP C grid_maxNx :: Maximum length of delX vector C grid_maxNy :: Maximum length of delY vector INTEGER grid_maxNx, grid_maxNy #ifdef ALLOW_EXCH2 PARAMETER( grid_maxNx = W2_maxXStackNx ) PARAMETER( grid_maxNy = W2_maxYStackNy ) #else /* ALLOW_EXCH2 */ PARAMETER( grid_maxNx = Nx ) PARAMETER( grid_maxNy = Ny ) #endif /* ALLOW_EXCH2 */ C-- COMMON /SET_GRID_R/ "Real" valued parameters used to set-up the model grid. C delX :: Separation between cell faces (m) or (deg), depending on type C delY type of horizontal grid choice (cartesian/spherical-polar ...) COMMON /SET_GRID_R/ & delX, delY _RL delX(grid_maxNx) _RL delY(grid_maxNy) CEH3 ;;; Local Variables: *** CEH3 ;;; mode:fortran *** CEH3 ;;; End: ***