purge_atom_set Subroutine

public subroutine purge_atom_set(a)

deallocates array of atom_sets

Arguments

Type	Intent	Optional	Attributes		Name
type(atom_set),	intent(inout),		allocatable	::	a(:)