The Permute(s, perm) command applies a given permutation perm to the string s.

The permutation perm must be a permutation of the integer , given as a list.

Error, (in StringTools:-Permute) [2, 1, 4, 3] is not a permutation of 1 .. 3

Error, (in StringTools:-Permute) [2, 3, 3] is not a permutation of 1 .. 3

AllPermutations := proc( s::string )
    local    p;
    seq( StringTools:-Permute( s, p ),
        p = combinat[ 'permute' ]( length( s ) ) )
end proc: