Set

• asArray
• capacity
• someElement

• ,
• add:

• asSet

• collect:
• do:
• doWithIndex:

• comeFullyUpOnReload:

• array
• atNewIndex:put:
• copy
• findElementOrNil:
• fixCollisionsFrom:
• fullCheck
• grow
• growSize
• init:
• keyAt:
• noCheckAdd:
• rehash
• scanFor:
• size
• swap:with:
• withArray:

• -
• copyWithout:
• remove:ifAbsent:

• &
• +
• intersectionWith:
• intersectionWithSet:

• =
• includes:
• occurrencesOf:

• rehashAllSets

• new
• new:
• newFrom:
• sizeFor:

InitialValue:

(nil nil nil nil nil nil )

inferredType:

Array

InitialValue:

0

inferredType:

SmallInteger

 
	"Answer a copy of the receiver concatenated with the argument, aCollection."
	
	^self copy
		addAll: aCollection asSet;
		yourself

	"Answer those elements present in the receiver and absent from aSet."
	"SmallInterfaces: ##added for Squeak -M.U. 6/23/1999 23:35"
	^self reject: [ :i | aSet includes: i ]

 
	"Set intersection"

	^self intersectionWith: aSet

 
	"Set union"

	^self , aCollection

	"Intersection of two sets."

	^self select: [:each | aSet includes: each]

	"Return the elements in common with receiver and aSet as a set with one instance of each element.
	<#(1 2 3) asSet intersectionWithSet: #(2 3 4) asSet>"

	^(self size <= aSet size)
		ifTrue: [self select: [:each | aSet includes: each]]
		ifFalse: [aSet intersectionWithSet: self]