### Related

##### permut

permut([1,2,3,4]);

Calculate

##### permut

permut([1,2,3,4,5,6]);

Calculate

##### permut

permut([n,g,p,a,o]);

Calculate

##### permut

permut([1,2,3,4,5,6]);

Calculate

a:[m,i,s,l,q];

permut(a);

Calculate

a:[m,i,s,l,q];

permut(a);

Calculate

##### permut

teilnehmer : [Willi, ...

permut (teilnehmer);

Calculate

##### permut

permut([1,2,3,4,5,6]);

Calculate

a:[д,2,3];

permut(a);

Calculate

##### permut

permut([1,2,3,4]);

Calculate

### permut

Run Example
```(%i1)Seznam(List,N):=    sort(flatten(maplist(lambda([z],        maplist(lambda([w],eval_string(lreduce(concat,w))),permut(z))),            full_listify(powerset(setify(List),N)))));
(%o1) Seznam(List, N) := sort(flatten(maplist(lambda([z],
maplist(lambda([w], eval_string(lreduce(concat, w))), permut(z))),
full_listify(powerset(setify(List), N)))))
(%i2) mod(Seznam([82,65,65,82,55,65],6)^53,99999899999);
(%o2)                                 []
(%i3) ```
Run Example
```map(lambda([z],lreduce(concat,z)),permut([1,2,3]))*5;
resolvante
generale

NOTE: To compile the system do
define: warning: redefining the built-in function resolvante_produit_sym
define: warning: redefining the built-in function resolvante_unitaire
define: warning: redefining the built-in function resolvante_alternee1
define: warning: redefining the built-in function resolvante_klein
define: warning: redefining the built-in function resolvante_klein3
define: warning: redefining the built-in function resolvante_vierer
define: warning: redefining the built-in function resolvante_diedrale
define: warning: redefining the built-in function resolvante_bipartite
(%o1)             [5 123, 5 132, 5 213, 5 312, 5 231, 5 321]
(%i2) ```
Run Example
```Seznam(List,N):=    sort(flatten(maplist(lambda([z],        maplist(lambda([w],eval_string(lreduce(concat,w))),permut(z))),            full_listify(powerset(setify(List),N)))));
(%o1) Seznam(List, N) := sort(flatten(maplist(lambda([z],
maplist(lambda([w], eval_string(lreduce(concat, w))), permut(z))),
full_listify(powerset(setify(List), N)))))
(%i2) mod(Seznam([1,2,3,2,6,5],6)^23,999998);
(%o2)                                 []
(%i3) ```

Help for Permut