MITgcm_contrib/cg2d_bench/PARAMS.h


C     /==========================================================\
C     | PARAMS.h                                                 |
C     | o Header file defining model "parameters".               |
C     |==========================================================|
C     | The values from the model's standard input file are      |
C     | stored into the variables held here. Notes describing    |
C     | the parameters can also be found here.                   |
C     \==========================================================/

C--   COMMON /PARM_I/ Integer valued parameters used by the model.
C     cg2dMaxIters        - Maximum number of iterations in the
C                           two-dimensional con. grad solver.
C     cg2dChkResFreq      - Frequency with which to check residual
C                           in con. grad solver.
C     nIter               - Time step number of full model.
C     nIter0              - Start time-step number of for this run
C     nTimeSteps          - Number of timesteps to execute
      COMMON /PARM_I/
     &        cg2dMaxIters,
     &        cg2dChkResFreq,
     &        nIter, nIter0, nTimeSteps
      INTEGER cg2dMaxIters
      INTEGER cg2dChkResFreq
      INTEGER nIter
      INTEGER nIter0
      INTEGER nTimeSteps

C--   COMMON /PARM_R/ "Real" valued parameters used by the model.
C     cg2dTargetResidual
C               - Target residual for cg2d solver.
C
      COMMON /PARM_R/ cg2dTargetResidual
      Real cg2dTargetResidual

1
2	C /==========================================================\
3	C \| PARAMS.h \|
4	C \| o Header file defining model "parameters". \|
5	C \|==========================================================\|
6	C \| The values from the model's standard input file are \|
7	C \| stored into the variables held here. Notes describing \|
8	C \| the parameters can also be found here. \|
9	C \==========================================================/
10
11	C-- COMMON /PARM_I/ Integer valued parameters used by the model.
12	C cg2dMaxIters - Maximum number of iterations in the
13	C two-dimensional con. grad solver.
14	C cg2dChkResFreq - Frequency with which to check residual
15	C in con. grad solver.
16	C nIter - Time step number of full model.
17	C nIter0 - Start time-step number of for this run
18	C nTimeSteps - Number of timesteps to execute
19	COMMON /PARM_I/
20	& cg2dMaxIters,
21	& cg2dChkResFreq,
22	& nIter, nIter0, nTimeSteps
23	INTEGER cg2dMaxIters
24	INTEGER cg2dChkResFreq
25	INTEGER nIter
26	INTEGER nIter0
27	INTEGER nTimeSteps
28
29	C-- COMMON /PARM_R/ "Real" valued parameters used by the model.
30	C cg2dTargetResidual
31	C - Target residual for cg2d solver.
32	C
33	COMMON /PARM_R/ cg2dTargetResidual
34	Real cg2dTargetResidual
35