<div dir="ltr">Hi Marcel,<br><div class="gmail_extra"><br><div class="gmail_quote">On Tue, Apr 19, 2016 at 12:32 AM, Tobias Pape <span dir="ltr"><<a href="mailto:Das.Linux@gmx.de" target="_blank">Das.Linux@gmx.de</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex"><span class=""><br>
On 19.04.2016, at 08:23, marcel.taeumel <<a href="mailto:Marcel.Taeumel@hpi.de">Marcel.Taeumel@hpi.de</a>> wrote:<br>
<br>
> Hi Eliot,<br>
><br>
> try this:<br>
> (Set with: #module) includesAllOf: (IdentitySet with: #module).<br>
><br>
> This is "hasEqualElements:" for all kinds of collections.<br>
<br>
</span>But this is not reflexive, right?<br>
<br>
(Set withAll: #(module moep)) includesAllOf: (IdentitySet with: #module)<br></blockquote><div><br></div><div>How about</div><div><br></div><div>Set>>hasEqualElements: aCollection</div><div> ^aCollection size = self size and: [aCollection noneSatisfy: [:element| (self includes: element) not]</div><div><br></div><div><br></div><div>Again it's not reflexive with sequenceable collections, but unlike includesAllOf: it meets the specification ;-).</div><div><br></div><div><br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex">
<br>
><br>
> Best,<br>
> Marcel<br>
<br>
<br>
<br>
<br>
</blockquote></div><br><br clear="all"><div><br></div>-- <br><div class="gmail_signature"><div dir="ltr"><div><span style="font-size:small;border-collapse:separate"><div>_,,,^..^,,,_<br></div><div>best, Eliot</div></span></div></div></div>
</div></div>