File |
Line number |
Procedure |
Code |
./pkg/ecco/ecco_cost_init_barfiles.F |
122 |
ECCO_COST_INIT_BARFILES |
tmpfldxz (i,k,bi,bj) = 0. _d 0 |
./pkg/ecco/cost_obcsvol.F |
183 |
COST_OBCSVOL |
call ACTIVE_READ_XZ( fnamefldn, tmpfldxz, irec, doglobalread, |
./pkg/ecco/cost_obcsvol.F |
206 |
COST_OBCSVOL |
tmpx = tmpfldxz(i,1,bi,bj) |
./pkg/ecco/cost_obcsvol.F |
226 |
COST_OBCSVOL |
call ACTIVE_READ_XZ( fnameflds, tmpfldxz, irec, doglobalread, |
./pkg/ecco/cost_obcsvol.F |
248 |
COST_OBCSVOL |
tmpx = tmpfldxz(i,1,bi,bj) |
./pkg/grdchk/grdchk_setxx.F |
324 |
GRDCHK_SETXX |
call ACTIVE_READ_XZ_LOC( fname, tmpfldxz, icvrec, |
./pkg/grdchk/grdchk_setxx.F |
328 |
GRDCHK_SETXX |
tmpfldxz( itilepos,layer,itile,jtile ) = xx_comp_ref |
./pkg/grdchk/grdchk_setxx.F |
330 |
GRDCHK_SETXX |
call ACTIVE_WRITE_XZ_LOC( fname, tmpfldxz, icvrec, |
./pkg/grdchk/grdchk_setxx.F |
347 |
GRDCHK_SETXX |
call ACTIVE_READ_XZ_LOC( fname, tmpfldxz, icvrec, |
./pkg/grdchk/grdchk_setxx.F |
351 |
GRDCHK_SETXX |
tmpfldxz( itilepos,layer,itile,jtile ) = xx_comp_ref |
./pkg/grdchk/grdchk_setxx.F |
353 |
GRDCHK_SETXX |
call ACTIVE_WRITE_XZ_LOC( fname, tmpfldxz, icvrec, |
./pkg/grdchk/grdchk_getadxx.F |
238 |
GRDCHK_GETADXX |
call ACTIVE_READ_XZ_LOC( fname, tmpfldxz, icvrec, |
./pkg/grdchk/grdchk_getadxx.F |
242 |
GRDCHK_GETADXX |
xx_comp = tmpfldxz( itilepos,layer,itile,jtile ) |
./pkg/grdchk/grdchk_getadxx.F |
253 |
GRDCHK_GETADXX |
call ACTIVE_READ_XZ_LOC( fname, tmpfldxz, icvrec, |
./pkg/grdchk/grdchk_getadxx.F |
257 |
GRDCHK_GETADXX |
xx_comp = tmpfldxz( itilepos,layer,itile,jtile ) |
./pkg/grdchk/grdchk_get_obcs_mask.F |
104 |
GRDCHK_GET_OBCS_MASK |
& tmpfldxz(i,k,bi,bj) |
./pkg/grdchk/grdchk_get_obcs_mask.F |
73 |
GRDCHK_GET_OBCS_MASK |
call ACTIVE_READ_XZ_LOC( fname, tmpfldxz, iobcs, |
./pkg/grdchk/grdchk_get_obcs_mask.F |
81 |
GRDCHK_GET_OBCS_MASK |
& tmpfldxz(i,k,bi,bj) |
./pkg/grdchk/grdchk_get_obcs_mask.F |
96 |
GRDCHK_GET_OBCS_MASK |
call ACTIVE_READ_XZ_LOC( fname, tmpfldxz, iobcs, |
./pkg/grdchk/grdchk_getxx.F |
347 |
GRDCHK_GETXX |
call ACTIVE_READ_XZ_LOC( fname, tmpfldxz, icvrec, |
./pkg/grdchk/grdchk_getxx.F |
351 |
GRDCHK_GETXX |
xx_comp_ref = tmpfldxz( itilepos,layer,itile,jtile ) |
./pkg/grdchk/grdchk_getxx.F |
353 |
GRDCHK_GETXX |
tmpfldxz( itilepos,layer,itile,jtile ) = xx_comp_pert |
./pkg/grdchk/grdchk_getxx.F |
355 |
GRDCHK_GETXX |
call ACTIVE_WRITE_XZ_LOC( fname, tmpfldxz, icvrec, |
./pkg/grdchk/grdchk_getxx.F |
372 |
GRDCHK_GETXX |
call ACTIVE_READ_XZ_LOC( fname, tmpfldxz, icvrec, |
./pkg/grdchk/grdchk_getxx.F |
376 |
GRDCHK_GETXX |
xx_comp_ref = tmpfldxz( itilepos,layer,itile,jtile ) |
./pkg/grdchk/grdchk_getxx.F |
378 |
GRDCHK_GETXX |
tmpfldxz( itilepos,layer,itile,jtile ) = xx_comp_pert |
./pkg/grdchk/grdchk_getxx.F |
380 |
GRDCHK_GETXX |
call ACTIVE_WRITE_XZ_LOC( fname, tmpfldxz, icvrec, |
./pkg/ctrl/ctrl_obcsvol.F |
168 |
CTRL_OBCSVOL |
call ACTIVE_READ_XZ_LOC(fnamefldn,tmpfldxz, |
./pkg/ctrl/ctrl_obcsvol.F |
186 |
CTRL_OBCSVOL |
tmpx = tmpfldxz(i,k,bi,bj) |
./pkg/ctrl/ctrl_obcsvol.F |
204 |
CTRL_OBCSVOL |
call ACTIVE_READ_XZ_LOC(fnameflds,tmpfldxz, |
./pkg/ctrl/ctrl_obcsvol.F |
222 |
CTRL_OBCSVOL |
tmpx = tmpfldxz(i,k,bi,bj) |
./pkg/ctrl/ctrl_obcsvol.F |
327 |
CTRL_OBCSVOL |
call ACTIVE_READ_XZ_LOC(fnamefldn,tmpfldxz, |
./pkg/ctrl/ctrl_obcsvol.F |
344 |
CTRL_OBCSVOL |
tmpx = tmpfldxz(i,k,bi,bj) |
./pkg/ctrl/ctrl_obcsvol.F |
362 |
CTRL_OBCSVOL |
call ACTIVE_READ_XZ_LOC(fnameflds,tmpfldxz, |
./pkg/ctrl/ctrl_obcsvol.F |
380 |
CTRL_OBCSVOL |
tmpx = tmpfldxz(i,k,bi,bj) |
./pkg/ctrl/ctrl_volflux.F |
168 |
CTRL_VOLFLUX |
call ACTIVE_READ_XZ_LOC(fnamefldn,tmpfldxz, |
./pkg/ctrl/ctrl_volflux.F |
189 |
CTRL_VOLFLUX |
tmpx = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_volflux.F |
216 |
CTRL_VOLFLUX |
call ACTIVE_READ_XZ_LOC(fnameflds,tmpfldxz, |
./pkg/ctrl/ctrl_volflux.F |
236 |
CTRL_VOLFLUX |
tmpx = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl.h |
217 |
NO PROCEDURE |
& tmpfldxz |
./pkg/ctrl/ctrl.h |
222 |
NO PROCEDURE |
_RL tmpfldxz (1-olx:snx+olx,nr,nsx,nsy) |
./pkg/ctrl/ctrl_getobcss.F |
124 |
CTRL_GETOBCSS |
call ACTIVE_READ_XZ_LOC( fnameobcss, tmpfldxz, |
./pkg/ctrl/ctrl_getobcss.F |
142 |
CTRL_GETOBCSS |
vbaro = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcss.F |
143 |
CTRL_GETOBCSS |
tmpfldxz(i,1,bi,bj) = 0.d0 |
./pkg/ctrl/ctrl_getobcss.F |
153 |
CTRL_GETOBCSS |
vtop = tmpfldxz(i,k,bi,bj)* |
./pkg/ctrl/ctrl_getobcss.F |
157 |
CTRL_GETOBCSS |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
./pkg/ctrl/ctrl_getobcss.F |
161 |
CTRL_GETOBCSS |
tmpfldxz(i,1,bi,bj) = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcss.F |
178 |
CTRL_GETOBCSS |
vbaro = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcss.F |
179 |
CTRL_GETOBCSS |
tmpfldxz(i,1,bi,bj) = 0.d0 |
./pkg/ctrl/ctrl_getobcss.F |
189 |
CTRL_GETOBCSS |
vtop = tmpfldxz(i,k,bi,bj)* |
./pkg/ctrl/ctrl_getobcss.F |
193 |
CTRL_GETOBCSS |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
./pkg/ctrl/ctrl_getobcss.F |
197 |
CTRL_GETOBCSS |
tmpfldxz(i,1,bi,bj) = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcss.F |
211 |
CTRL_GETOBCSS |
xx_obcss1(i,k,bi,bj,iobcs) = tmpfldxz (i,k,bi,bj) |
./pkg/ctrl/ctrl_getobcss.F |
225 |
CTRL_GETOBCSS |
tmpfldxz(i,k,bi,bj) = xx_obcss1(i,k,bi,bj,iobcs) |
./pkg/ctrl/ctrl_getobcss.F |
231 |
CTRL_GETOBCSS |
call EXF_SWAPFFIELDS_XZ( tmpfldxz2, tmpfldxz, mythid) |
./pkg/ctrl/ctrl_getobcss.F |
243 |
CTRL_GETOBCSS |
call ACTIVE_READ_XZ_LOC( fnameobcss, tmpfldxz, |
./pkg/ctrl/ctrl_getobcss.F |
261 |
CTRL_GETOBCSS |
vbaro = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcss.F |
262 |
CTRL_GETOBCSS |
tmpfldxz(i,1,bi,bj) = 0.d0 |
./pkg/ctrl/ctrl_getobcss.F |
272 |
CTRL_GETOBCSS |
vtop = tmpfldxz(i,k,bi,bj)* |
./pkg/ctrl/ctrl_getobcss.F |
276 |
CTRL_GETOBCSS |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
./pkg/ctrl/ctrl_getobcss.F |
280 |
CTRL_GETOBCSS |
tmpfldxz(i,1,bi,bj) = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcss.F |
297 |
CTRL_GETOBCSS |
vbaro = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcss.F |
298 |
CTRL_GETOBCSS |
tmpfldxz(i,1,bi,bj) = 0.d0 |
./pkg/ctrl/ctrl_getobcss.F |
308 |
CTRL_GETOBCSS |
vtop = tmpfldxz(i,k,bi,bj)* |
./pkg/ctrl/ctrl_getobcss.F |
312 |
CTRL_GETOBCSS |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
./pkg/ctrl/ctrl_getobcss.F |
316 |
CTRL_GETOBCSS |
tmpfldxz(i,1,bi,bj) = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcss.F |
330 |
CTRL_GETOBCSS |
xx_obcss1 (i,k,bi,bj,iobcs) = tmpfldxz (i,k,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
127 |
CTRL_GETOBCSN |
call ACTIVE_READ_XZ_LOC( fnameobcsn, tmpfldxz, |
./pkg/ctrl/ctrl_getobcsn.F |
144 |
CTRL_GETOBCSN |
vbaro = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
154 |
CTRL_GETOBCSN |
tmpfldxz(i,1,bi,bj) = 0.d0 |
./pkg/ctrl/ctrl_getobcsn.F |
164 |
CTRL_GETOBCSN |
vtop = tmpfldxz(i,k,bi,bj)* |
./pkg/ctrl/ctrl_getobcsn.F |
168 |
CTRL_GETOBCSN |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
./pkg/ctrl/ctrl_getobcsn.F |
172 |
CTRL_GETOBCSN |
tmpfldxz(i,1,bi,bj) = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
188 |
CTRL_GETOBCSN |
vbaro = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
192 |
CTRL_GETOBCSN |
tmpfldxz(i,1,bi,bj) = 0.d0 |
./pkg/ctrl/ctrl_getobcsn.F |
202 |
CTRL_GETOBCSN |
vtop = tmpfldxz(i,k,bi,bj)* |
./pkg/ctrl/ctrl_getobcsn.F |
206 |
CTRL_GETOBCSN |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
./pkg/ctrl/ctrl_getobcsn.F |
210 |
CTRL_GETOBCSN |
tmpfldxz(i,1,bi,bj) = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
225 |
CTRL_GETOBCSN |
xx_obcsn1(i,k,bi,bj,iobcs) = tmpfldxz (i,k,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
239 |
CTRL_GETOBCSN |
tmpfldxz(i,k,bi,bj) = xx_obcsn1(i,k,bi,bj,iobcs) |
./pkg/ctrl/ctrl_getobcsn.F |
245 |
CTRL_GETOBCSN |
call EXF_SWAPFFIELDS_XZ( tmpfldxz2, tmpfldxz, mythid) |
./pkg/ctrl/ctrl_getobcsn.F |
257 |
CTRL_GETOBCSN |
call ACTIVE_READ_XZ_LOC( fnameobcsn, tmpfldxz, |
./pkg/ctrl/ctrl_getobcsn.F |
274 |
CTRL_GETOBCSN |
vbaro = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
285 |
CTRL_GETOBCSN |
tmpfldxz(i,1,bi,bj) = 0.d0 |
./pkg/ctrl/ctrl_getobcsn.F |
295 |
CTRL_GETOBCSN |
vtop = tmpfldxz(i,k,bi,bj)* |
./pkg/ctrl/ctrl_getobcsn.F |
299 |
CTRL_GETOBCSN |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
./pkg/ctrl/ctrl_getobcsn.F |
303 |
CTRL_GETOBCSN |
tmpfldxz(i,1,bi,bj) = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
318 |
CTRL_GETOBCSN |
vbaro = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
322 |
CTRL_GETOBCSN |
tmpfldxz(i,1,bi,bj) = 0.d0 |
./pkg/ctrl/ctrl_getobcsn.F |
332 |
CTRL_GETOBCSN |
vtop = tmpfldxz(i,k,bi,bj)* |
./pkg/ctrl/ctrl_getobcsn.F |
336 |
CTRL_GETOBCSN |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
./pkg/ctrl/ctrl_getobcsn.F |
340 |
CTRL_GETOBCSN |
tmpfldxz(i,1,bi,bj) = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
354 |
CTRL_GETOBCSN |
xx_obcsn1 (i,k,bi,bj,iobcs) = tmpfldxz (i,k,bi,bj) |