1 ! Copyright (C) 2022 Doug Coleman.
2 ! See http://factorcode.org/license.txt for BSD license.
3 USING: kernel multisets prettyprint tools.test ;
8 100 over multiset-emplace
9 100 over multiset-emplace
10 100 over multiset-erase
15 100 over multiset-emplace
16 100 over multiset-emplace
20 { t } [ multiset{ } multiset-empty? ] unit-test
21 { f } [ multiset{ 100 100 } multiset-empty? ] unit-test
23 { t } [ multiset{ 100 100 } 100 multiset-in? ] unit-test
24 { f } [ multiset{ 100 100 } 200 multiset-in? ] unit-test
26 { 2 } [ multiset{ 100 100 } 100 multiset-count ] unit-test
27 { 0 } [ multiset{ 100 100 } 200 multiset-count ] unit-test
29 { { 100 100 } } [ multiset{ 100 100 } multiset-members ] unit-test
32 { } [ multiset{ 100 100 } [ . ] multiset-each ] unit-test