File |
Line number |
Procedure |
Code |
./pkg/ctrl/ctrl_set_pack_yz.F |
108 |
CTRL_SET_PACK_YZ |
globmskyz(bi,ip,j,bj,jp,k,iobcs) = 0. _d 0 |
./pkg/ctrl/ctrl_set_pack_yz.F |
167 |
CTRL_SET_PACK_YZ |
& Nr, globmskyz(1,1,1,1,1,1,iobcs), iobcs,mythid) |
./pkg/ctrl/ctrl_set_pack_yz.F |
208 |
CTRL_SET_PACK_YZ |
if (globmskyz(bi,ip,j,bj,jp,k,iobcs) .ne. 0. ) then |
./pkg/ctrl/ctrl_set_pack_yz.F |
281 |
CTRL_SET_PACK_YZ |
if (globmskyz(bi,ip,j,bj,jp,k,iobcs) .ne. 0. ) then |
./pkg/ctrl/ctrl_set_pack_yz.F |
74 |
CTRL_SET_PACK_YZ |
_RL globmskyz ( nsx,npx,sny,nsy,npy,nr,nobcs ) |
./pkg/ctrl/ctrl_set_unpack_yz.F |
113 |
CTRL_SET_UNPACK_YZ |
globmskyz(bi,ip,j,bj,jp,k,iobcs) = 0. _d 0 |
./pkg/ctrl/ctrl_set_unpack_yz.F |
172 |
CTRL_SET_UNPACK_YZ |
& Nr, globmskyz(1,1,1,1,1,1,iobcs), iobcs, mythid) |
./pkg/ctrl/ctrl_set_unpack_yz.F |
231 |
CTRL_SET_UNPACK_YZ |
if ( globmskyz(bi,ip,j,bj,jp,k,iobcs) .ne. 0. ) then |
./pkg/ctrl/ctrl_set_unpack_yz.F |
315 |
CTRL_SET_UNPACK_YZ |
if ( globmskyz(bi,ip,j,bj,jp,k,iobcs) .ne. 0. ) then |
./pkg/ctrl/ctrl_set_unpack_yz.F |
72 |
CTRL_SET_UNPACK_YZ |
_RL globmskyz( nsx,npx,sny,nsy,npy,nr,nobcs ) |