find_neighboring_atoms Subroutine

public subroutine find_neighboring_atoms(g, a, output)

count how many neighboring atoms for each atom and find the bond distances

Arguments

Type IntentOptional Attributes Name
type(grid3d), intent(in) :: g
type(atom_set), intent(in) :: a(:)
integer :: output