tutorial_tracer_adjsens/code_ad/CTRL_SIZE.h

f7d437c7dd Patr*0001 c     ==================================================================
                0002 c     CTRL_SIZE.h
                0003 c     ==================================================================
                0004
                0005 C     Generic control variable array dimension
                0006 C     ----------------------------------------
                0007 C
                0008 C     maxCtrlArr2D :: number of 2-dim. generic control variables
                0009 C     maxCtrlArr3D :: number of 3-dim. generic control variables
8906d9e24e Gael*0010 C     maxCtrlTim2D :: number of 2-d generic tim-varying ctrl variables
                0011 C     maxCtrlProc  :: number of pre-processing options per ctrl variable
f7d437c7dd Patr*0012
                0013       integer     maxCtrlArr2D
                0014       parameter ( maxCtrlArr2D = 1 )
                0015
                0016       integer     maxCtrlArr3D
                0017       parameter ( maxCtrlArr3D = 1 )
                0018
                0019       integer     maxCtrlTim2D
                0020       parameter ( maxCtrlTim2D = 1 )
                0021
8906d9e24e Gael*0022       integer     maxCtrlProc
                0023       parameter ( maxCtrlProc = 1 )
                0024
f7d437c7dd Patr*0025 CEH3 ;;; Local Variables: ***
                0026 CEH3 ;;; mode:fortran ***
                0027 CEH3 ;;; End: ***