1 |
C $Header: /u/gcmpack/MITgcm/pkg/autodiff/zero_adj.flow,v 1.2 2007/10/08 23:50:54 jmc Exp $ |
2 |
C $Name: $ |
3 |
|
4 |
c---------------------------------------- |
5 |
c subroutine zero_adj_loc |
6 |
c---------------------------------------- |
7 |
cadj SUBROUTINE zero_adj_loc FTLNAME = g_zero_adj_loc |
8 |
cadj SUBROUTINE zero_adj_loc ADNAME = adzero_adj_loc |
9 |
cadj SUBROUTINE zero_adj_loc INPUT = 1, 2, 3 |
10 |
cadj SUBROUTINE zero_adj_loc OUTPUT = |
11 |
cadj SUBROUTINE zero_adj_loc ACTIVE = 2 |
12 |
cadj SUBROUTINE zero_adj_loc DEPEND = 1, 3 |
13 |
c---------------------------------------- |
14 |
c subroutine zero_adj |
15 |
c---------------------------------------- |
16 |
cadj SUBROUTINE zero_adj FTLNAME = g_zero_adj |
17 |
cadj SUBROUTINE zero_adj ADNAME = adzero_adj |
18 |
cadj SUBROUTINE zero_adj INPUT = 1, 2, 3 |
19 |
cadj SUBROUTINE zero_adj OUTPUT = |
20 |
cadj SUBROUTINE zero_adj ACTIVE = 2 |
21 |
cadj SUBROUTINE zero_adj DEPEND = 1, 3 |