@brief Compute primitive block of multipole integrals of order MOM
@param[in] cp shell pair data
@param[in] id current pair of primitives
@param[in] r point in space to compute integrals
@param[in] mom multiplole moment order (1-dipole, 2-quadrupole, 3-octopole)
@param[inout] blk block of 1e multipole moment integrals
@author Vladimir Mironov
@date Sep, 2018 Initial release
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(shpair_t), | intent(in) | :: | cp | |||
| integer, | intent(in) | :: | id | |||
| real(kind=real64), | intent(in), | contiguous | :: | r(:) | ||
| integer, | intent(in) | :: | mom | |||
| real(kind=real64), | intent(inout), | contiguous | :: | blk(:,:) |