| File |
Line number |
Procedure |
Code |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
101 |
CTRL_SET_UNPACK_XZ |
globmskxz(i,bi,ip,bj,jp,k,iobcs) = 0. _d 0 |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
132 |
CTRL_SET_UNPACK_XZ |
& Nr, globmskxz(1,1,1,1,1,1,iobcs), iobcs,mythid) |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
200 |
CTRL_SET_UNPACK_XZ |
if ( globmskxz(i,bi,ip,bj,jp,k,iobcs) .ne. 0. ) then |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
273 |
CTRL_SET_UNPACK_XZ |
if ( globmskxz(i,bi,ip,bj,jp,k,iobcs) .ne. 0. ) then |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
65 |
CTRL_SET_UNPACK_XZ |
_RL globmskxz( snx,nsx,npx,nsy,npy,nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
101 |
CTRL_SET_PACK_XZ |
globmskxz(i,bi,ip,bj,jp,k,iobcs) = 0. _d 0 |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
132 |
CTRL_SET_PACK_XZ |
& Nr, globmskxz(1,1,1,1,1,1,iobcs), iobcs, mythid) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
200 |
CTRL_SET_PACK_XZ |
if (globmskxz(i,bi,ip,bj,jp,k,iobcs) .ne. 0. ) then |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
282 |
CTRL_SET_PACK_XZ |
if (globmskxz(i,bi,ip,bj,jp,k,iobcs) .ne. 0. ) then |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
71 |
CTRL_SET_PACK_XZ |
_RL globmskxz ( snx,nsx,npx,nsy,npy,nr,nobcs ) |