| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/ecco_cost_init_barfiles.F |
113 |
ECCO_COST_INIT_BARFILES |
tmpfldyz2(j,k,bi,bj) = 0. _d 0 |
|
./pkg/ctrl/ctrl_getobcsw.F |
232 |
CTRL_GETOBCSW |
call EXF_SWAPFFIELDS_YZ( tmpfldyz2, tmpfldyz, mythid) |
|
./pkg/ctrl/ctrl_getobcsw.F |
238 |
CTRL_GETOBCSW |
xx_obcsw0(j,k,bi,bj,iobcs) = tmpfldyz2(j,k,bi,bj) |
|
./pkg/ctrl/ctrl_getobcse.F |
229 |
CTRL_GETOBCSE |
call EXF_SWAPFFIELDS_YZ( tmpfldyz2, tmpfldyz, mythid) |
|
./pkg/ctrl/ctrl_getobcse.F |
235 |
CTRL_GETOBCSE |
xx_obcse0(j,k,bi,bj,iobcs) = tmpfldyz2(j,k,bi,bj) |
|
./pkg/ctrl/ctrl.h |
220 |
NO PROCEDURE |
& , tmpfldyz2 |
|
./pkg/ctrl/ctrl.h |
225 |
NO PROCEDURE |
_RL tmpfldyz2 (1-oly:sny+oly,nr,nsx,nsy) |