/usr/lib/s9fes/help/permute is in scheme9 2010.11.13-2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | S9 LIB (permute integer list) ==> list
(permute* integer list) ==> list
(load-from-library "permute.scm")
Create k-permutations of the elements of the given list. K (the
size of the permutations) is specified in the integer argument.
PERMUTE creates permutations without repetition and PERMUTE*
creates permutations with repetition.
(permute 2 '(a b c)) ==> ((a b) (b a) (a c)
(c a) (b c) (c b))
(permute* 2 '(a b c)) ==> ((a a) (a b) (a c)
(b a) (b b) (b c)
(c a) (c b) (c c))
|