fragment_centroid Function

  1. mimic_fragments.F90
  2. mimic_fragments
  3. fragment_centroid

private pure function fragment_centroid(this) result(centroid)

compute the fragment centroid

Arguments

TypeIntentOptionalAttributesName
class(fragment_type), intent(in) :: this

Return Value real(kind=dp),dimension(3)


Contents

Source Code

fragment_centroid

Source Code

pure function fragment_centroid(this) result(centroid)

    class(fragment_type), intent(in) :: this

    real(dp), dimension(3) :: centroid

    centroid = compute_centroid(this%atoms)

end function fragment_centroid