1 |
C $Header: $ |
2 |
C $Name: $ |
3 |
|
4 |
c---------------------------------------- |
5 |
c subroutine zero_adj_3D |
6 |
c---------------------------------------- |
7 |
cadj SUBROUTINE zero_adj_3D FTLNAME = g_zero_adj_3D |
8 |
cadj SUBROUTINE zero_adj_3D ADNAME = adzero_adj_3D |
9 |
cadj SUBROUTINE zero_adj_3D INPUT = 1, 2, 3, 4 |
10 |
cadj SUBROUTINE zero_adj_3D OUTPUT = |
11 |
cadj SUBROUTINE zero_adj_3D ACTIVE = 3 |
12 |
cadj SUBROUTINE zero_adj_3D DEPEND = 1, 2, 4 |
13 |
c---------------------------------------- |
14 |
c subroutine zero_adj_2D |
15 |
c---------------------------------------- |
16 |
cadj SUBROUTINE zero_adj_2D FTLNAME = g_zero_adj_2D |
17 |
cadj SUBROUTINE zero_adj_2D ADNAME = adzero_adj_2D |
18 |
cadj SUBROUTINE zero_adj_2D INPUT = 1, 2, 3, 4 |
19 |
cadj SUBROUTINE zero_adj_2D OUTPUT = |
20 |
cadj SUBROUTINE zero_adj_2D ACTIVE = 3 |
21 |
cadj SUBROUTINE zero_adj_2D DEPEND = 1, 2, 4 |