| File |
Line number |
Procedure |
Code |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
385 |
CTRL_SET_PACK_XY |
_RL msk3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
428 |
CTRL_SET_PACK_XY |
call ACTIVE_READ_XYZ(masktype, msk3d, 1, |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
431 |
CTRL_SET_PACK_XY |
CALL READ_REC_XYZ_RL( masktype, msk3d, 1, 1, myThid ) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
460 |
CTRL_SET_PACK_XY |
if (msk3d(i,j,1,bi,bj).EQ.0. _d 0) then |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
529 |
CTRL_SET_PACK_XY |
CALL MDS_PASS_R8TORL( msk2d_buf, msk3d, |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
298 |
CTRL_SET_PACK_XYZ |
_RL msk3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
343 |
CTRL_SET_PACK_XYZ |
call ACTIVE_READ_XYZ(masktype, msk3d, 1, |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
346 |
CTRL_SET_PACK_XYZ |
CALL READ_REC_XYZ_RL( masktype, msk3d, 1, 1, myThid ) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
381 |
CTRL_SET_PACK_XYZ |
if (msk3d(i,j,k,bi,bj).EQ.0. _d 0) then |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
448 |
CTRL_SET_PACK_XYZ |
CALL MDS_PASS_R8TORL( msk2d_buf, msk3d, |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
419 |
CTRL_SET_UNPACK_XY |
_RL msk3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
462 |
CTRL_SET_UNPACK_XY |
call ACTIVE_READ_XYZ(masktype, msk3d, 1, |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
465 |
CTRL_SET_UNPACK_XY |
CALL READ_REC_XYZ_RL( masktype, msk3d, 1, 1, myThid ) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
506 |
CTRL_SET_UNPACK_XY |
CALL MDS_PASS_R8TORL( msk2d_buf, msk3d, |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
564 |
CTRL_SET_UNPACK_XY |
if (msk3d(i,j,1,bi,bj).EQ.0. _d 0) then |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
327 |
CTRL_SET_UNPACK_XYZ |
_RL msk3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
372 |
CTRL_SET_UNPACK_XYZ |
call ACTIVE_READ_XYZ(masktype, msk3d, 1, |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
375 |
CTRL_SET_UNPACK_XYZ |
CALL READ_REC_XYZ_RL( masktype, msk3d, 1, 1, myThid ) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
416 |
CTRL_SET_UNPACK_XYZ |
CALL MDS_PASS_R8TORL( msk2d_buf, msk3d, |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
479 |
CTRL_SET_UNPACK_XYZ |
if (msk3d(i,j,k,bi,bj).EQ.0. _d 0) then |