File |
Line number |
Procedure |
Code |
./pkg/ctrl/ctrl_set_pack_xyz.F |
310 |
CTRL_SET_PACK_XYZ |
_RL wei3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/ctrl/ctrl_set_pack_xyz.F |
335 |
CTRL_SET_PACK_XYZ |
call ACTIVE_READ_XYZ(weighttype, wei3d, 1, |
./pkg/ctrl/ctrl_set_pack_xyz.F |
338 |
CTRL_SET_PACK_XYZ |
CALL READ_REC_XYZ_RL( weighttype, wei3d, 1, 1, myThid ) |
./pkg/ctrl/ctrl_set_pack_xyz.F |
395 |
CTRL_SET_PACK_XYZ |
& * sqrt(wei3d(i,j,k,bi,bj)) |
./pkg/ctrl/ctrl_set_pack_xyz.F |
403 |
CTRL_SET_PACK_XYZ |
& / sqrt(wei3d(i,j,k,bi,bj)) |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
339 |
CTRL_SET_UNPACK_XYZ |
_RL wei3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
364 |
CTRL_SET_UNPACK_XYZ |
call ACTIVE_READ_XYZ(weighttype, wei3d, 1, |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
367 |
CTRL_SET_UNPACK_XYZ |
CALL READ_REC_XYZ_RL( weighttype, wei3d, 1, 1, myThid ) |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
497 |
CTRL_SET_UNPACK_XYZ |
& / sqrt(wei3d(i,j,k,bi,bj)) |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
505 |
CTRL_SET_UNPACK_XYZ |
& * sqrt(wei3d(i,j,k,bi,bj)) |