### Related

##### simplode-sqrt

(simplode(((1+v/c)/sq...

Calculate

##### simplode-sqrt

(simplode(((1+v/c)/sq...

Calculate

##### simplode-sqrt

(simplode(((1+v/c)/sq...

Calculate

##### simplode

test:[1,2];

t:simplode (test, ",");

Calculate

##### simplode-sqrt-string

string(simplode(((1+v...

Calculate

##### simplode

test:[1,2];

t:simplode (test, ",");

Calculate

##### simplode

test:[1,2];

t:simplode (test, ",");

Calculate

##### simplode

test:[1,2];

t:simplode (test, ",");

Calculate

##### simplode

test:[1,2];

t:simplode (test);

t;

Calculate

test:[1,2];

simplode (test);

Calculate

### simplode

Run Example
```(%i1)A:matrix([-1, -1,1,0,0],[-1,-2,1,0,0],[-1,-3,0,1,0],[0,-1,0,-1,1],[0,-2,-1,0,1],[0,-1,-1,1,0]);
[ - 1  - 1   1    0   0 ]
[                       ]
[ - 1  - 2   1    0   0 ]
[                       ]
[ - 1  - 3   0    1   0 ]
(%o1)                      [                       ]
[  0   - 1   0   - 1  1 ]
[                       ]
[  0   - 2  - 1   0   1 ]
[                       ]
[  0   - 1  - 1   1   0 ]
(%i2) n:rank(A);
(%o2)                                  4
(%i3) test:[1,2];
(%o3)                               [1, 2]
(%i4) sexplode(simplode (test),"|");
(%o4)                           sexplode(12, |)
(%i5) init:setify(makelist((i),i,1,5));
(%o5)                           {1, 2, 3, 4, 5}
(%i6) comb:powerset (init, n);
(%o6) {{1, 2, 3, 4}, {1, 2, 3, 5}, {1, 2, 4, 5}, {1, 3, 4, 5}, {2, 3, 4, 5}}
(%i7) i:1;
(%o7)                                  1
(%i8) for sub in comb do (print (remove_j[i]:listify(setdifference(init,sub))), i:i+1);
[5]
[4]
[3]
[2]
[1]
(%o8)                                done
(%i9) ```
Run Example
```? simplode;

-- Function: simplode (<list>)
-- Function: simplode (<list>, <delim>)
`simplode' takes a list of expressions and concatenates them into
a string.  If no delimiter <delim> is specified, `simplode' uses
no delimiter.  <delim> can be any string.

(%i1) simplode(["xx[",3,"]:",expand((x+y)^3)]);
(%o1)             xx[3]:y^3+3*x*y^2+3*x^2*y+x^3
(%i2) simplode( sexplode("stars")," * " );
(%o2)                   s * t * a * r * s
(%i3) simplode( ["One","more","coffee."]," " );
(%o3)                   One more coffee.

(%o1)                                true
(%i2) ```
Run Example
```convertSolutionValues(expr):=block([sol],sol:[], for x in solve(expr) do sol:append(sol, [rhs(x)]), return(sol));
(%o1) convertSolutionValues(expr) := block([sol], sol : [],
for x in solve(expr) do sol : append(sol, [rhs(x)]), return(sol))
(%i2) canBePeriodic(x):=block(x:simplode(x+1),return(not is(ssearch("sin",x)=false) or  not is(ssearch("cos",x)=false) or not is(ssearch("tan",x)=false) or not is(ssearch("csc", x)=false) or not is( ssearch("sec", x)=false) or not is(ssearch("atrigl", x)=false) or not is(ssearch("cot", x)=false)));
(%o2) canBePeriodic(x) := block(x : simplode(x + 1),
return((not is(ssearch("sin", x) = false))
or (not is(ssearch("cos", x) = false)) or (not is(ssearch("tan", x) = false))
or (not is(ssearch("csc", x) = false)) or (not is(ssearch("sec", x) = false))
or (not is(ssearch("atrigl", x) = false))
or (not is(ssearch("cot", x) = false))))
(%i3) args(sin(x));
(%o3)                                 [x]
(%i4) canBePeriodic(sin(44));
(%o4)                                true
(%i5) convertSolutionValues(x^2=1);
(%o5)                              [- 1, 1]
(%i6) ```

### Related Help

Help for Simplode