| File |
Line number |
Procedure |
Code |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
205 |
CTRL_SET_PACK_XYZ |
& * sqrt(weightfld(k,bi,bj)) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
213 |
CTRL_SET_PACK_XYZ |
& / sqrt(weightfld(k,bi,bj)) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
43 |
CTRL_SET_PACK_XYZ |
_RL weightfld( nr,nsx,nsy ) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
8 |
CTRL_SET_PACK_XYZ |
& weightfld, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
259 |
CTRL_SET_PACK_XZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
267 |
CTRL_SET_PACK_XZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
355 |
CTRL_SET_PACK_XZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
363 |
CTRL_SET_PACK_XZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
46 |
CTRL_SET_PACK_XZ |
_RL weightfld( nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
8 |
CTRL_SET_PACK_XZ |
& weightfld, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
262 |
CTRL_SET_PACK_YZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
270 |
CTRL_SET_PACK_YZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
360 |
CTRL_SET_PACK_YZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
368 |
CTRL_SET_PACK_YZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
46 |
CTRL_SET_PACK_YZ |
_RL weightfld( nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
8 |
CTRL_SET_PACK_YZ |
& weightfld, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
129 |
CTRL_SET_UNPACK_XYZ |
print *, 'ph-weight ', weightfld(k,1,1) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
244 |
CTRL_SET_UNPACK_XYZ |
& / sqrt(weightfld(k,bi,bj)) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
252 |
CTRL_SET_UNPACK_XYZ |
& * sqrt(weightfld(k,bi,bj)) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
43 |
CTRL_SET_UNPACK_XYZ |
_RL weightfld( nr,nsx,nsy ) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
8 |
CTRL_SET_UNPACK_XYZ |
& weightfld, nwetglobal, mythid) |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
264 |
CTRL_SET_UNPACK_XZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
350 |
CTRL_SET_UNPACK_XZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
45 |
CTRL_SET_UNPACK_XZ |
_RL weightfld( nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
8 |
CTRL_SET_UNPACK_XZ |
& weightfld, nwetglobal, mythid) |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
264 |
CTRL_SET_UNPACK_YZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
347 |
CTRL_SET_UNPACK_YZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
45 |
CTRL_SET_UNPACK_YZ |
_RL weightfld( nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
8 |
CTRL_SET_UNPACK_YZ |
& weightfld, nwetglobal, mythid) |