8 |
C Generic control variable array dimension |
C Generic control variable array dimension |
9 |
C ---------------------------------------- |
C ---------------------------------------- |
10 |
C |
C |
11 |
C maxCtrlArr2D :: number of 2-dim. generic control variables |
C maxCtrlArr2D :: number of 2-d generic init. ctrl variables |
12 |
C maxCtrlArr3D :: number of 3-dim. generic control variables |
C maxCtrlArr3D :: number of 3-d generic init. ctrl variables |
13 |
|
C maxCtrlTim2D :: number of 2-d generic tim-varying ctrl variables |
14 |
|
|
15 |
integer maxCtrlArr2D |
integer maxCtrlArr2D |
16 |
parameter ( maxCtrlArr2D = 1 ) |
parameter ( maxCtrlArr2D = 1 ) |
18 |
integer maxCtrlArr3D |
integer maxCtrlArr3D |
19 |
parameter ( maxCtrlArr3D = 1 ) |
parameter ( maxCtrlArr3D = 1 ) |
20 |
|
|
21 |
|
integer maxCtrlTim2D |
22 |
|
parameter ( maxCtrlTim2D = 1 ) |
23 |
|
|
24 |
CEH3 ;;; Local Variables: *** |
CEH3 ;;; Local Variables: *** |
25 |
CEH3 ;;; mode:fortran *** |
CEH3 ;;; mode:fortran *** |
26 |
CEH3 ;;; End: *** |
CEH3 ;;; End: *** |