File |
Line number |
Procedure |
Code |
./pkg/grdchk/grdchk_get_obcs_mask.F |
105 |
GRDCHK_GET_OBCS_MASK |
& tmpfldxz(i,k,bi,bj) |
./pkg/grdchk/grdchk_get_obcs_mask.F |
74 |
GRDCHK_GET_OBCS_MASK |
call ACTIVE_READ_XZ( fname, tmpfldxz, iobcs, |
./pkg/grdchk/grdchk_get_obcs_mask.F |
82 |
GRDCHK_GET_OBCS_MASK |
& tmpfldxz(i,k,bi,bj) |
./pkg/grdchk/grdchk_get_obcs_mask.F |
97 |
GRDCHK_GET_OBCS_MASK |
call ACTIVE_READ_XZ( fname, tmpfldxz, iobcs, |
./pkg/grdchk/grdchk_getadxx.F |
211 |
GRDCHK_GETADXX |
call ACTIVE_READ_XZ( fname, tmpfldxz, icvrec, |
./pkg/grdchk/grdchk_getadxx.F |
215 |
GRDCHK_GETADXX |
xx_comp = tmpfldxz( itilepos,layer,itile,jtile ) |
./pkg/grdchk/grdchk_getadxx.F |
226 |
GRDCHK_GETADXX |
call ACTIVE_READ_XZ( fname, tmpfldxz, icvrec, |
./pkg/grdchk/grdchk_getadxx.F |
230 |
GRDCHK_GETADXX |
xx_comp = tmpfldxz( itilepos,layer,itile,jtile ) |
./pkg/grdchk/grdchk_getxx.F |
308 |
GRDCHK_GETXX |
call ACTIVE_READ_XZ( fname, tmpfldxz, icvrec, |
./pkg/grdchk/grdchk_getxx.F |
312 |
GRDCHK_GETXX |
xx_comp_ref = tmpfldxz( itilepos,layer,itile,jtile ) |
./pkg/grdchk/grdchk_getxx.F |
314 |
GRDCHK_GETXX |
tmpfldxz( itilepos,layer,itile,jtile ) = xx_comp_pert |
./pkg/grdchk/grdchk_getxx.F |
316 |
GRDCHK_GETXX |
call ACTIVE_WRITE_XZ( fname, tmpfldxz, icvrec, |
./pkg/grdchk/grdchk_getxx.F |
333 |
GRDCHK_GETXX |
call ACTIVE_READ_XZ( fname, tmpfldxz, icvrec, |
./pkg/grdchk/grdchk_getxx.F |
337 |
GRDCHK_GETXX |
xx_comp_ref = tmpfldxz( itilepos,layer,itile,jtile ) |
./pkg/grdchk/grdchk_getxx.F |
339 |
GRDCHK_GETXX |
tmpfldxz( itilepos,layer,itile,jtile ) = xx_comp_pert |
./pkg/grdchk/grdchk_getxx.F |
341 |
GRDCHK_GETXX |
call ACTIVE_WRITE_XZ( fname, tmpfldxz, icvrec, |
./pkg/grdchk/grdchk_setxx.F |
285 |
GRDCHK_SETXX |
call ACTIVE_READ_XZ( fname, tmpfldxz, icvrec, |
./pkg/grdchk/grdchk_setxx.F |
289 |
GRDCHK_SETXX |
tmpfldxz( itilepos,layer,itile,jtile ) = xx_comp_ref |
./pkg/grdchk/grdchk_setxx.F |
291 |
GRDCHK_SETXX |
call ACTIVE_WRITE_XZ( fname, tmpfldxz, icvrec, |
./pkg/grdchk/grdchk_setxx.F |
308 |
GRDCHK_SETXX |
call ACTIVE_READ_XZ( fname, tmpfldxz, icvrec, |
./pkg/grdchk/grdchk_setxx.F |
312 |
GRDCHK_SETXX |
tmpfldxz( itilepos,layer,itile,jtile ) = xx_comp_ref |
./pkg/grdchk/grdchk_setxx.F |
314 |
GRDCHK_SETXX |
call ACTIVE_WRITE_XZ( fname, tmpfldxz, icvrec, |
./pkg/ctrl/ctrl.h |
314 |
NO PROCEDURE |
& tmpfldxz |
./pkg/ctrl/ctrl.h |
319 |
NO PROCEDURE |
_RL tmpfldxz (1-olx:snx+olx,nr,nsx,nsy) |
./pkg/ctrl/ctrl_getobcsn.F |
129 |
CTRL_GETOBCSN |
call ACTIVE_READ_XZ( fnameobcsn, tmpfldxz, |
./pkg/ctrl/ctrl_getobcsn.F |
146 |
CTRL_GETOBCSN |
vbaro = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
156 |
CTRL_GETOBCSN |
tmpfldxz(i,1,bi,bj) = 0.d0 |
./pkg/ctrl/ctrl_getobcsn.F |
166 |
CTRL_GETOBCSN |
vtop = tmpfldxz(i,k,bi,bj)* |
./pkg/ctrl/ctrl_getobcsn.F |
170 |
CTRL_GETOBCSN |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
./pkg/ctrl/ctrl_getobcsn.F |
174 |
CTRL_GETOBCSN |
tmpfldxz(i,1,bi,bj) = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
190 |
CTRL_GETOBCSN |
vbaro = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
194 |
CTRL_GETOBCSN |
tmpfldxz(i,1,bi,bj) = 0.d0 |
./pkg/ctrl/ctrl_getobcsn.F |
204 |
CTRL_GETOBCSN |
vtop = tmpfldxz(i,k,bi,bj)* |
./pkg/ctrl/ctrl_getobcsn.F |
208 |
CTRL_GETOBCSN |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
./pkg/ctrl/ctrl_getobcsn.F |
212 |
CTRL_GETOBCSN |
tmpfldxz(i,1,bi,bj) = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
227 |
CTRL_GETOBCSN |
xx_obcsn1(i,k,bi,bj,iobcs) = tmpfldxz (i,k,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
241 |
CTRL_GETOBCSN |
tmpfldxz(i,k,bi,bj) = xx_obcsn1(i,k,bi,bj,iobcs) |
./pkg/ctrl/ctrl_getobcsn.F |
247 |
CTRL_GETOBCSN |
call EXF_SWAPFFIELDS_XZ( tmpfldxz2, tmpfldxz, mythid) |
./pkg/ctrl/ctrl_getobcsn.F |
259 |
CTRL_GETOBCSN |
call ACTIVE_READ_XZ( fnameobcsn, tmpfldxz, |
./pkg/ctrl/ctrl_getobcsn.F |
276 |
CTRL_GETOBCSN |
vbaro = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
287 |
CTRL_GETOBCSN |
tmpfldxz(i,1,bi,bj) = 0.d0 |
./pkg/ctrl/ctrl_getobcsn.F |
297 |
CTRL_GETOBCSN |
vtop = tmpfldxz(i,k,bi,bj)* |
./pkg/ctrl/ctrl_getobcsn.F |
301 |
CTRL_GETOBCSN |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
./pkg/ctrl/ctrl_getobcsn.F |
305 |
CTRL_GETOBCSN |
tmpfldxz(i,1,bi,bj) = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
320 |
CTRL_GETOBCSN |
vbaro = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
324 |
CTRL_GETOBCSN |
tmpfldxz(i,1,bi,bj) = 0.d0 |
./pkg/ctrl/ctrl_getobcsn.F |
334 |
CTRL_GETOBCSN |
vtop = tmpfldxz(i,k,bi,bj)* |
./pkg/ctrl/ctrl_getobcsn.F |
338 |
CTRL_GETOBCSN |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
./pkg/ctrl/ctrl_getobcsn.F |
342 |
CTRL_GETOBCSN |
tmpfldxz(i,1,bi,bj) = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
356 |
CTRL_GETOBCSN |
xx_obcsn1 (i,k,bi,bj,iobcs) = tmpfldxz (i,k,bi,bj) |
./pkg/ctrl/ctrl_getobcss.F |
126 |
CTRL_GETOBCSS |
call ACTIVE_READ_XZ( fnameobcss, tmpfldxz, |
./pkg/ctrl/ctrl_getobcss.F |
144 |
CTRL_GETOBCSS |
vbaro = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcss.F |
145 |
CTRL_GETOBCSS |
tmpfldxz(i,1,bi,bj) = 0.d0 |
./pkg/ctrl/ctrl_getobcss.F |
155 |
CTRL_GETOBCSS |
vtop = tmpfldxz(i,k,bi,bj)* |
./pkg/ctrl/ctrl_getobcss.F |
159 |
CTRL_GETOBCSS |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
./pkg/ctrl/ctrl_getobcss.F |
163 |
CTRL_GETOBCSS |
tmpfldxz(i,1,bi,bj) = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcss.F |
180 |
CTRL_GETOBCSS |
vbaro = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcss.F |
181 |
CTRL_GETOBCSS |
tmpfldxz(i,1,bi,bj) = 0.d0 |
./pkg/ctrl/ctrl_getobcss.F |
191 |
CTRL_GETOBCSS |
vtop = tmpfldxz(i,k,bi,bj)* |
./pkg/ctrl/ctrl_getobcss.F |
195 |
CTRL_GETOBCSS |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
./pkg/ctrl/ctrl_getobcss.F |
199 |
CTRL_GETOBCSS |
tmpfldxz(i,1,bi,bj) = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcss.F |
213 |
CTRL_GETOBCSS |
xx_obcss1(i,k,bi,bj,iobcs) = tmpfldxz (i,k,bi,bj) |
./pkg/ctrl/ctrl_getobcss.F |
227 |
CTRL_GETOBCSS |
tmpfldxz(i,k,bi,bj) = xx_obcss1(i,k,bi,bj,iobcs) |
./pkg/ctrl/ctrl_getobcss.F |
233 |
CTRL_GETOBCSS |
call EXF_SWAPFFIELDS_XZ( tmpfldxz2, tmpfldxz, mythid) |
./pkg/ctrl/ctrl_getobcss.F |
245 |
CTRL_GETOBCSS |
call ACTIVE_READ_XZ( fnameobcss, tmpfldxz, |
./pkg/ctrl/ctrl_getobcss.F |
263 |
CTRL_GETOBCSS |
vbaro = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcss.F |
264 |
CTRL_GETOBCSS |
tmpfldxz(i,1,bi,bj) = 0.d0 |
./pkg/ctrl/ctrl_getobcss.F |
274 |
CTRL_GETOBCSS |
vtop = tmpfldxz(i,k,bi,bj)* |
./pkg/ctrl/ctrl_getobcss.F |
278 |
CTRL_GETOBCSS |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
./pkg/ctrl/ctrl_getobcss.F |
282 |
CTRL_GETOBCSS |
tmpfldxz(i,1,bi,bj) = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcss.F |
299 |
CTRL_GETOBCSS |
vbaro = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcss.F |
300 |
CTRL_GETOBCSS |
tmpfldxz(i,1,bi,bj) = 0.d0 |
./pkg/ctrl/ctrl_getobcss.F |
310 |
CTRL_GETOBCSS |
vtop = tmpfldxz(i,k,bi,bj)* |
./pkg/ctrl/ctrl_getobcss.F |
314 |
CTRL_GETOBCSS |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
./pkg/ctrl/ctrl_getobcss.F |
318 |
CTRL_GETOBCSS |
tmpfldxz(i,1,bi,bj) = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_getobcss.F |
332 |
CTRL_GETOBCSS |
xx_obcss1 (i,k,bi,bj,iobcs) = tmpfldxz (i,k,bi,bj) |
./pkg/ctrl/ctrl_obcsvol.F |
170 |
CTRL_OBCSVOL |
call ACTIVE_READ_XZ(fnamefldn,tmpfldxz, |
./pkg/ctrl/ctrl_obcsvol.F |
188 |
CTRL_OBCSVOL |
tmpx = tmpfldxz(i,k,bi,bj) |
./pkg/ctrl/ctrl_obcsvol.F |
206 |
CTRL_OBCSVOL |
call ACTIVE_READ_XZ(fnameflds,tmpfldxz, |
./pkg/ctrl/ctrl_obcsvol.F |
224 |
CTRL_OBCSVOL |
tmpx = tmpfldxz(i,k,bi,bj) |
./pkg/ctrl/ctrl_obcsvol.F |
329 |
CTRL_OBCSVOL |
call ACTIVE_READ_XZ(fnamefldn,tmpfldxz, |
./pkg/ctrl/ctrl_obcsvol.F |
346 |
CTRL_OBCSVOL |
tmpx = tmpfldxz(i,k,bi,bj) |
./pkg/ctrl/ctrl_obcsvol.F |
364 |
CTRL_OBCSVOL |
call ACTIVE_READ_XZ(fnameflds,tmpfldxz, |
./pkg/ctrl/ctrl_obcsvol.F |
382 |
CTRL_OBCSVOL |
tmpx = tmpfldxz(i,k,bi,bj) |
./pkg/ctrl/ctrl_volflux.F |
170 |
CTRL_VOLFLUX |
call ACTIVE_READ_XZ(fnamefldn,tmpfldxz, |
./pkg/ctrl/ctrl_volflux.F |
191 |
CTRL_VOLFLUX |
tmpx = tmpfldxz(i,1,bi,bj) |
./pkg/ctrl/ctrl_volflux.F |
218 |
CTRL_VOLFLUX |
call ACTIVE_READ_XZ(fnameflds,tmpfldxz, |
./pkg/ctrl/ctrl_volflux.F |
238 |
CTRL_VOLFLUX |
tmpx = tmpfldxz(i,1,bi,bj) |
./pkg/ecco/cost_obcsvol.F |
185 |
COST_OBCSVOL |
call ACTIVE_READ_XZ( fnamefldn, tmpfldxz, irec, doglobalread, |
./pkg/ecco/cost_obcsvol.F |
208 |
COST_OBCSVOL |
tmpx = tmpfldxz(i,1,bi,bj) |
./pkg/ecco/cost_obcsvol.F |
228 |
COST_OBCSVOL |
call ACTIVE_READ_XZ( fnameflds, tmpfldxz, irec, doglobalread, |
./pkg/ecco/cost_obcsvol.F |
250 |
COST_OBCSVOL |
tmpx = tmpfldxz(i,1,bi,bj) |
./pkg/ecco/ecco_cost_init_barfiles.F |
147 |
ECCO_COST_INIT_BARFILES |
tmpfldxz (i,k,bi,bj) = 0. _d 0 |