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

Diff of /MITgcm/eesupp/src/eesupp.flow

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

revision 1.5 by heimbach, Tue Oct 17 20:21:14 2006 UTC revision 1.15 by jmc, Tue Jul 15 22:00:28 2014 UTC
# Line 1  Line 1 
1    C $Header$
2    C $Name$
3    
4  C---------------------------------------------------------------  C---------------------------------------------------------------
5  C Subroutine barrier is difficult to handle,  C Subroutine barrier is difficult to handle,
6  C it is required but it does not compute values.  C it is required but it does not compute values.
# Line 14  CADJ SUBROUTINE BARRIER ADNAME  = BARRIE Line 17  CADJ SUBROUTINE BARRIER ADNAME  = BARRIE
17  CADJ SUBROUTINE BARRIER FTLNAME = BARRIER  CADJ SUBROUTINE BARRIER FTLNAME = BARRIER
18  CADJ SUBROUTINE BARRIER DEPEND  = 1  CADJ SUBROUTINE BARRIER DEPEND  = 1
19    
20    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 FOOL_THE_COMPILER_RL INPUT   = 1
29    CADJ SUBROUTINE FOOL_THE_COMPILER_RL OUTPUT  =
30    CADJ SUBROUTINE FOOL_THE_COMPILER_RL REQUIRED
31    CADJ SUBROUTINE FOOL_THE_COMPILER_RL INFLUENCED
32    CADJ SUBROUTINE FOOL_THE_COMPILER_RL ADNAME  = FOOL_THE_COMPILER_RL
33    CADJ SUBROUTINE FOOL_THE_COMPILER_RL FTLNAME = FOOL_THE_COMPILER_RL
34    CADJ SUBROUTINE FOOL_THE_COMPILER_RL DEPEND  = 1
35    
36    CADJ SUBROUTINE MEMSYNC INPUT   =
37    CADJ SUBROUTINE MEMSYNC OUTPUT  =
38    CADJ SUBROUTINE MEMSYNC REQUIRED
39    CADJ SUBROUTINE MEMSYNC INFLUENCED
40    CADJ SUBROUTINE MEMSYNC ADNAME  = MEMSYNC
41    CADJ SUBROUTINE MEMSYNC FTLNAME = MEMSYNC
42    CADJ SUBROUTINE MEMSYNC DEPEND  =
43    
44  CADJ SUBROUTINE BARRIER_INIT  INPUT  =  CADJ SUBROUTINE BARRIER_INIT  INPUT  =
45  CADJ SUBROUTINE BARRIER_INIT  OUTPUT =  CADJ SUBROUTINE BARRIER_INIT  OUTPUT =
46    
# Line 24  CADJ SUBROUTINE BAR2_INIT  INPUT  = 1 Line 51  CADJ SUBROUTINE BAR2_INIT  INPUT  = 1
51  CADJ SUBROUTINE BAR2_INIT  OUTPUT =  CADJ SUBROUTINE BAR2_INIT  OUTPUT =
52    
53  CADJ SUBROUTINE BAR_CHECK  INPUT = 1,2  CADJ SUBROUTINE BAR_CHECK  INPUT = 1,2
54  CADJ SUBROUTINE BAR_CHECK  OUTPUT =  CADJ SUBROUTINE BAR_CHECK  OUTPUT =
55    
56  CADJ SUBROUTINE CHECK_THREADS  INPUT  = 1  CADJ SUBROUTINE CHECK_THREADS  INPUT  = 1
57  CADJ SUBROUTINE CHECK_THREADS  OUTPUT =  CADJ SUBROUTINE CHECK_THREADS  OUTPUT =
58    
59  CADJ SUBROUTINE EEDIE  INPUT  =  CADJ SUBROUTINE EEDIE  INPUT  =
60  CADJ SUBROUTINE EEDIE  OUTPUT =  CADJ SUBROUTINE EEDIE  OUTPUT =
61    
62    CADJ SUBROUTINE ALL_PROC_DIE  INPUT  = 1
63    CADJ SUBROUTINE ALL_PROC_DIE  OUTPUT =
64    
65  CADJ FUNCTION   TIMER_INDEX  INPUT  = 1,2,3,4  CADJ FUNCTION   TIMER_INDEX  INPUT  = 1,2,3,4
66  CADJ FUNCTION   TIMER_INDEX  OUTPUT =  CADJ FUNCTION   TIMER_INDEX  OUTPUT =
# Line 54  CADJ SUBROUTINE TIMER_STOP     OUTPUT = Line 83  CADJ SUBROUTINE TIMER_STOP     OUTPUT =
83  CADJ SUBROUTINE PAPIF_flops    INPUT =  CADJ SUBROUTINE PAPIF_flops    INPUT =
84  CADJ SUBROUTINE PAPIF_flops    OUTPUT = 1,2,3,4,5  CADJ SUBROUTINE PAPIF_flops    OUTPUT = 1,2,3,4,5
85    
86    CADJ SUBROUTINE PAPIF_flips    INPUT =
87    CADJ SUBROUTINE PAPIF_flips    OUTPUT = 1,2,3,4,5
88    
89    CADJ SUBROUTINE PAPIF_ipc      INPUT =
90    CADJ SUBROUTINE PAPIF_ipc      OUTPUT = 1,2,3,4,5
91    
92    CADJ FUNCTION   PCLstart       INPUT = 1,2,3,4
93    CADJ FUNCTION   PCLstart       OUTPUT =
94    
95    CADJ FUNCTION   PCLstop        INPUT = 1,4
96    CADJ FUNCTION   PCLstop        OUTPUT = 2,3
97    
98  CADJ SUBROUTINE DATE  INPUT  = 2  CADJ SUBROUTINE DATE  INPUT  = 2
99  CADJ SUBROUTINE DATE  OUTPUT = 1  CADJ SUBROUTINE DATE  OUTPUT = 1
100    
# Line 81  CADJ SUBROUTINE READ_FIELD_XYZR8  OUTPUT Line 122  CADJ SUBROUTINE READ_FIELD_XYZR8  OUTPUT
122  CADJ SUBROUTINE WRITE_FIELD_XYZR8  INPUT  = 1,2,3,4  CADJ SUBROUTINE WRITE_FIELD_XYZR8  INPUT  = 1,2,3,4
123  CADJ SUBROUTINE WRITE_FIELD_XYZR8  OUTPUT =  CADJ SUBROUTINE WRITE_FIELD_XYZR8  OUTPUT =
124    
125    CADJ SUBROUTINE PRINT_MESSAGE  INPUT  = 1,2,3,4
126    CADJ SUBROUTINE PRINT_MESSAGE  OUTPUT =
127    
128  CADJ SUBROUTINE PRINT_ERROR   INPUT  = 1,2  CADJ SUBROUTINE PRINT_ERROR   INPUT  = 1,2
129  CADJ SUBROUTINE PRINT_ERROR   OUTPUT =  CADJ SUBROUTINE PRINT_ERROR   OUTPUT =
130    
131  CADJ SUBROUTINE PRINT_LIST_I  INPUT  = 1,2,3,4,5,6  CADJ SUBROUTINE PRINT_LIST_I  INPUT  = 1,2,3,4,5,6,7
132  CADJ SUBROUTINE PRINT_LIST_I  OUTPUT =  CADJ SUBROUTINE PRINT_LIST_I  OUTPUT =
133    
134  CADJ SUBROUTINE PRINT_LIST_L  INPUT  = 1,2,3,4,5,6  CADJ SUBROUTINE PRINT_LIST_L  INPUT  = 1,2,3,4,5,6,7
135  CADJ SUBROUTINE PRINT_LIST_L  OUTPUT =  CADJ SUBROUTINE PRINT_LIST_L  OUTPUT =
136    
137  CADJ SUBROUTINE PRINT_LIST_I  INPUT  = 1,2,3,4,5,6  CADJ SUBROUTINE PRINT_LIST_RL INPUT  = 1,2,3,4,5,6,7
138  CADJ SUBROUTINE PRINT_LIST_I  OUTPUT =  CADJ SUBROUTINE PRINT_LIST_RL OUTPUT =
   
 CADJ SUBROUTINE PRINT_LIST_R8 INPUT  = 1,2,3,4,5,6  
 CADJ SUBROUTINE PRINT_LIST_R8 OUTPUT =  
139    
140  CADJ SUBROUTINE PRINT_MAPRS INPUT  = 1,2,3,4,5,6,7,8,9,10  CADJ SUBROUTINE PRINT_MAPRS INPUT  = 1,2,3,4,5,6,7,8,9,10
141  CADJ SUBROUTINE PRINT_MAPRS INPUT += 11,12,13,14,15,16,17,18,19,20  CADJ SUBROUTINE PRINT_MAPRS INPUT += 11,12,13,14,15,16,17,18,19,20
# Line 107  CADJ SUBROUTINE PRINT_MAPRL INPUT += 11, Line 147  CADJ SUBROUTINE PRINT_MAPRL INPUT += 11,
147  CADJ SUBROUTINE PRINT_MAPRL INPUT += 21,22,23,24,25,26  CADJ SUBROUTINE PRINT_MAPRL INPUT += 21,22,23,24,25,26
148  CADJ SUBROUTINE PRINT_MAPRL OUTPUT =  CADJ SUBROUTINE PRINT_MAPRL OUTPUT =
149    
 CADJ SUBROUTINE PRINT_MESSAGE  INPUT  = 1,2,3,4  
 CADJ SUBROUTINE PRINT_MESSAGE  OUTPUT =  
   
 CADJ SUBROUTINE NML_FILTER  INPUT  = 1,2,3  
 CADJ SUBROUTINE NML_FILTER  OUTPUT =  
   
150  CADJ SUBROUTINE  mdsfindunit   INPUT  =   2  CADJ SUBROUTINE  mdsfindunit   INPUT  =   2
151  CADJ SUBROUTINE  mdsfindunit   OUTPUT = 1  CADJ SUBROUTINE  mdsfindunit   OUTPUT = 1
152    
# Line 124  CADJ SUBROUTINE mds_byteswapr4  OUTPUT = Line 158  CADJ SUBROUTINE mds_byteswapr4  OUTPUT =
158    
159  CADJ FUNCTION   MASTER_CPU_IO   INPUT  = 1  CADJ FUNCTION   MASTER_CPU_IO   INPUT  = 1
160  CADJ FUNCTION   MASTER_CPU_IO   OUTPUT =  CADJ FUNCTION   MASTER_CPU_IO   OUTPUT =
161    
162    CADJ FUNCTION   MASTER_CPU_THREAD  INPUT  = 1
163    CADJ FUNCTION   MASTER_CPU_THREAD  OUTPUT =
164    
165    C----------------------------------------
166    C subroutine  open_copy_data_file
167    C----------------------------------------
168    CADJ SUBROUTINE OPEN_COPY_DATA_FILE  INPUT  = 1,2,  4
169    CADJ SUBROUTINE OPEN_COPY_DATA_FILE  OUTPUT =     3
170    
171    C-------------------------------------------------------
172    C-- formerly in pkg/autodiff/write_utils.flow (previously: read_write.flow)
173    
174    C----------------------------------------
175    C subroutine  write_1d_i
176    C----------------------------------------
177    CADJ SUBROUTINE WRITE_1D_I  INPUT  = 1,2,3,4,5
178    CADJ SUBROUTINE WRITE_1D_I  OUTPUT =
179    
180    C----------------------------------------
181    C subroutine  write_1d_l
182    C----------------------------------------
183    CADJ SUBROUTINE WRITE_1D_L  INPUT  = 1,2,3,4,5
184    CADJ SUBROUTINE WRITE_1D_L  OUTPUT =
185    
186    C----------------------------------------
187    C subroutine  write_1d_rl
188    C----------------------------------------
189    CADJ SUBROUTINE WRITE_1D_RL INPUT  = 1,2,3,4,5
190    CADJ SUBROUTINE WRITE_1D_RL OUTPUT =
191    
192    C----------------------------------------
193    C subroutine  write_0d_i
194    C----------------------------------------
195    CADJ SUBROUTINE WRITE_0D_I INPUT  = 1,2,3,4
196    CADJ SUBROUTINE WRITE_0D_I OUTPUT =
197    
198    C----------------------------------------
199    C subroutine  write_0d_l
200    C----------------------------------------
201    CADJ SUBROUTINE WRITE_0D_L INPUT  = 1,2,3,4
202    CADJ SUBROUTINE WRITE_0D_L OUTPUT =
203    
204    C----------------------------------------
205    C subroutine  write_0d_r4
206    C----------------------------------------
207    CADJ SUBROUTINE WRITE_0D_R4 INPUT  = 1,2,3,4
208    CADJ SUBROUTINE WRITE_0D_R4 OUTPUT =
209    
210    C----------------------------------------
211    C subroutine  write_0d_r8
212    C----------------------------------------
213    CADJ SUBROUTINE WRITE_0D_R8 INPUT  = 1,2,3,4
214    CADJ SUBROUTINE WRITE_0D_R8 OUTPUT =
215    
216    C----------------------------------------
217    C subroutine  write_0d_rs
218    C----------------------------------------
219    CADJ SUBROUTINE WRITE_0D_RS INPUT  = 1,2,3,4
220    CADJ SUBROUTINE WRITE_0D_RS OUTPUT =
221    
222    C----------------------------------------
223    C subroutine  write_0d_rl
224    C----------------------------------------
225    CADJ SUBROUTINE WRITE_0D_RL INPUT  = 1,2,3,4
226    CADJ SUBROUTINE WRITE_0D_RL OUTPUT =
227    
228    C----------------------------------------
229    C subroutine  write_0d_c
230    C----------------------------------------
231    CADJ SUBROUTINE WRITE_0D_C INPUT  = 1,2,3,4,5
232    CADJ SUBROUTINE WRITE_0D_C OUTPUT =
233    
234    C----------------------------------------
235    C subroutine  write_copy1d_r4
236    C----------------------------------------
237    CADJ SUBROUTINE WRITE_COPY1D_R4 INPUT  =   2,3,4,5,6
238    CADJ SUBROUTINE WRITE_COPY1D_R4 OUTPUT = 1
239    
240    C----------------------------------------
241    C subroutine  write_copy1d_r8
242    C----------------------------------------
243    CADJ SUBROUTINE WRITE_COPY1D_R8 INPUT  =   2,3,4,5,6
244    CADJ SUBROUTINE WRITE_COPY1D_R8 OUTPUT = 1
245    
246    C----------------------------------------
247    C subroutine  write_copy1d_rs
248    C----------------------------------------
249    CADJ SUBROUTINE WRITE_COPY1D_RS INPUT  =   2,3,4,5,6
250    CADJ SUBROUTINE WRITE_COPY1D_RS OUTPUT = 1
251    
252    C-------------------------------------------------------
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.15
  ViewVC Help
Powered by ViewVC 1.1.22