/[MITgcm]/MITgcm/eesupp/src/eesupp.flow
ViewVC logotype

Annotation of /MITgcm/eesupp/src/eesupp.flow

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph

Revision 1.14 - (hide annotations) (download)
Mon Dec 13 04:05:15 2010 UTC (13 years, 6 months ago) by jmc
Branch: MAIN
CVS Tags: checkpoint64y, checkpoint64x, checkpoint64z, checkpoint64q, checkpoint64p, checkpoint64s, checkpoint64r, checkpoint64u, checkpoint64t, checkpoint64w, checkpoint64v, checkpoint64i, checkpoint64h, checkpoint64k, checkpoint64j, checkpoint64m, checkpoint64l, checkpoint64o, checkpoint64n, checkpoint64a, checkpoint64c, checkpoint64b, checkpoint64e, checkpoint64d, checkpoint64g, checkpoint64f, checkpoint63p, checkpoint63q, checkpoint63r, checkpoint63s, checkpoint63l, checkpoint63m, checkpoint63n, checkpoint63o, checkpoint63h, checkpoint63i, checkpoint63j, checkpoint63k, checkpoint63d, checkpoint63e, checkpoint63f, checkpoint63g, checkpoint63a, checkpoint63b, checkpoint63c, checkpoint64, checkpoint63, checkpoint62s, checkpoint62r, checkpoint62q, checkpoint62p, checkpoint62w, checkpoint62v, checkpoint62u, checkpoint62t, checkpoint62z, checkpoint62y, checkpoint62x
Changes since 1.13: +1 -4 lines 
remove nml_filter.F (calls to nml_filter were removed ~5 years ago)
1 jmc 1.14 C $Header: /u/gcmpack/MITgcm/eesupp/src/eesupp.flow,v 1.13 2009/05/26 22:56:32 jmc Exp $
2 jmc 1.8 C $Name: $
3    
4 heimbach 1.1 C---------------------------------------------------------------
5     C Subroutine barrier is difficult to handle,
6     C it is required but it does not compute values.
7     C TAMC has been extended to handle such routines
8     C REQUIRED means the call will be included for recomputations
9     C INFLUENCED means if also required
10     C the adjoint routine will be called
11     C---------------------------------------------------------------
12     CADJ SUBROUTINE BARRIER INPUT = 1
13     CADJ SUBROUTINE BARRIER OUTPUT =
14     CADJ SUBROUTINE BARRIER REQUIRED
15     CADJ SUBROUTINE BARRIER INFLUENCED
16     CADJ SUBROUTINE BARRIER ADNAME = BARRIER
17     CADJ SUBROUTINE BARRIER FTLNAME = BARRIER
18     CADJ SUBROUTINE BARRIER DEPEND = 1
19    
20 heimbach 1.6 CADJ SUBROUTINE FOOL_THE_COMPILER INPUT = 1
21     CADJ SUBROUTINE FOOL_THE_COMPILER OUTPUT =
22     CADJ SUBROUTINE FOOL_THE_COMPILER REQUIRED
23     CADJ SUBROUTINE FOOL_THE_COMPILER INFLUENCED
24     CADJ SUBROUTINE FOOL_THE_COMPILER ADNAME = FOOL_THE_COMPILER
25     CADJ SUBROUTINE FOOL_THE_COMPILER FTLNAME = FOOL_THE_COMPILER
26     CADJ SUBROUTINE FOOL_THE_COMPILER DEPEND = 1
27    
28     CADJ SUBROUTINE MEMSYNC INPUT =
29     CADJ SUBROUTINE MEMSYNC OUTPUT =
30     CADJ SUBROUTINE MEMSYNC REQUIRED
31     CADJ SUBROUTINE MEMSYNC INFLUENCED
32     CADJ SUBROUTINE MEMSYNC ADNAME = MEMSYNC
33     CADJ SUBROUTINE MEMSYNC FTLNAME = MEMSYNC
34     CADJ SUBROUTINE MEMSYNC DEPEND =
35    
36 heimbach 1.1 CADJ SUBROUTINE BARRIER_INIT INPUT =
37     CADJ SUBROUTINE BARRIER_INIT OUTPUT =
38    
39     CADJ SUBROUTINE BAR2 INPUT = 1
40     CADJ SUBROUTINE BAR2 OUTPUT =
41    
42     CADJ SUBROUTINE BAR2_INIT INPUT = 1
43     CADJ SUBROUTINE BAR2_INIT OUTPUT =
44    
45 ce107 1.4 CADJ SUBROUTINE BAR_CHECK INPUT = 1,2
46     CADJ SUBROUTINE BAR_CHECK OUTPUT =
47    
48 heimbach 1.1 CADJ SUBROUTINE CHECK_THREADS INPUT = 1
49     CADJ SUBROUTINE CHECK_THREADS OUTPUT =
50    
51     CADJ SUBROUTINE EEDIE INPUT =
52     CADJ SUBROUTINE EEDIE OUTPUT =
53    
54 jmc 1.13 CADJ SUBROUTINE ALL_PROC_DIE INPUT = 1
55     CADJ SUBROUTINE ALL_PROC_DIE OUTPUT =
56    
57 heimbach 1.1
58     CADJ FUNCTION TIMER_INDEX INPUT = 1,2,3,4
59     CADJ FUNCTION TIMER_INDEX OUTPUT =
60    
61     CADJ SUBROUTINE TIMER_CONTROL INPUT = 1,2,3,4
62     CADJ SUBROUTINE TIMER_CONTROL OUTPUT =
63    
64     CADJ SUBROUTINE TIMER_GET_TIME INPUT =
65     CADJ SUBROUTINE TIMER_GET_TIME OUTPUT = 1,2,3
66    
67     CADJ SUBROUTINE TIMER_PRINTALL INPUT = 1
68     CADJ SUBROUTINE TIMER_PRINTALL OUTPUT =
69    
70     CADJ SUBROUTINE TIMER_START INPUT = 1,2
71     CADJ SUBROUTINE TIMER_START OUTPUT =
72    
73     CADJ SUBROUTINE TIMER_STOP INPUT = 1,2
74     CADJ SUBROUTINE TIMER_STOP OUTPUT =
75    
76 ce107 1.3 CADJ SUBROUTINE PAPIF_flops INPUT =
77     CADJ SUBROUTINE PAPIF_flops OUTPUT = 1,2,3,4,5
78 heimbach 1.1
79 ce107 1.7 CADJ SUBROUTINE PAPIF_flips INPUT =
80     CADJ SUBROUTINE PAPIF_flips OUTPUT = 1,2,3,4,5
81    
82     CADJ SUBROUTINE PAPIF_ipc INPUT =
83     CADJ SUBROUTINE PAPIF_ipc OUTPUT = 1,2,3,4,5
84    
85     CADJ FUNCTION PCLstart INPUT = 1,2,3,4
86     CADJ FUNCTION PCLstart OUTPUT =
87    
88     CADJ FUNCTION PCLstop INPUT = 1,4
89     CADJ FUNCTION PCLstop OUTPUT = 2,3
90    
91 heimbach 1.1 CADJ SUBROUTINE DATE INPUT = 2
92     CADJ SUBROUTINE DATE OUTPUT = 1
93    
94     CADJ SUBROUTINE LCASE INPUT = 1
95     CADJ SUBROUTINE LCASE OUTPUT = 1
96    
97     CADJ SUBROUTINE UCASE INPUT = 1
98     CADJ SUBROUTINE UCASE OUTPUT = 1
99    
100     CADJ SUBROUTINE MACHINE INPUT =
101     CADJ SUBROUTINE MACHINE OUTPUT = 1
102    
103     CADJ FUNCTION IFNBLNK INPUT = 1
104     CADJ FUNCTION IFNBLNK OUTPUT =
105    
106     CADJ FUNCTION ILNBLNK INPUT = 1
107     CADJ FUNCTION ILNBLNK OUTPUT =
108    
109     CADJ FUNCTION IO_ERRCOUNT INPUT = 1
110     CADJ FUNCTION IO_ERRCOUNT OUTPUT =
111    
112     CADJ SUBROUTINE READ_FIELD_XYZR8 INPUT = 2,3,4
113     CADJ SUBROUTINE READ_FIELD_XYZR8 OUTPUT = 1
114    
115     CADJ SUBROUTINE WRITE_FIELD_XYZR8 INPUT = 1,2,3,4
116     CADJ SUBROUTINE WRITE_FIELD_XYZR8 OUTPUT =
117    
118    
119 jmc 1.10 CADJ SUBROUTINE PRINT_MESSAGE INPUT = 1,2,3,4
120     CADJ SUBROUTINE PRINT_MESSAGE OUTPUT =
121    
122 heimbach 1.1 CADJ SUBROUTINE PRINT_ERROR INPUT = 1,2
123     CADJ SUBROUTINE PRINT_ERROR OUTPUT =
124    
125 jmc 1.10 CADJ SUBROUTINE PRINT_LIST_I INPUT = 1,2,3,4,5,6,7
126 heimbach 1.1 CADJ SUBROUTINE PRINT_LIST_I OUTPUT =
127    
128 jmc 1.10 CADJ SUBROUTINE PRINT_LIST_L INPUT = 1,2,3,4,5,6,7
129 heimbach 1.1 CADJ SUBROUTINE PRINT_LIST_L OUTPUT =
130    
131 jmc 1.11 CADJ SUBROUTINE PRINT_LIST_RL INPUT = 1,2,3,4,5,6,7
132     CADJ SUBROUTINE PRINT_LIST_RL OUTPUT =
133 heimbach 1.1
134     CADJ SUBROUTINE PRINT_MAPRS INPUT = 1,2,3,4,5,6,7,8,9,10
135     CADJ SUBROUTINE PRINT_MAPRS INPUT += 11,12,13,14,15,16,17,18,19,20
136     CADJ SUBROUTINE PRINT_MAPRS INPUT += 21,22,23,24,25,26
137     CADJ SUBROUTINE PRINT_MAPRS OUTPUT =
138    
139     CADJ SUBROUTINE PRINT_MAPRL INPUT = 1,2,3,4,5,6,7,8,9,10
140     CADJ SUBROUTINE PRINT_MAPRL INPUT += 11,12,13,14,15,16,17,18,19,20
141     CADJ SUBROUTINE PRINT_MAPRL INPUT += 21,22,23,24,25,26
142     CADJ SUBROUTINE PRINT_MAPRL OUTPUT =
143    
144 jmc 1.2 CADJ SUBROUTINE mdsfindunit INPUT = 2
145     CADJ SUBROUTINE mdsfindunit OUTPUT = 1
146    
147     CADJ SUBROUTINE mds_byteswapr8 INPUT = 1,2
148     CADJ SUBROUTINE mds_byteswapr8 OUTPUT = 2
149    
150     CADJ SUBROUTINE mds_byteswapr4 INPUT = 1,2
151     CADJ SUBROUTINE mds_byteswapr4 OUTPUT = 2
152    
153 heimbach 1.5 CADJ FUNCTION MASTER_CPU_IO INPUT = 1
154     CADJ FUNCTION MASTER_CPU_IO OUTPUT =
155 dimitri 1.9
156     CADJ FUNCTION MASTER_CPU_THREAD INPUT = 1
157     CADJ FUNCTION MASTER_CPU_THREAD OUTPUT =
158 jmc 1.12
159     C----------------------------------------
160     C subroutine open_copy_data_file
161     C----------------------------------------
162     CADJ SUBROUTINE OPEN_COPY_DATA_FILE INPUT = 1,2, 4
163     CADJ SUBROUTINE OPEN_COPY_DATA_FILE OUTPUT = 3
164    
165     C-------------------------------------------------------
166     C-- formerly in pkg/autodiff/write_utils.flow (previously: read_write.flow)
167    
168     C----------------------------------------
169     C subroutine write_1d_i
170     C----------------------------------------
171     CADJ SUBROUTINE WRITE_1D_I INPUT = 1,2,3,4,5
172     CADJ SUBROUTINE WRITE_1D_I OUTPUT =
173    
174     C----------------------------------------
175     C subroutine write_1d_l
176     C----------------------------------------
177     CADJ SUBROUTINE WRITE_1D_L INPUT = 1,2,3,4,5
178     CADJ SUBROUTINE WRITE_1D_L OUTPUT =
179    
180     C----------------------------------------
181     C subroutine write_1d_rl
182     C----------------------------------------
183     CADJ SUBROUTINE WRITE_1D_RL INPUT = 1,2,3,4,5
184     CADJ SUBROUTINE WRITE_1D_RL OUTPUT =
185    
186     C----------------------------------------
187     C subroutine write_0d_i
188     C----------------------------------------
189     CADJ SUBROUTINE WRITE_0D_I INPUT = 1,2,3,4
190     CADJ SUBROUTINE WRITE_0D_I OUTPUT =
191    
192     C----------------------------------------
193     C subroutine write_0d_l
194     C----------------------------------------
195     CADJ SUBROUTINE WRITE_0D_L INPUT = 1,2,3,4
196     CADJ SUBROUTINE WRITE_0D_L OUTPUT =
197    
198     C----------------------------------------
199     C subroutine write_0d_r4
200     C----------------------------------------
201     CADJ SUBROUTINE WRITE_0D_R4 INPUT = 1,2,3,4
202     CADJ SUBROUTINE WRITE_0D_R4 OUTPUT =
203    
204     C----------------------------------------
205     C subroutine write_0d_r8
206     C----------------------------------------
207     CADJ SUBROUTINE WRITE_0D_R8 INPUT = 1,2,3,4
208     CADJ SUBROUTINE WRITE_0D_R8 OUTPUT =
209    
210     C----------------------------------------
211     C subroutine write_0d_rs
212     C----------------------------------------
213     CADJ SUBROUTINE WRITE_0D_RS INPUT = 1,2,3,4
214     CADJ SUBROUTINE WRITE_0D_RS OUTPUT =
215    
216     C----------------------------------------
217     C subroutine write_0d_rl
218     C----------------------------------------
219     CADJ SUBROUTINE WRITE_0D_RL INPUT = 1,2,3,4
220     CADJ SUBROUTINE WRITE_0D_RL OUTPUT =
221    
222     C----------------------------------------
223     C subroutine write_0d_c
224     C----------------------------------------
225     CADJ SUBROUTINE WRITE_0D_C INPUT = 1,2,3,4,5
226     CADJ SUBROUTINE WRITE_0D_C OUTPUT =
227    
228     C----------------------------------------
229     C subroutine write_copy1d_r4
230     C----------------------------------------
231     CADJ SUBROUTINE WRITE_COPY1D_R4 INPUT = 2,3,4,5,6
232     CADJ SUBROUTINE WRITE_COPY1D_R4 OUTPUT = 1
233    
234     C----------------------------------------
235     C subroutine write_copy1d_r8
236     C----------------------------------------
237     CADJ SUBROUTINE WRITE_COPY1D_R8 INPUT = 2,3,4,5,6
238     CADJ SUBROUTINE WRITE_COPY1D_R8 OUTPUT = 1
239    
240     C----------------------------------------
241     C subroutine write_copy1d_rs
242     C----------------------------------------
243     CADJ SUBROUTINE WRITE_COPY1D_RS INPUT = 2,3,4,5,6
244     CADJ SUBROUTINE WRITE_COPY1D_RS OUTPUT = 1
245    
246     C-------------------------------------------------------
  ViewVC Help
Powered by ViewVC 1.1.22