| File |
Line number |
Procedure |
Code |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
222 |
CTRL_SET_PACK_XYZ |
& * sqrt(weightfld(k,bi,bj)) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
230 |
CTRL_SET_PACK_XYZ |
& / sqrt(weightfld(k,bi,bj)) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
381 |
CTRL_SET_PACK_XYZ |
& * sqrt(weightfld(k,bi,bj)) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
389 |
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 |
216 |
CTRL_SET_PACK_XZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
224 |
CTRL_SET_PACK_XZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
289 |
CTRL_SET_PACK_XZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
297 |
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 |
220 |
CTRL_SET_PACK_YZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
228 |
CTRL_SET_PACK_YZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
293 |
CTRL_SET_PACK_YZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
301 |
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 |
130 |
CTRL_SET_UNPACK_XYZ |
print *, 'ph-weight ', weightfld(k,1,1) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
262 |
CTRL_SET_UNPACK_XYZ |
& / sqrt(weightfld(k,bi,bj)) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
270 |
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 |
483 |
CTRL_SET_UNPACK_XYZ |
& / sqrt(weightfld(k,bi,bj)) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
491 |
CTRL_SET_UNPACK_XYZ |
& * sqrt(weightfld(k,bi,bj)) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
8 |
CTRL_SET_UNPACK_XYZ |
& weightfld, nwetglobal, mythid) |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
244 |
CTRL_SET_UNPACK_XZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
327 |
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 |
244 |
CTRL_SET_UNPACK_YZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
326 |
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) |