CLUSTCOMP_VORONOI Function

function CLUSTCOMP_VORONOI(RCLS, IC1, N1, RCLS1, N2)

@# KKRtags: VORONOI geometry This func returns true if cluster number ic1 is equal to cluster ic2 RCLS clusters coordinates IC1 First cluster N1 Number of atoms in IC1 cluster IC2 Second cluster rcls1 coordinates of second cluster n2 number of atoms in ic2 cluster include 'inc.p'

Arguments

Type IntentOptional Attributes Name
real(kind=8) :: RCLS(3,NACLSD,*)
integer :: IC1
integer :: N1
real(kind=8) :: RCLS1(3,NACLSD)
integer :: N2

Return Value logical