1 |
jmc |
1.2 |
C $Header: $ |
2 |
|
|
C $Name: $ |
3 |
|
|
|
4 |
gforget |
1.1 |
c---------------------------------------- |
5 |
|
|
c subroutine ctrl_bound_3D |
6 |
|
|
c---------------------------------------- |
7 |
|
|
cadj SUBROUTINE ctrl_bound_3D FTLNAME = g_ctrl_bound_3D |
8 |
|
|
cadj SUBROUTINE ctrl_bound_3D ADNAME = adctrl_bound_3D |
9 |
|
|
cadj SUBROUTINE ctrl_bound_3D INPUT = 1, 2, 3, 4,5,6 |
10 |
|
|
cadj SUBROUTINE ctrl_bound_3D OUTPUT = |
11 |
|
|
cadj SUBROUTINE ctrl_bound_3D ACTIVE = 3 |
12 |
|
|
cadj SUBROUTINE ctrl_bound_3D DEPEND = 1, 2, 4,5,6 |
13 |
|
|
c---------------------------------------- |
14 |
|
|
c subroutine ctrl_bound_2D |
15 |
|
|
c---------------------------------------- |
16 |
|
|
cadj SUBROUTINE ctrl_bound_2D FTLNAME = g_ctrl_bound_2D |
17 |
|
|
cadj SUBROUTINE ctrl_bound_2D ADNAME = adctrl_bound_2D |
18 |
|
|
cadj SUBROUTINE ctrl_bound_2D INPUT = 1, 2, 3, 4,5,6 |
19 |
|
|
cadj SUBROUTINE ctrl_bound_2D OUTPUT = |
20 |
|
|
cadj SUBROUTINE ctrl_bound_2D ACTIVE = 3 |
21 |
|
|
cadj SUBROUTINE ctrl_bound_2D DEPEND = 1, 2, 4,5,6 |
22 |
|
|
|