| File |
Line number |
Procedure |
Code |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
396 |
CTRL_SET_PACK_XY |
_RL wei2d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
420 |
CTRL_SET_PACK_XY |
call ACTIVE_READ_XY(weighttype, wei2d, 1, |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
423 |
CTRL_SET_PACK_XY |
CALL READ_REC_XY_RL( weighttype, wei2d, 1, 1, myThid ) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
484 |
CTRL_SET_PACK_XY |
& fld2dDim(i,j,bi,bj) * sqrt(wei2d(i,j,bi,bj)) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
488 |
CTRL_SET_PACK_XY |
& fld2dDim(i,j,bi,bj) / sqrt(wei2d(i,j,bi,bj)) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
430 |
CTRL_SET_UNPACK_XY |
_RL wei2d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
454 |
CTRL_SET_UNPACK_XY |
call ACTIVE_READ_XY(weighttype, wei2d, 1, |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
457 |
CTRL_SET_UNPACK_XY |
CALL READ_REC_XY_RL( weighttype, wei2d, 1, 1, myThid ) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
592 |
CTRL_SET_UNPACK_XY |
& fld2dNodim(i,j,bi,bj) / sqrt(wei2d(i,j,bi,bj)) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
596 |
CTRL_SET_UNPACK_XY |
& fld2dNodim(i,j,bi,bj) * sqrt(wei2d(i,j,bi,bj)) |