1 |
gforget |
1.1 |
c---------------------------------------- |
2 |
|
|
c subroutine ctrl_bound_3D |
3 |
|
|
c---------------------------------------- |
4 |
|
|
cadj SUBROUTINE ctrl_bound_3D FTLNAME = g_ctrl_bound_3D |
5 |
|
|
cadj SUBROUTINE ctrl_bound_3D ADNAME = adctrl_bound_3D |
6 |
|
|
cadj SUBROUTINE ctrl_bound_3D INPUT = 1, 2, 3, 4,5,6 |
7 |
|
|
cadj SUBROUTINE ctrl_bound_3D OUTPUT = |
8 |
|
|
cadj SUBROUTINE ctrl_bound_3D ACTIVE = 3 |
9 |
|
|
cadj SUBROUTINE ctrl_bound_3D DEPEND = 1, 2, 4,5,6 |
10 |
|
|
c---------------------------------------- |
11 |
|
|
c subroutine ctrl_bound_2D |
12 |
|
|
c---------------------------------------- |
13 |
|
|
cadj SUBROUTINE ctrl_bound_2D FTLNAME = g_ctrl_bound_2D |
14 |
|
|
cadj SUBROUTINE ctrl_bound_2D ADNAME = adctrl_bound_2D |
15 |
|
|
cadj SUBROUTINE ctrl_bound_2D INPUT = 1, 2, 3, 4,5,6 |
16 |
|
|
cadj SUBROUTINE ctrl_bound_2D OUTPUT = |
17 |
|
|
cadj SUBROUTINE ctrl_bound_2D ACTIVE = 3 |
18 |
|
|
cadj SUBROUTINE ctrl_bound_2D DEPEND = 1, 2, 4,5,6 |