RosettaCodeData/Task/Set/Smalltalk/set.st
Ingy döt Net b83f433714 tasks a-s
2013-04-10 23:57:08 -07:00

20 lines
359 B
Smalltalk

#(1 2 3) asSet union: #(2 3 4) asSet.
"a Set(1 2 3 4)"
#(1 2 3) asSet intersection: #(2 3 4) asSet.
"a Set(2 3)"
#(1 2 3) asSet difference: #(2 3 4) asSet.
"a Set(1)"
#(1 2 3) asSet includesAllOf: #(1 3) asSet.
"true"
#(1 2 3) asSet includesAllOf: #(1 3 4) asSet.
"false"
#(1 2 3) asSet = #(2 1 3) asSet.
"true"
#(1 2 3) asSet = #(1 2 4) asSet.
"false"