NAME
Gravity_bhNodeContrib
SYNOPSIS
call Gravity_bhNodeContrib(
real(in) :: node(:),
integer(in) :: trLevel,
integer(in) :: refLevel,
real(in) :: dr(MDIM+2),
integer(in) :: blockno,
integer(in) :: point(MDIM),
integer(in) :: blkLimits(2,MDIM),
real,pointer :: solnData(:,:,:,:)
)
DESCRIPTION
Calculates contribution of the node to the gravitational potential and adds it to the solnData array (with index grv_bhGpotVar).
ARGUMENTS
node : array of the node of the tree, whose
contribution is added to the gravitational potential
trLevel : level of the block-tree
refLevel : refinement level of the block with the node
dr : (1:MDIM) - position vector from the point-of-calculation to the node
(MDIM+1) - square of the magnitude of the position vector
(MDIM+2) - inverted magnitude of the position vector
blockno : number of block into which the point-of-calculation belongs
point : indeces of the point-of-calculation in the block
blkLimits : limits of indeces in the block
solnData : solution data from the grid