| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/ecco_cost_init_barfiles.F |
123 |
ECCO_COST_INIT_BARFILES |
tmpfldxz2(i,k,bi,bj) = 0. _d 0 |
|
./pkg/ctrl/ctrl.h |
218 |
NO PROCEDURE |
& , tmpfldxz2 |
|
./pkg/ctrl/ctrl.h |
223 |
NO PROCEDURE |
_RL tmpfldxz2 (1-olx:snx+olx,nr,nsx,nsy) |
|
./pkg/ctrl/ctrl_getobcss.F |
231 |
CTRL_GETOBCSS |
call EXF_SWAPFFIELDS_XZ( tmpfldxz2, tmpfldxz, mythid) |
|
./pkg/ctrl/ctrl_getobcss.F |
237 |
CTRL_GETOBCSS |
xx_obcss0(i,k,bi,bj,iobcs) = tmpfldxz2(i,k,bi,bj) |
|
./pkg/ctrl/ctrl_getobcsn.F |
245 |
CTRL_GETOBCSN |
call EXF_SWAPFFIELDS_XZ( tmpfldxz2, tmpfldxz, mythid) |
|
./pkg/ctrl/ctrl_getobcsn.F |
251 |
CTRL_GETOBCSN |
xx_obcsn0(i,k,bi,bj,iobcs) = tmpfldxz2(i,k,bi,bj) |