!7

static L<S> l = splitAtSpace("This is a list to permutate .");

p {
  for (int i = 0; i <= l(l); i++) {
    L<S> ll = takeFirst(l, i);
    print("\nPermutating: " + ll);
    time "Permutating" { LL<S> perm = allPermutations(ll); }
    print("Have " + n(perm, "permutation"));
    assertEquals(factorial(i), l(perm));
    assertEquals(l(new HashSet(perm)), l(perm));
    pnl(perm);
  }
  print("\nOK (probably)");
}