Permalink
Browse files

smartlinks for List.combinations

  • Loading branch information...
timo committed Nov 13, 2013
1 parent 3d27820 commit 18962705fa10d2f465d2f005cdc7f551cac03c76
Showing with 2 additions and 0 deletions.
  1. +2 −0 S32-list/combinations.t
View
@@ -6,6 +6,8 @@ sub canon($t) {
$t.tree.map(*.sort).tree
}
+# L<S32::Containers/List/=item combinations>
+
ok(((1,), (2,), (3,)).list eqv [1, 2, 3].combinations(1).&canon, "single-item combinations");
ok(all([1, 2], [2, 3], [1, 3]) eqv one([1, 2, 3].combinations(2).&canon), "two item combinations");
ok(([1, 2, 3],).list eqv [1, 2, 3].combinations(3).&canon, "three items of a three-item list");

0 comments on commit 1896270

Please sign in to comment.