### Related

##### listify-makelist-mod

s:{2,3,4,5,6,7,8,9,10...

s3:{3,6,9};

s5:{5,10};

Calculate

##### listify-makelist-matrix-powerset-rank-setdifference-setify

A:matrix([-1, -1,1,0,...

n:rank(A);

test:[1,2,3];

Calculate

##### listify-powerset

"*"/* Einfache Zinse...

"*"/* Beteiligt: K -&...

S:{K,p,t,Z};

Calculate

##### listify-powerset

"*"/* Einfache Zinse...

"*"/* Beteiligt: K -&...

S:{K,p,t,Z};

Calculate

##### listify-map-powerset-setify

D1:[[1, 5], [5, 1], [...

S1:setify(D1);

P1:powerset(S1,2);

Calculate

##### listify-powerset

"*"/* Einfache Zinse...

"*"/* Beteiligt: K -&...

S:{K,p,t,Z};

Calculate

##### listify-makelist-map-powerset-setify-sort-sqrt

D1:[[1, 5], [5, 1], [...

S1:setify(D1);

P1:powerset(S1,2);

Calculate

##### listify-makelist-setify

v:poweset({1,2,3});

v1:listify(v);

s8:setify(makelist(i,...

Calculate

##### listify-matrix-powerset-print-rank-setdifference-submatrix

A:matrix([-1,-1,1,0,0...

n:rank(A);

B[1,2,3]:submatrix(4,...

Calculate

##### listify-makelist-map-powerset-sort-sqrt

Dreieck:[[[1, 5], [5,...

S1:map(setify,Dreieck);

f(x):=powerset(x,2);

Calculate

### listify

Run Example
```(%i1)load(draw);
(%o1)            /usr/share/maxima/5.21.1/share/draw/draw.lisp
(%i2) coord: setify(makelist(k,k,-4,4));
(%o2)                 {- 4, - 3, - 2, - 1, 0, 1, 2, 3, 4}
(%i3) points2d: listify(cartesian_product (coord ,coord ));
(%o3) [[- 4, - 4], [- 4, - 3], [- 4, - 2], [- 4, - 1], [- 4, 0], [- 4, 1],
[- 4, 2], [- 4, 3], [- 4, 4], [- 3, - 4], [- 3, - 3], [- 3, - 2], [- 3, - 1],
[- 3, 0], [- 3, 1], [- 3, 2], [- 3, 3], [- 3, 4], [- 2, - 4], [- 2, - 3],
[- 2, - 2], [- 2, - 1], [- 2, 0], [- 2, 1], [- 2, 2], [- 2, 3], [- 2, 4],
[- 1, - 4], [- 1, - 3], [- 1, - 2], [- 1, - 1], [- 1, 0], [- 1, 1], [- 1, 2],
[- 1, 3], [- 1, 4], [0, - 4], [0, - 3], [0, - 2], [0, - 1], [0, 0], [0, 1],
[0, 2], [0, 3], [0, 4], [1, - 4], [1, - 3], [1, - 2], [1, - 1], [1, 0],
[1, 1], [1, 2], [1, 3], [1, 4], [2, - 4], [2, - 3], [2, - 2], [2, - 1],
[2, 0], [2, 1], [2, 2], [2, 3], [2, 4], [3, - 4], [3, - 3], [3, - 2],
[3, - 1], [3, 0], [3, 1], [3, 2], [3, 3], [3, 4], [4, - 4], [4, - 3],
[4, - 2], [4, - 1], [4, 0], [4, 1], [4, 2], [4, 3], [4, 4]]
(%i4) vf2d(x,y):=  vector ([x,y],[cos(y),x]/6);
[cos(y), x]
(%o4)              vf2d(x, y) := vector([x, y], -----------)
6
(%i5) vect2: makelist(vf2d(k[1],k[2]),k,points2d );
cos(4)    2                        cos(3)    2
(%o5) [vector([- 4, - 4], [------, - -]), vector([- 4, - 3], [------, - -]),
6       3                          6       3
cos(2)    2                        cos(1)    2
vector([- 4, - 2], [------, - -]), vector([- 4, - 1], [------, - -]),
6       3                          6       3
1    2                      cos(1)    2
vector([- 4, 0], [-, - -]), vector([- 4, 1], [------, - -]),
6    3                        6       3
cos(2)    2                      cos(3)    2
vector([- 4, 2], [------, - -]), vector([- 4, 3], [------, - -]),
6       3                        6       3
cos(4)    2                        cos(4)    1
vector([- 4, 4], [------, - -]), vector([- 3, - 4], [------, - -]),
6       3                          6       2
cos(3)    1                        cos(2)    1
vector([- 3, - 3], [------, - -]), vector([- 3, - 2], [------, - -]),
6       2                          6       2
cos(1)    1                      1    1
vector([- 3, - 1], [------, - -]), vector([- 3, 0], [-, - -]),
6       2                      6    2
cos(1)    1                      cos(2)    1
vector([- 3, 1], [------, - -]), vector([- 3, 2], [------, - -]),
6       2                        6       2
cos(3)    1                      cos(4)    1
vector([- 3, 3], [------, - -]), vector([- 3, 4], [------, - -]),
6       2                        6       2
cos(4)    1                        cos(3)    1
vector([- 2, - 4], [------, - -]), vector([- 2, - 3], [------, - -]),
6       3                          6       3
cos(2)    1                        cos(1)    1
vector([- 2, - 2], [------, - -]), vector([- 2, - 1], [------, - -]),
6       3                          6       3
1    1                      cos(1)    1
vector([- 2, 0], [-, - -]), vector([- 2, 1], [------, - -]),
6    3                        6       3
cos(2)    1                      cos(3)    1
vector([- 2, 2], [------, - -]), vector([- 2, 3], [------, - -]),
6       3                        6       3
cos(4)    1                        cos(4)    1
vector([- 2, 4], [------, - -]), vector([- 1, - 4], [------, - -]),
6       3                          6       6
cos(3)    1                        cos(2)    1
vector([- 1, - 3], [------, - -]), vector([- 1, - 2], [------, - -]),
6       6                          6       6
cos(1)    1                      1    1
vector([- 1, - 1], [------, - -]), vector([- 1, 0], [-, - -]),
6       6                      6    6
cos(1)    1                      cos(2)    1
vector([- 1, 1], [------, - -]), vector([- 1, 2], [------, - -]),
6       6                        6       6
cos(3)    1                      cos(4)    1
vector([- 1, 3], [------, - -]), vector([- 1, 4], [------, - -]),
6       6                        6       6
cos(4)                         cos(3)
vector([0, - 4], [------, 0]), vector([0, - 3], [------, 0]),
6                              6
cos(2)                         cos(1)
vector([0, - 2], [------, 0]), vector([0, - 1], [------, 0]),
6                              6
1                       cos(1)
vector([0, 0], [-, 0]), vector([0, 1], [------, 0]),
6                         6
cos(2)                       cos(3)
vector([0, 2], [------, 0]), vector([0, 3], [------, 0]),
6                            6
cos(4)                         cos(4)  1
vector([0, 4], [------, 0]), vector([1, - 4], [------, -]),
6                              6     6
cos(3)  1                      cos(2)  1
vector([1, - 3], [------, -]), vector([1, - 2], [------, -]),
6     6                        6     6
cos(1)  1                    1  1
vector([1, - 1], [------, -]), vector([1, 0], [-, -]),
6     6                    6  6
cos(1)  1                    cos(2)  1
vector([1, 1], [------, -]), vector([1, 2], [------, -]),
6     6                      6     6
cos(3)  1                    cos(4)  1
vector([1, 3], [------, -]), vector([1, 4], [------, -]),
6     6                      6     6
cos(4)  1                      cos(3)  1
vector([2, - 4], [------, -]), vector([2, - 3], [------, -]),
6     3                        6     3
cos(2)  1                      cos(1)  1
vector([2, - 2], [------, -]), vector([2, - 1], [------, -]),
6     3                        6     3
1  1                    cos(1)  1
vector([2, 0], [-, -]), vector([2, 1], [------, -]),
6  3                      6     3
cos(2)  1                    cos(3)  1
vector([2, 2], [------, -]), vector([2, 3], [------, -]),
6     3                      6     3
cos(4)  1                      cos(4)  1
vector([2, 4], [------, -]), vector([3, - 4], [------, -]),
6     3                        6     2
cos(3)  1                      cos(2)  1
vector([3, - 3], [------, -]), vector([3, - 2], [------, -]),
6     2                        6     2
cos(1)  1                    1  1
vector([3, - 1], [------, -]), vector([3, 0], [-, -]),
6     2                    6  2
cos(1)  1                    cos(2)  1
vector([3, 1], [------, -]), vector([3, 2], [------, -]),
6     2                      6     2
cos(3)  1                    cos(4)  1
vector([3, 3], [------, -]), vector([3, 4], [------, -]),
6     2                      6     2
cos(4)  2                      cos(3)  2
vector([4, - 4], [------, -]), vector([4, - 3], [------, -]),
6     3                        6     3
cos(2)  2                      cos(1)  2
vector([4, - 2], [------, -]), vector([4, - 1], [------, -]),
6     3                        6     3
1  2                    cos(1)  2
vector([4, 0], [-, -]), vector([4, 1], [------, -]),
6  3                      6     3
cos(2)  2                    cos(3)  2
vector([4, 2], [------, -]), vector([4, 3], [------, -]),
6     3                      6     3
cos(4)  2
vector([4, 4], [------, -])]
6     3
(%i6) apply(draw2d , append ([ color=blue], vect2 ));
(%o6) [gr2d(vector, vector, vector, vector, vector, vector, vector, vector,
vector, vector, vector, vector, vector, vector, vector, vector, vector,
vector, vector, vector, vector, vector, vector, vector, vector, vector,
vector, vector, vector, vector, vector, vector, vector, vector, vector,
vector, vector, vector, vector, vector, vector, vector, vector, vector,
vector, vector, vector, vector, vector, vector, vector, vector, vector,
vector, vector, vector, vector, vector, vector, vector, vector, vector,
vector, vector, vector, vector, vector, vector, vector, vector, vector,
vector, vector, vector, vector, vector, vector, vector, vector, vector,
vector)]
(%i7) ```
Run Example
```coord: setify(makelist(k,k,-2,2));
(%o1)                         {- 2, - 1, 0, 1, 2}
(%i2) points3d: listify(cartesian_product(coord ,coord ,coord));
(%o2) [[- 2, - 2, - 2], [- 2, - 2, - 1], [- 2, - 2, 0], [- 2, - 2, 1],
[- 2, - 2, 2], [- 2, - 1, - 2], [- 2, - 1, - 1], [- 2, - 1, 0], [- 2, - 1, 1],
[- 2, - 1, 2], [- 2, 0, - 2], [- 2, 0, - 1], [- 2, 0, 0], [- 2, 0, 1],
[- 2, 0, 2], [- 2, 1, - 2], [- 2, 1, - 1], [- 2, 1, 0], [- 2, 1, 1],
[- 2, 1, 2], [- 2, 2, - 2], [- 2, 2, - 1], [- 2, 2, 0], [- 2, 2, 1],
[- 2, 2, 2], [- 1, - 2, - 2], [- 1, - 2, - 1], [- 1, - 2, 0], [- 1, - 2, 1],
[- 1, - 2, 2], [- 1, - 1, - 2], [- 1, - 1, - 1], [- 1, - 1, 0], [- 1, - 1, 1],
[- 1, - 1, 2], [- 1, 0, - 2], [- 1, 0, - 1], [- 1, 0, 0], [- 1, 0, 1],
[- 1, 0, 2], [- 1, 1, - 2], [- 1, 1, - 1], [- 1, 1, 0], [- 1, 1, 1],
[- 1, 1, 2], [- 1, 2, - 2], [- 1, 2, - 1], [- 1, 2, 0], [- 1, 2, 1],
[- 1, 2, 2], [0, - 2, - 2], [0, - 2, - 1], [0, - 2, 0], [0, - 2, 1],
[0, - 2, 2], [0, - 1, - 2], [0, - 1, - 1], [0, - 1, 0], [0, - 1, 1],
[0, - 1, 2], [0, 0, - 2], [0, 0, - 1], [0, 0, 0], [0, 0, 1], [0, 0, 2],
[0, 1, - 2], [0, 1, - 1], [0, 1, 0], [0, 1, 1], [0, 1, 2], [0, 2, - 2],
[0, 2, - 1], [0, 2, 0], [0, 2, 1], [0, 2, 2], [1, - 2, - 2], [1, - 2, - 1],
[1, - 2, 0], [1, - 2, 1], [1, - 2, 2], [1, - 1, - 2], [1, - 1, - 1],
[1, - 1, 0], [1, - 1, 1], [1, - 1, 2], [1, 0, - 2], [1, 0, - 1], [1, 0, 0],
[1, 0, 1], [1, 0, 2], [1, 1, - 2], [1, 1, - 1], [1, 1, 0], [1, 1, 1],
[1, 1, 2], [1, 2, - 2], [1, 2, - 1], [1, 2, 0], [1, 2, 1], [1, 2, 2],
[2, - 2, - 2], [2, - 2, - 1], [2, - 2, 0], [2, - 2, 1], [2, - 2, 2],
[2, - 1, - 2], [2, - 1, - 1], [2, - 1, 0], [2, - 1, 1], [2, - 1, 2],
[2, 0, - 2], [2, 0, - 1], [2, 0, 0], [2, 0, 1], [2, 0, 2], [2, 1, - 2],
[2, 1, - 1], [2, 1, 0], [2, 1, 1], [2, 1, 2], [2, 2, - 2], [2, 2, - 1],
[2, 2, 0], [2, 2, 1], [2, 2, 2]]
(%i3) vf3d(x,y,z):=  vector([x,y,z],[z,x,y]/8);
[z, x, y]
(%o3)            vf3d(x, y, z) := vector([x, y, z], ---------)
8
(%i4) vect3: makelist(vf3d(k[1],k[2],k[3]),k,points3d);
1    1    1
(%o4) [vector([- 2, - 2, - 2], [- -, - -, - -]),
4    4    4
1    1    1
vector([- 2, - 2, - 1], [- -, - -, - -]),
8    4    4
1    1                           1    1    1
vector([- 2, - 2, 0], [0, - -, - -]), vector([- 2, - 2, 1], [-, - -, - -]),
4    4                           8    4    4
1    1    1
vector([- 2, - 2, 2], [-, - -, - -]), vector([- 2, - 1, - 2],
4    4    4
1    1    1                               1    1    1
[- -, - -, - -]), vector([- 2, - 1, - 1], [- -, - -, - -]),
4    4    8                               8    4    8
1    1                           1    1    1
vector([- 2, - 1, 0], [0, - -, - -]), vector([- 2, - 1, 1], [-, - -, - -]),
4    8                           8    4    8
1    1    1                             1    1
vector([- 2, - 1, 2], [-, - -, - -]), vector([- 2, 0, - 2], [- -, - -, 0]),
4    4    8                             4    4
1    1                                 1
vector([- 2, 0, - 1], [- -, - -, 0]), vector([- 2, 0, 0], [0, - -, 0]),
8    4                                 4
1    1                            1    1
vector([- 2, 0, 1], [-, - -, 0]), vector([- 2, 0, 2], [-, - -, 0]),
8    4                            4    4
1    1  1                             1    1  1
vector([- 2, 1, - 2], [- -, - -, -]), vector([- 2, 1, - 1], [- -, - -, -]),
4    4  8                             8    4  8
1  1                         1    1  1
vector([- 2, 1, 0], [0, - -, -]), vector([- 2, 1, 1], [-, - -, -]),
4  8                         8    4  8
1    1  1                             1    1  1
vector([- 2, 1, 2], [-, - -, -]), vector([- 2, 2, - 2], [- -, - -, -]),
4    4  8                             4    4  4
1    1  1                              1  1
vector([- 2, 2, - 1], [- -, - -, -]), vector([- 2, 2, 0], [0, - -, -]),
8    4  4                              4  4
1    1  1                         1    1  1
vector([- 2, 2, 1], [-, - -, -]), vector([- 2, 2, 2], [-, - -, -]),
8    4  4                         4    4  4
1    1    1
vector([- 1, - 2, - 2], [- -, - -, - -]),
4    8    4
1    1    1
vector([- 1, - 2, - 1], [- -, - -, - -]),
8    8    4
1    1                           1    1    1
vector([- 1, - 2, 0], [0, - -, - -]), vector([- 1, - 2, 1], [-, - -, - -]),
8    4                           8    8    4
1    1    1
vector([- 1, - 2, 2], [-, - -, - -]), vector([- 1, - 1, - 2],
4    8    4
1    1    1                               1    1    1
[- -, - -, - -]), vector([- 1, - 1, - 1], [- -, - -, - -]),
4    8    8                               8    8    8
1    1                           1    1    1
vector([- 1, - 1, 0], [0, - -, - -]), vector([- 1, - 1, 1], [-, - -, - -]),
8    8                           8    8    8
1    1    1                             1    1
vector([- 1, - 1, 2], [-, - -, - -]), vector([- 1, 0, - 2], [- -, - -, 0]),
4    8    8                             4    8
1    1                                 1
vector([- 1, 0, - 1], [- -, - -, 0]), vector([- 1, 0, 0], [0, - -, 0]),
8    8                                 8
1    1                            1    1
vector([- 1, 0, 1], [-, - -, 0]), vector([- 1, 0, 2], [-, - -, 0]),
8    8                            4    8
1    1  1                             1    1  1
vector([- 1, 1, - 2], [- -, - -, -]), vector([- 1, 1, - 1], [- -, - -, -]),
4    8  8                             8    8  8
1  1                         1    1  1
vector([- 1, 1, 0], [0, - -, -]), vector([- 1, 1, 1], [-, - -, -]),
8  8                         8    8  8
1    1  1                             1    1  1
vector([- 1, 1, 2], [-, - -, -]), vector([- 1, 2, - 2], [- -, - -, -]),
4    8  8                             4    8  4
1    1  1                              1  1
vector([- 1, 2, - 1], [- -, - -, -]), vector([- 1, 2, 0], [0, - -, -]),
8    8  4                              8  4
1    1  1                         1    1  1
vector([- 1, 2, 1], [-, - -, -]), vector([- 1, 2, 2], [-, - -, -]),
8    8  4                         4    8  4
1       1                             1       1
vector([0, - 2, - 2], [- -, 0, - -]), vector([0, - 2, - 1], [- -, 0, - -]),
4       4                             8       4
1                         1       1
vector([0, - 2, 0], [0, 0, - -]), vector([0, - 2, 1], [-, 0, - -]),
4                         8       4
1       1                             1       1
vector([0, - 2, 2], [-, 0, - -]), vector([0, - 1, - 2], [- -, 0, - -]),
4       4                             4       8
1       1                                 1
vector([0, - 1, - 1], [- -, 0, - -]), vector([0, - 1, 0], [0, 0, - -]),
8       8                                 8
1       1                         1       1
vector([0, - 1, 1], [-, 0, - -]), vector([0, - 1, 2], [-, 0, - -]),
8       8                         4       8
1                                 1
vector([0, 0, - 2], [- -, 0, 0]), vector([0, 0, - 1], [- -, 0, 0]),
4                                 8
1
vector([0, 0, 0], [0, 0, 0]), vector([0, 0, 1], [-, 0, 0]),
8
1                                 1     1
vector([0, 0, 2], [-, 0, 0]), vector([0, 1, - 2], [- -, 0, -]),
4                                 4     8
1     1                             1
vector([0, 1, - 1], [- -, 0, -]), vector([0, 1, 0], [0, 0, -]),
8     8                             8
1     1                       1     1
vector([0, 1, 1], [-, 0, -]), vector([0, 1, 2], [-, 0, -]),
8     8                       4     8
1     1                           1     1
vector([0, 2, - 2], [- -, 0, -]), vector([0, 2, - 1], [- -, 0, -]),
4     4                           8     4
1                       1     1
vector([0, 2, 0], [0, 0, -]), vector([0, 2, 1], [-, 0, -]),
4                       8     4
1     1                             1  1    1
vector([0, 2, 2], [-, 0, -]), vector([1, - 2, - 2], [- -, -, - -]),
4     4                             4  8    4
1  1    1                            1    1
vector([1, - 2, - 1], [- -, -, - -]), vector([1, - 2, 0], [0, -, - -]),
8  8    4                            8    4
1  1    1                         1  1    1
vector([1, - 2, 1], [-, -, - -]), vector([1, - 2, 2], [-, -, - -]),
8  8    4                         4  8    4
1  1    1                             1  1    1
vector([1, - 1, - 2], [- -, -, - -]), vector([1, - 1, - 1], [- -, -, - -]),
4  8    8                             8  8    8
1    1                         1  1    1
vector([1, - 1, 0], [0, -, - -]), vector([1, - 1, 1], [-, -, - -]),
8    8                         8  8    8
1  1    1                           1  1
vector([1, - 1, 2], [-, -, - -]), vector([1, 0, - 2], [- -, -, 0]),
4  8    8                           4  8
1  1                             1
vector([1, 0, - 1], [- -, -, 0]), vector([1, 0, 0], [0, -, 0]),
8  8                             8
1  1                          1  1
vector([1, 0, 1], [-, -, 0]), vector([1, 0, 2], [-, -, 0]),
8  8                          4  8
1  1  1                           1  1  1
vector([1, 1, - 2], [- -, -, -]), vector([1, 1, - 1], [- -, -, -]),
4  8  8                           8  8  8
1  1                       1  1  1
vector([1, 1, 0], [0, -, -]), vector([1, 1, 1], [-, -, -]),
8  8                       8  8  8
1  1  1                           1  1  1
vector([1, 1, 2], [-, -, -]), vector([1, 2, - 2], [- -, -, -]),
4  8  8                           4  8  4
1  1  1                          1  1
vector([1, 2, - 1], [- -, -, -]), vector([1, 2, 0], [0, -, -]),
8  8  4                          8  4
1  1  1                       1  1  1
vector([1, 2, 1], [-, -, -]), vector([1, 2, 2], [-, -, -]),
8  8  4                       4  8  4
1  1    1                             1  1    1
vector([2, - 2, - 2], [- -, -, - -]), vector([2, - 2, - 1], [- -, -, - -]),
4  4    4                             8  4    4
1    1                         1  1    1
vector([2, - 2, 0], [0, -, - -]), vector([2, - 2, 1], [-, -, - -]),
4    4                         8  4    4
1  1    1                             1  1    1
vector([2, - 2, 2], [-, -, - -]), vector([2, - 1, - 2], [- -, -, - -]),
4  4    4                             4  4    8
1  1    1                            1    1
vector([2, - 1, - 1], [- -, -, - -]), vector([2, - 1, 0], [0, -, - -]),
8  4    8                            4    8
1  1    1                         1  1    1
vector([2, - 1, 1], [-, -, - -]), vector([2, - 1, 2], [-, -, - -]),
8  4    8                         4  4    8
1  1                              1  1
vector([2, 0, - 2], [- -, -, 0]), vector([2, 0, - 1], [- -, -, 0]),
4  4                              8  4
1                          1  1
vector([2, 0, 0], [0, -, 0]), vector([2, 0, 1], [-, -, 0]),
4                          8  4
1  1                              1  1  1
vector([2, 0, 2], [-, -, 0]), vector([2, 1, - 2], [- -, -, -]),
4  4                              4  4  8
1  1  1                          1  1
vector([2, 1, - 1], [- -, -, -]), vector([2, 1, 0], [0, -, -]),
8  4  8                          4  8
1  1  1                       1  1  1
vector([2, 1, 1], [-, -, -]), vector([2, 1, 2], [-, -, -]),
8  4  8                       4  4  8
1  1  1                           1  1  1
vector([2, 2, - 2], [- -, -, -]), vector([2, 2, - 1], [- -, -, -]),
4  4  4                           8  4  4
1  1                       1  1  1
vector([2, 2, 0], [0, -, -]), vector([2, 2, 1], [-, -, -]),
4  4                       8  4  4
1  1  1
vector([2, 2, 2], [-, -, -])]
4  4  4
(%i5) apply(draw3d , append([color=blue], vect3));
1    1    1
(%o5) draw3d(color = blue, vector([- 2, - 2, - 2], [- -, - -, - -]),
4    4    4
1    1    1
vector([- 2, - 2, - 1], [- -, - -, - -]),
8    4    4
1    1                           1    1    1
vector([- 2, - 2, 0], [0, - -, - -]), vector([- 2, - 2, 1], [-, - -, - -]),
4    4                           8    4    4
1    1    1
vector([- 2, - 2, 2], [-, - -, - -]), vector([- 2, - 1, - 2],
4    4    4
1    1    1                               1    1    1
[- -, - -, - -]), vector([- 2, - 1, - 1], [- -, - -, - -]),
4    4    8                               8    4    8
1    1                           1    1    1
vector([- 2, - 1, 0], [0, - -, - -]), vector([- 2, - 1, 1], [-, - -, - -]),
4    8                           8    4    8
1    1    1                             1    1
vector([- 2, - 1, 2], [-, - -, - -]), vector([- 2, 0, - 2], [- -, - -, 0]),
4    4    8                             4    4
1    1                                 1
vector([- 2, 0, - 1], [- -, - -, 0]), vector([- 2, 0, 0], [0, - -, 0]),
8    4                                 4
1    1                            1    1
vector([- 2, 0, 1], [-, - -, 0]), vector([- 2, 0, 2], [-, - -, 0]),
8    4                            4    4
1    1  1                             1    1  1
vector([- 2, 1, - 2], [- -, - -, -]), vector([- 2, 1, - 1], [- -, - -, -]),
4    4  8                             8    4  8
1  1                         1    1  1
vector([- 2, 1, 0], [0, - -, -]), vector([- 2, 1, 1], [-, - -, -]),
4  8                         8    4  8
1    1  1                             1    1  1
vector([- 2, 1, 2], [-, - -, -]), vector([- 2, 2, - 2], [- -, - -, -]),
4    4  8                             4    4  4
1    1  1                              1  1
vector([- 2, 2, - 1], [- -, - -, -]), vector([- 2, 2, 0], [0, - -, -]),
8    4  4                              4  4
1    1  1                         1    1  1
vector([- 2, 2, 1], [-, - -, -]), vector([- 2, 2, 2], [-, - -, -]),
8    4  4                         4    4  4
1    1    1
vector([- 1, - 2, - 2], [- -, - -, - -]),
4    8    4
1    1    1
vector([- 1, - 2, - 1], [- -, - -, - -]),
8    8    4
1    1                           1    1    1
vector([- 1, - 2, 0], [0, - -, - -]), vector([- 1, - 2, 1], [-, - -, - -]),
8    4                           8    8    4
1    1    1
vector([- 1, - 2, 2], [-, - -, - -]), vector([- 1, - 1, - 2],
4    8    4
1    1    1                               1    1    1
[- -, - -, - -]), vector([- 1, - 1, - 1], [- -, - -, - -]),
4    8    8                               8    8    8
1    1                           1    1    1
vector([- 1, - 1, 0], [0, - -, - -]), vector([- 1, - 1, 1], [-, - -, - -]),
8    8                           8    8    8
1    1    1                             1    1
vector([- 1, - 1, 2], [-, - -, - -]), vector([- 1, 0, - 2], [- -, - -, 0]),
4    8    8                             4    8
1    1                                 1
vector([- 1, 0, - 1], [- -, - -, 0]), vector([- 1, 0, 0], [0, - -, 0]),
8    8                                 8
1    1                            1    1
vector([- 1, 0, 1], [-, - -, 0]), vector([- 1, 0, 2], [-, - -, 0]),
8    8                            4    8
1    1  1                             1    1  1
vector([- 1, 1, - 2], [- -, - -, -]), vector([- 1, 1, - 1], [- -, - -, -]),
4    8  8                             8    8  8
1  1                         1    1  1
vector([- 1, 1, 0], [0, - -, -]), vector([- 1, 1, 1], [-, - -, -]),
8  8                         8    8  8
1    1  1                             1    1  1
vector([- 1, 1, 2], [-, - -, -]), vector([- 1, 2, - 2], [- -, - -, -]),
4    8  8                             4    8  4
1    1  1                              1  1
vector([- 1, 2, - 1], [- -, - -, -]), vector([- 1, 2, 0], [0, - -, -]),
8    8  4                              8  4
1    1  1                         1    1  1
vector([- 1, 2, 1], [-, - -, -]), vector([- 1, 2, 2], [-, - -, -]),
8    8  4                         4    8  4
1       1                             1       1
vector([0, - 2, - 2], [- -, 0, - -]), vector([0, - 2, - 1], [- -, 0, - -]),
4       4                             8       4
1                         1       1
vector([0, - 2, 0], [0, 0, - -]), vector([0, - 2, 1], [-, 0, - -]),
4                         8       4
1       1                             1       1
vector([0, - 2, 2], [-, 0, - -]), vector([0, - 1, - 2], [- -, 0, - -]),
4       4                             4       8
1       1                                 1
vector([0, - 1, - 1], [- -, 0, - -]), vector([0, - 1, 0], [0, 0, - -]),
8       8                                 8
1       1                         1       1
vector([0, - 1, 1], [-, 0, - -]), vector([0, - 1, 2], [-, 0, - -]),
8       8                         4       8
1                                 1
vector([0, 0, - 2], [- -, 0, 0]), vector([0, 0, - 1], [- -, 0, 0]),
4                                 8
1
vector([0, 0, 0], [0, 0, 0]), vector([0, 0, 1], [-, 0, 0]),
8
1                                 1     1
vector([0, 0, 2], [-, 0, 0]), vector([0, 1, - 2], [- -, 0, -]),
4                                 4     8
1     1                             1
vector([0, 1, - 1], [- -, 0, -]), vector([0, 1, 0], [0, 0, -]),
8     8                             8
1     1                       1     1
vector([0, 1, 1], [-, 0, -]), vector([0, 1, 2], [-, 0, -]),
8     8                       4     8
1     1                           1     1
vector([0, 2, - 2], [- -, 0, -]), vector([0, 2, - 1], [- -, 0, -]),
4     4                           8     4
1                       1     1
vector([0, 2, 0], [0, 0, -]), vector([0, 2, 1], [-, 0, -]),
4                       8     4
1     1                             1  1    1
vector([0, 2, 2], [-, 0, -]), vector([1, - 2, - 2], [- -, -, - -]),
4     4                             4  8    4
1  1    1                            1    1
vector([1, - 2, - 1], [- -, -, - -]), vector([1, - 2, 0], [0, -, - -]),
8  8    4                            8    4
1  1    1                         1  1    1
vector([1, - 2, 1], [-, -, - -]), vector([1, - 2, 2], [-, -, - -]),
8  8    4                         4  8    4
1  1    1                             1  1    1
vector([1, - 1, - 2], [- -, -, - -]), vector([1, - 1, - 1], [- -, -, - -]),
4  8    8                             8  8    8
1    1                         1  1    1
vector([1, - 1, 0], [0, -, - -]), vector([1, - 1, 1], [-, -, - -]),
8    8                         8  8    8
1  1    1                           1  1
vector([1, - 1, 2], [-, -, - -]), vector([1, 0, - 2], [- -, -, 0]),
4  8    8                           4  8
1  1                             1
vector([1, 0, - 1], [- -, -, 0]), vector([1, 0, 0], [0, -, 0]),
8  8                             8
1  1                          1  1
vector([1, 0, 1], [-, -, 0]), vector([1, 0, 2], [-, -, 0]),
8  8                          4  8
1  1  1                           1  1  1
vector([1, 1, - 2], [- -, -, -]), vector([1, 1, - 1], [- -, -, -]),
4  8  8                           8  8  8
1  1                       1  1  1
vector([1, 1, 0], [0, -, -]), vector([1, 1, 1], [-, -, -]),
8  8                       8  8  8
1  1  1                           1  1  1
vector([1, 1, 2], [-, -, -]), vector([1, 2, - 2], [- -, -, -]),
4  8  8                           4  8  4
1  1  1                          1  1
vector([1, 2, - 1], [- -, -, -]), vector([1, 2, 0], [0, -, -]),
8  8  4                          8  4
1  1  1                       1  1  1
vector([1, 2, 1], [-, -, -]), vector([1, 2, 2], [-, -, -]),
8  8  4                       4  8  4
1  1    1                             1  1    1
vector([2, - 2, - 2], [- -, -, - -]), vector([2, - 2, - 1], [- -, -, - -]),
4  4    4                             8  4    4
1    1                         1  1    1
vector([2, - 2, 0], [0, -, - -]), vector([2, - 2, 1], [-, -, - -]),
4    4                         8  4    4
1  1    1                             1  1    1
vector([2, - 2, 2], [-, -, - -]), vector([2, - 1, - 2], [- -, -, - -]),
4  4    4                             4  4    8
1  1    1                            1    1
vector([2, - 1, - 1], [- -, -, - -]), vector([2, - 1, 0], [0, -, - -]),
8  4    8                            4    8
1  1    1                         1  1    1
vector([2, - 1, 1], [-, -, - -]), vector([2, - 1, 2], [-, -, - -]),
8  4    8                         4  4    8
1  1                              1  1
vector([2, 0, - 2], [- -, -, 0]), vector([2, 0, - 1], [- -, -, 0]),
4  4                              8  4
1                          1  1
vector([2, 0, 0], [0, -, 0]), vector([2, 0, 1], [-, -, 0]),
4                          8  4
1  1                              1  1  1
vector([2, 0, 2], [-, -, 0]), vector([2, 1, - 2], [- -, -, -]),
4  4                              4  4  8
1  1  1                          1  1
vector([2, 1, - 1], [- -, -, -]), vector([2, 1, 0], [0, -, -]),
8  4  8                          4  8
1  1  1                       1  1  1
vector([2, 1, 1], [-, -, -]), vector([2, 1, 2], [-, -, -]),
8  4  8                       4  4  8
1  1  1                           1  1  1
vector([2, 2, - 2], [- -, -, -]), vector([2, 2, - 1], [- -, -, -]),
4  4  4                           8  4  4
1  1                       1  1  1
vector([2, 2, 0], [0, -, -]), vector([2, 2, 1], [-, -, -]),
4  4                       8  4  4
1  1  1
vector([2, 2, 2], [-, -, -]))
4  4  4
(%i6) ```
Run Example
```:lisp (lisp-implementation-type);

GNU Common Lisp (GCL)
(%i1) :lisp (lisp-implementation-version);

GCL 2.6.7
(%i1) prime(z):=block([k:z, y:1],(y:append(listify(setify(makelist((if(primep(k)) then k else 1), k, 1, k-1))), [y])), return(y));
(%o1) prime(z) := block([k : z, y : 1],
y : append(listify(setify(makelist(if primep(k) then k else 1, k, 1, k - 1))),
[y]), return(y))
(%i2) prime(10);
(%o2)                         [1, 2, 3, 5, 7, 1]
(%i3) ```

Help for Listify