125 |
CADJ SUBROUTINE PRINT_LIST_L INPUT = 1,2,3,4,5,6,7 |
CADJ SUBROUTINE PRINT_LIST_L INPUT = 1,2,3,4,5,6,7 |
126 |
CADJ SUBROUTINE PRINT_LIST_L OUTPUT = |
CADJ SUBROUTINE PRINT_LIST_L OUTPUT = |
127 |
|
|
128 |
CADJ SUBROUTINE PRINT_LIST_R8 INPUT = 1,2,3,4,5,6,7 |
CADJ SUBROUTINE PRINT_LIST_RL INPUT = 1,2,3,4,5,6,7 |
129 |
CADJ SUBROUTINE PRINT_LIST_R8 OUTPUT = |
CADJ SUBROUTINE PRINT_LIST_RL OUTPUT = |
130 |
|
|
131 |
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 |
132 |
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 |
155 |
|
|
156 |
CADJ FUNCTION MASTER_CPU_THREAD INPUT = 1 |
CADJ FUNCTION MASTER_CPU_THREAD INPUT = 1 |
157 |
CADJ FUNCTION MASTER_CPU_THREAD OUTPUT = |
CADJ FUNCTION MASTER_CPU_THREAD OUTPUT = |
158 |
|
|
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------------------------------------------------------- |