global_oce_latlon/code_tap/CTRL_SIZE.h

0c90ef582a Jean*0001 CBOP
                0002 C     !ROUTINE: CTRL_SIZE.h
                0003 C     !INTERFACE:
                0004 C     #include "CTRL_SIZE.h"
                0005
                0006 C     !DESCRIPTION:
                0007 C     *================================================================*
                0008 C     | CTRL_SIZE.h
                0009 C     | o set maximum number of control variables
                0010 C     *================================================================*
                0011 CEOP
2e7aec9951 dngo*0012
                0013 C     Generic control variable array dimension
                0014 C     ----------------------------------------
                0015 C
0c90ef582a Jean*0016 C     maxCtrlArr2D :: number of 2-D generic init. ctrl variables
                0017 C     maxCtrlArr3D :: number of 3-D generic init. ctrl variables
                0018 C     maxCtrlTim2D :: number of 2-D generic time-varying ctrl variables
2e7aec9951 dngo*0019 C     maxCtrlProc  :: number of pre-processing options per ctrl variable
                0020
0c90ef582a Jean*0021       INTEGER     maxCtrlArr2D
                0022       PARAMETER ( maxCtrlArr2D = 4 )
2e7aec9951 dngo*0023
0c90ef582a Jean*0024       INTEGER     maxCtrlArr3D
                0025       PARAMETER ( maxCtrlArr3D = 2 )
2e7aec9951 dngo*0026
0c90ef582a Jean*0027       INTEGER     maxCtrlTim2D
                0028       PARAMETER ( maxCtrlTim2D = 4 )
2e7aec9951 dngo*0029
0c90ef582a Jean*0030       INTEGER     maxCtrlProc
                0031       PARAMETER ( maxCtrlProc = 1 )
2e7aec9951 dngo*0032
0c90ef582a Jean*0033 C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|