File |
Line number |
Procedure |
Code |
./pkg/ctrl/ctrl_set_pack_xy.F |
401 |
CTRL_SET_PACK_XY |
_RL delZnorm |
./pkg/ctrl/ctrl_set_pack_xyz.F |
100 |
CTRL_SET_PACK_XYZ |
delZnorm = 0. |
./pkg/ctrl/ctrl_set_pack_xyz.F |
102 |
CTRL_SET_PACK_XYZ |
delZnorm = delZnorm + delR(k)/FLOAT(Nr) |
./pkg/ctrl/ctrl_set_pack_xyz.F |
201 |
CTRL_SET_PACK_XYZ |
delZnorm = (delR(1)/delR(k))**delZexp |
./pkg/ctrl/ctrl_set_pack_xyz.F |
203 |
CTRL_SET_PACK_XYZ |
delZnorm = 1. _d 0 |
./pkg/ctrl/ctrl_set_pack_xyz.F |
221 |
CTRL_SET_PACK_XYZ |
cbuff(cbuffindex) = 1/delZnorm |
./pkg/ctrl/ctrl_set_pack_xyz.F |
229 |
CTRL_SET_PACK_XYZ |
cbuff(cbuffindex) = delZnorm |
./pkg/ctrl/ctrl_set_pack_xyz.F |
316 |
CTRL_SET_PACK_XYZ |
_RL delZnorm |
./pkg/ctrl/ctrl_set_pack_xyz.F |
375 |
CTRL_SET_PACK_XYZ |
delZnorm = (delR(1)/delR(k))**delZexp |
./pkg/ctrl/ctrl_set_pack_xyz.F |
377 |
CTRL_SET_PACK_XYZ |
delZnorm = 1. _d 0 |
./pkg/ctrl/ctrl_set_pack_xyz.F |
393 |
CTRL_SET_PACK_XYZ |
& fld3dDim(i,j,k,bi,bj) / delZnorm |
./pkg/ctrl/ctrl_set_pack_xyz.F |
401 |
CTRL_SET_PACK_XYZ |
& fld3dDim(i,j,k,bi,bj) * delZnorm |
./pkg/ctrl/ctrl_set_pack_xyz.F |
74 |
CTRL_SET_PACK_XYZ |
_RL delZnorm |
./pkg/ctrl/ctrl_set_unpack_xy.F |
435 |
CTRL_SET_UNPACK_XY |
_RL delZnorm |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
100 |
CTRL_SET_UNPACK_XYZ |
delZnorm = 0. |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
102 |
CTRL_SET_UNPACK_XYZ |
delZnorm = delZnorm + delR(k)/FLOAT(Nr) |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
133 |
CTRL_SET_UNPACK_XYZ |
print *, 'ph-delznorm ', k, delZnorm, delR(k) |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
212 |
CTRL_SET_UNPACK_XYZ |
delZnorm = (delR(1)/delR(k))**delZexp |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
214 |
CTRL_SET_UNPACK_XYZ |
delZnorm = 1. _d 0 |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
261 |
CTRL_SET_UNPACK_XYZ |
globfld3d(i,bi,ip,j,bj,jp,k) = delZnorm |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
269 |
CTRL_SET_UNPACK_XYZ |
globfld3d(i,bi,ip,j,bj,jp,k) = 1/delZnorm |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
345 |
CTRL_SET_UNPACK_XYZ |
_RL delZnorm |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
473 |
CTRL_SET_UNPACK_XYZ |
delZnorm = (delR(1)/delR(k))**delZexp |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
475 |
CTRL_SET_UNPACK_XYZ |
delZnorm = 1. _d 0 |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
495 |
CTRL_SET_UNPACK_XYZ |
& fld3dNodim(i,j,k,bi,bj) * delZnorm |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
503 |
CTRL_SET_UNPACK_XYZ |
& fld3dNodim(i,j,k,bi,bj) / delZnorm |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
76 |
CTRL_SET_UNPACK_XYZ |
_RL delZnorm |