Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
just use eqv, not hyper eqv
  • Loading branch information
TimToady committed Aug 2, 2014
1 parent 52f9ad5 commit 357d2a9
Showing 1 changed file with 6 additions and 6 deletions.
12 changes: 6 additions & 6 deletions S32-list/combinations.t
Expand Up @@ -4,10 +4,10 @@ plan 6;

# L<S32::Containers/List/=item combinations>

ok [1, 2, 3].combinations(1) »eqv« ([1], [2], [3]), "single-item combinations";
ok [1, 2, 3].combinations(2) »eqv« ([1, 2], [2, 3], [1, 3]), "two item combinations";
ok [1, 2, 3].combinations(3) »eqv« ([1,2,3],), "three items of a three-item list";
ok [[1, 2, 3].combinations(1)] eqv [[1], [2], [3]], "single-item combinations";
ok [[1, 2, 3].combinations(2)] eqv [[1, 2], [1, 3], [2, 3]], "two item combinations";
ok [[1, 2, 3].combinations(3)] eqv [[1,2,3],], "three items of a three-item list";

ok [1, 2, 3].combinations(1..2) »eqv« ([1], [2], [3], [1, 2], [2, 3], [1, 3]), "1..2 items";
ok [1, 2, 3].combinations(0..3) »eqv« ([], [1], [2], [3], [1, 2], [2, 3], [1, 3], [1, 2, 3]), "0..3 items";
ok [1, 2, 3].combinations(2..3) »eqv« ([1, 2], [2, 3], [1, 3], [1, 2, 3]), "2..3 items";
ok [[1, 2, 3].combinations(1..2)] eqv [[1], [2], [3], [1, 2], [1, 3], [2, 3]], "1..2 items";
ok [[1, 2, 3].combinations(0..3)] eqv [[], [1], [2], [3], [1, 2], [1, 3], [2, 3], [1, 2, 3]], "0..3 items";
ok [[1, 2, 3].combinations(2..3)] eqv [[1, 2], [1, 3], [2, 3], [1, 2, 3]], "2..3 items";

0 comments on commit 357d2a9

Please sign in to comment.