| File |
Line number |
Procedure |
Code |
|
./pkg/ctrl/ctrl_set_globfld_xy.F |
55 |
CTRL_SET_GLOBFLD_XY |
_RL globfld3d(1-oLx:sNx+oLx,1-oLy:sNy+oLy,nr,nSx,nSy) |
|
./pkg/ctrl/ctrl_set_globfld_xy.F |
86 |
CTRL_SET_GLOBFLD_XY |
globfld3d(i,j,k,bi,bj) = 0. _d 0 |
|
./pkg/ctrl/ctrl_set_globfld_xy.F |
99 |
CTRL_SET_GLOBFLD_XY |
& Nr, globfld3d, |
|
./pkg/ctrl/ctrl_set_globfld_xyz.F |
49 |
CTRL_SET_GLOBFLD_XYZ |
_RL globfld3d(1-oLx:sNx+oLx,1-oLy:sNy+oLy,nr,nSx,nSy) |
|
./pkg/ctrl/ctrl_set_globfld_xyz.F |
70 |
CTRL_SET_GLOBFLD_XYZ |
globfld3d(i,j,k,bi,bj) = 0. _d 0 |
|
./pkg/ctrl/ctrl_set_globfld_xyz.F |
82 |
CTRL_SET_GLOBFLD_XYZ |
& Nr, globfld3d, |
|
./pkg/ctrl/ctrl_set_globfld_xz.F |
106 |
CTRL_SET_GLOBFLD_XZ |
& Nr, globfld3d, |
|
./pkg/ctrl/ctrl_set_globfld_xz.F |
54 |
CTRL_SET_GLOBFLD_XZ |
_RL globfld3d(1-oLx:sNx+oLx,1-oLy:sNy+oLy,nr,nSx,nSy) |
|
./pkg/ctrl/ctrl_set_globfld_xz.F |
86 |
CTRL_SET_GLOBFLD_XZ |
globfld3d(i,j,k,bi,bj) = 0. _d 0 |
|
./pkg/ctrl/ctrl_set_globfld_yz.F |
107 |
CTRL_SET_GLOBFLD_YZ |
& Nr, globfld3d, |
|
./pkg/ctrl/ctrl_set_globfld_yz.F |
54 |
CTRL_SET_GLOBFLD_YZ |
_RL globfld3d(1-oLx:sNx+oLx,1-oLy:sNy+oLy,nr,nSx,nSy) |
|
./pkg/ctrl/ctrl_set_globfld_yz.F |
87 |
CTRL_SET_GLOBFLD_YZ |
globfld3d(i,j,k,bi,bj) = 0. _d 0 |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
101 |
CTRL_SET_PACK_XY |
globfld3d (i,bi,ip,j,bj,jp,k) = 0. _d 0 |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
161 |
CTRL_SET_PACK_XY |
& Nr, globfld3d, irec, mythid) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
180 |
CTRL_SET_PACK_XY |
& globfld3d(i,bi,ip,j,bj,jp,k) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
186 |
CTRL_SET_PACK_XY |
& globfld3d(i,bi,ip,j,bj,jp,k) * |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
191 |
CTRL_SET_PACK_XY |
& globfld3d(i,bi,ip,j,bj,jp,k) / |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
196 |
CTRL_SET_PACK_XY |
cbuff(cbuffindex) = globfld3d(i,bi,ip,j,bj,jp,k) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
201 |
CTRL_SET_PACK_XY |
& globfld3d(i,bi,ip,j,bj,jp,k) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
205 |
CTRL_SET_PACK_XY |
& globfld3d(i,bi,ip,j,bj,jp,k) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
246 |
CTRL_SET_PACK_XY |
& 1, globfld3d(1,1,1,1,1,1,1), irec, mythid) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
266 |
CTRL_SET_PACK_XY |
& globfld3d(i,bi,ip,j,bj,jp,k) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
272 |
CTRL_SET_PACK_XY |
& globfld3d(i,bi,ip,j,bj,jp,k) * |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
277 |
CTRL_SET_PACK_XY |
& globfld3d(i,bi,ip,j,bj,jp,k) / |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
282 |
CTRL_SET_PACK_XY |
cbuff(cbuffindex) = globfld3d(i,bi,ip,j,bj,jp,k) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
287 |
CTRL_SET_PACK_XY |
& globfld3d(i,bi,ip,j,bj,jp,k) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
291 |
CTRL_SET_PACK_XY |
& globfld3d(i,bi,ip,j,bj,jp,k) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
63 |
CTRL_SET_PACK_XY |
_RL globfld3d( snx,nsx,npx,sny,nsy,npy,nr ) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
110 |
CTRL_SET_PACK_XYZ |
globfld3d (i,bi,ip,j,bj,jp,k) = 0. _d 0 |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
170 |
CTRL_SET_PACK_XYZ |
& Nr, globfld3d, irec, mythid) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
195 |
CTRL_SET_PACK_XYZ |
& globfld3d(i,bi,ip,j,bj,jp,k) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
201 |
CTRL_SET_PACK_XYZ |
& * globfld3d(i,bi,ip,j,bj,jp,k) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
209 |
CTRL_SET_PACK_XYZ |
& * globfld3d(i,bi,ip,j,bj,jp,k) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
220 |
CTRL_SET_PACK_XYZ |
cbuff(cbuffindex) = globfld3d(i,bi,ip,j,bj,jp,k) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
223 |
CTRL_SET_PACK_XYZ |
cbuff(cbuffindex) = globfld3d(i,bi,ip,j,bj,jp,k) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
64 |
CTRL_SET_PACK_XYZ |
_RL globfld3d( snx,nsx,npx,sny,nsy,npy,nr ) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
128 |
CTRL_SET_PACK_XZ |
globfld3d(i,bi,ip,j,bj,jp,k) = 0. _d 0 |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
207 |
CTRL_SET_PACK_XZ |
& nr, globfld3d, irec, mythid) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
223 |
CTRL_SET_PACK_XZ |
globfld3d(i,bi,ip,j,bj,jp,k) = 0. |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
250 |
CTRL_SET_PACK_XZ |
& globfld3d(i,bi,ip,jj,bj,jp,kk) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
255 |
CTRL_SET_PACK_XZ |
& globfld3d(i,bi,ip,jj,bj,jp,kk) * |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
263 |
CTRL_SET_PACK_XZ |
& globfld3d(i,bi,ip,jj,bj,jp,kk) / |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
274 |
CTRL_SET_PACK_XZ |
cbuff(cbuffindex) = globfld3d(i,bi,ip,jj,bj,jp,kk) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
79 |
CTRL_SET_PACK_XZ |
_RL globfld3d ( snx,nsx,npx,sny,nsy,npy,nr ) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
126 |
CTRL_SET_PACK_YZ |
globfld3d(i,bi,ip,j,bj,jp,k) = 0. _d 0 |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
225 |
CTRL_SET_PACK_YZ |
globfld3d(i,bi,ip,j,bj,jp,k) = 0. |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
253 |
CTRL_SET_PACK_YZ |
& globfld3d(ii,bi,ip,jj,bj,jp,kk) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
258 |
CTRL_SET_PACK_YZ |
& globfld3d(ii,bi,ip,jj,bj,jp,kk) * |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
266 |
CTRL_SET_PACK_YZ |
& globfld3d(ii,bi,ip,jj,bj,jp,kk) / |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
277 |
CTRL_SET_PACK_YZ |
cbuff(cbuffindex) = globfld3d(ii,bi,ip,jj,bj,jp,kk) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
77 |
CTRL_SET_PACK_YZ |
_RL globfld3d ( snx,nsx,npx,sny,nsy,npy,nr ) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
103 |
CTRL_SET_UNPACK_XY |
globfld3d (i,bi,ip,j,bj,jp,k) = 0. _d 0 |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
203 |
CTRL_SET_UNPACK_XY |
globfld3d(i,bi,ip,j,bj,jp,k) = cbuff(cbuffindex) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
209 |
CTRL_SET_UNPACK_XY |
globfld3d(i,bi,ip,j,bj,jp,k) = |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
219 |
CTRL_SET_UNPACK_XY |
globfld3d(i,bi,ip,j,bj,jp,k) = |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
220 |
CTRL_SET_UNPACK_XY |
& globfld3d(i,bi,ip,j,bj,jp,k)/ |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
224 |
CTRL_SET_UNPACK_XY |
globfld3d(i,bi,ip,j,bj,jp,k) = |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
225 |
CTRL_SET_UNPACK_XY |
& globfld3d(i,bi,ip,j,bj,jp,k)* |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
232 |
CTRL_SET_UNPACK_XY |
globfld3d(i,bi,ip,j,bj,jp,k) = |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
233 |
CTRL_SET_UNPACK_XY |
& globfld3d(i,bi,ip,j,bj,jp,k) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
236 |
CTRL_SET_UNPACK_XY |
globfld3d(i,bi,ip,j,bj,jp,k) = |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
237 |
CTRL_SET_UNPACK_XY |
& globfld3d(i,bi,ip,j,bj,jp,k) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
242 |
CTRL_SET_UNPACK_XY |
globfld3d(i,bi,ip,j,bj,jp,k) = 0. _d 0 |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
246 |
CTRL_SET_UNPACK_XY |
& globfld3d(i,bi,ip,j,bj,jp,k) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
263 |
CTRL_SET_UNPACK_XY |
& NR, globfld3d, |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
311 |
CTRL_SET_UNPACK_XY |
globfld3d(i,bi,ip,j,bj,jp,k) = cbuff(cbuffindex) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
317 |
CTRL_SET_UNPACK_XY |
globfld3d(i,bi,ip,j,bj,jp,k) = |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
327 |
CTRL_SET_UNPACK_XY |
globfld3d(i,bi,ip,j,bj,jp,k) = |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
328 |
CTRL_SET_UNPACK_XY |
& globfld3d(i,bi,ip,j,bj,jp,k)/ |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
332 |
CTRL_SET_UNPACK_XY |
globfld3d(i,bi,ip,j,bj,jp,k) = |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
333 |
CTRL_SET_UNPACK_XY |
& globfld3d(i,bi,ip,j,bj,jp,k)* |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
340 |
CTRL_SET_UNPACK_XY |
globfld3d(i,bi,ip,j,bj,jp,k) = |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
341 |
CTRL_SET_UNPACK_XY |
& globfld3d(i,bi,ip,j,bj,jp,k) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
344 |
CTRL_SET_UNPACK_XY |
globfld3d(i,bi,ip,j,bj,jp,k) = |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
345 |
CTRL_SET_UNPACK_XY |
& globfld3d(i,bi,ip,j,bj,jp,k) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
350 |
CTRL_SET_UNPACK_XY |
globfld3d(i,bi,ip,j,bj,jp,k) = 0. _d 0 |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
354 |
CTRL_SET_UNPACK_XY |
& globfld3d(i,bi,ip,j,bj,jp,k) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
371 |
CTRL_SET_UNPACK_XY |
& 1, globfld3d(1,1,1,1,1,1,1), |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
64 |
CTRL_SET_UNPACK_XY |
_RL globfld3d( snx,nsx,npx,sny,nsy,npy,nr ) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
111 |
CTRL_SET_UNPACK_XYZ |
globfld3d (i,bi,ip,j,bj,jp,k) = 0. _d 0 |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
223 |
CTRL_SET_UNPACK_XYZ |
globfld3d(i,bi,ip,j,bj,jp,k) = cbuff(cbuffindex) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
229 |
CTRL_SET_UNPACK_XYZ |
globfld3d(i,bi,ip,j,bj,jp,k) = |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
239 |
CTRL_SET_UNPACK_XYZ |
globfld3d(i,bi,ip,j,bj,jp,k) = delZnorm |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
240 |
CTRL_SET_UNPACK_XYZ |
& * globfld3d(i,bi,ip,j,bj,jp,k) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
247 |
CTRL_SET_UNPACK_XYZ |
globfld3d(i,bi,ip,j,bj,jp,k) = delZnorm |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
248 |
CTRL_SET_UNPACK_XYZ |
& * globfld3d(i,bi,ip,j,bj,jp,k) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
258 |
CTRL_SET_UNPACK_XYZ |
globfld3d(i,bi,ip,j,bj,jp,k) = 0. _d 0 |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
262 |
CTRL_SET_UNPACK_XYZ |
& globfld3d(i,bi,ip,j,bj,jp,k) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
279 |
CTRL_SET_UNPACK_XYZ |
& Nr, globfld3d, |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
64 |
CTRL_SET_UNPACK_XYZ |
_RL globfld3d( snx,nsx,npx,sny,nsy,npy,nr ) |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
131 |
CTRL_SET_UNPACK_XZ |
globfld3d(i,bi,ip,j,bj,jp,k) = 0. _d 0 |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
252 |
CTRL_SET_UNPACK_XZ |
globfld3d(i,bi,ip,jj,bj,jp,kk) = |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
259 |
CTRL_SET_UNPACK_XZ |
globfld3d(i,bi,ip,jj,bj,jp,kk) = |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
260 |
CTRL_SET_UNPACK_XZ |
& globfld3d(i,bi,ip,jj,bj,jp,kk)/ |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
268 |
CTRL_SET_UNPACK_XZ |
globfld3d(i,bi,ip,jj,bj,jp,kk) = 0. _d 0 |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
272 |
CTRL_SET_UNPACK_XZ |
& globfld3d(i,bi,ip,jj,bj,jp,kk) |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
291 |
CTRL_SET_UNPACK_XZ |
& Nr, globfld3d, irec, |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
71 |
CTRL_SET_UNPACK_XZ |
_RL globfld3d( snx,nsx,npx,sny,nsy,npy,nr ) |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
131 |
CTRL_SET_UNPACK_YZ |
globfld3d(i,bi,ip,j,bj,jp,k) = 0. _d 0 |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
252 |
CTRL_SET_UNPACK_YZ |
globfld3d(ii,bi,ip,jj,bj,jp,kk) = |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
259 |
CTRL_SET_UNPACK_YZ |
globfld3d(ii,bi,ip,jj,bj,jp,kk) = |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
260 |
CTRL_SET_UNPACK_YZ |
& globfld3d(ii,bi,ip,jj,bj,jp,kk)/ |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
268 |
CTRL_SET_UNPACK_YZ |
globfld3d(ii,bi,ip,jj,bj,jp,kk) = 0. _d 0 |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
272 |
CTRL_SET_UNPACK_YZ |
& globfld3d(ii,bi,ip,jj,bj,jp,kk) |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
291 |
CTRL_SET_UNPACK_YZ |
& Nr, globfld3d, irec, |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
71 |
CTRL_SET_UNPACK_YZ |
_RL globfld3d( snx,nsx,npx,sny,nsy,npy,nr ) |