| File |
Line number |
Procedure |
Code |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
107 |
CTRL_SET_PACK_XZ |
globmskxz(i,bi,ip,bj,jp,k,iobcs) = 0. _d 0 |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
166 |
CTRL_SET_PACK_XZ |
& Nr, globmskxz(1,1,1,1,1,1,iobcs), iobcs, mythid) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
203 |
CTRL_SET_PACK_XZ |
if (globmskxz(i,bi,ip,bj,jp,k,iobcs) .ne. 0. ) then |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
276 |
CTRL_SET_PACK_XZ |
if (globmskxz(i,bi,ip,bj,jp,k,iobcs) .ne. 0. ) then |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
73 |
CTRL_SET_PACK_XZ |
_RL globmskxz ( snx,nsx,npx,nsy,npy,nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
112 |
CTRL_SET_UNPACK_XZ |
globmskxz(i,bi,ip,bj,jp,k,iobcs) = 0. _d 0 |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
171 |
CTRL_SET_UNPACK_XZ |
& Nr, globmskxz(1,1,1,1,1,1,iobcs), iobcs,mythid) |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
230 |
CTRL_SET_UNPACK_XZ |
if ( globmskxz(i,bi,ip,bj,jp,k,iobcs) .ne. 0. ) then |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
315 |
CTRL_SET_UNPACK_XZ |
if ( globmskxz(i,bi,ip,bj,jp,k,iobcs) .ne. 0. ) then |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
71 |
CTRL_SET_UNPACK_XZ |
_RL globmskxz( snx,nsx,npx,nsy,npy,nr,nobcs ) |