Symbol Description Uses
wei3d 8



File Line number Procedure Code
./pkg/ctrl/ctrl_set_pack_xyz.F 306 CTRL_SET_PACK_XYZ
      _RL wei3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy)
./pkg/ctrl/ctrl_set_pack_xyz.F 326 CTRL_SET_PACK_XYZ
      call ACTIVE_READ_XYZ(weighttype, wei3d, 1,
./pkg/ctrl/ctrl_set_pack_xyz.F 379 CTRL_SET_PACK_XYZ
     &              * sqrt(wei3d(i,j,k,bi,bj))
./pkg/ctrl/ctrl_set_pack_xyz.F 387 CTRL_SET_PACK_XYZ
     &              / sqrt(wei3d(i,j,k,bi,bj))
./pkg/ctrl/ctrl_set_unpack_xyz.F 335 CTRL_SET_UNPACK_XYZ
      _RL wei3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy)
./pkg/ctrl/ctrl_set_unpack_xyz.F 355 CTRL_SET_UNPACK_XYZ
      call ACTIVE_READ_XYZ(weighttype, wei3d, 1,
./pkg/ctrl/ctrl_set_unpack_xyz.F 481 CTRL_SET_UNPACK_XYZ
     &              / sqrt(wei3d(i,j,k,bi,bj))
./pkg/ctrl/ctrl_set_unpack_xyz.F 489 CTRL_SET_UNPACK_XYZ
     &              * sqrt(wei3d(i,j,k,bi,bj))