Subroutine test_form_bond

Test if atom $i$ is a neighbour of atom $j$ and update this%connect as necessary. Called by calc_connect. The shift vector is added to the position of the $j$ atom to get the correct image position.

this -- type(Connection), intent(inout)

cutoff -- real(dp), intent(in)

use_uniform_cutoff -- logical, intent(in)

Z -- integer, intent(in), dimension(:)

pos -- real(dp), intent(in), dimension(:,:)

lattice -- real(dp), intent(in), dimension(3,3)

i, j -- integer, intent(in)

shift -- integer, intent(in), dimension(3)

check_for_dup -- logical, intent(in), optional

set_bonds subroutine