| File |
Line number |
Procedure |
Code |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
226 |
CTRL_SET_PACK_XYZ |
& * sqrt(weightfld(k,bi,bj)) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
234 |
CTRL_SET_PACK_XYZ |
& / sqrt(weightfld(k,bi,bj)) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
397 |
CTRL_SET_PACK_XYZ |
& * sqrt(weightfld(k,bi,bj)) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
405 |
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 |
217 |
CTRL_SET_PACK_XZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
225 |
CTRL_SET_PACK_XZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
290 |
CTRL_SET_PACK_XZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
298 |
CTRL_SET_PACK_XZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
47 |
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 |
221 |
CTRL_SET_PACK_YZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
229 |
CTRL_SET_PACK_YZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
294 |
CTRL_SET_PACK_YZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
302 |
CTRL_SET_PACK_YZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
47 |
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 |
134 |
CTRL_SET_UNPACK_XYZ |
print *, 'ph-weight ', weightfld(k,1,1) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
266 |
CTRL_SET_UNPACK_XYZ |
& / sqrt(weightfld(k,bi,bj)) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
274 |
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 |
499 |
CTRL_SET_UNPACK_XYZ |
& / sqrt(weightfld(k,bi,bj)) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
507 |
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 |
245 |
CTRL_SET_UNPACK_XZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
328 |
CTRL_SET_UNPACK_XZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
46 |
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 |
245 |
CTRL_SET_UNPACK_YZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
327 |
CTRL_SET_UNPACK_YZ |
& sqrt(weightfld(k,iobcs)) |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
46 |
CTRL_SET_UNPACK_YZ |
_RL weightfld( nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
8 |
CTRL_SET_UNPACK_YZ |
& weightfld, nwetglobal, mythid) |