Is the passed it a member of this supercell
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(supercell_type), | intent(in) | :: | self | |||
integer, | intent(in) | :: | it |
function sc_has_it(self,it)
implicit none
class(supercell_type), intent(in) :: self
integer, intent(in) :: it
logical :: sc_has_it
sc_has_it=any(self%cells%it_ind==it)
end function sc_has_it