### Related

a: {};

b: {1};

c: {0};

Calculate

##### union

S_1 : {1, 5, {1, 5},{...

S_2 : {{1, 5, 10},{5...

union (S_1, S_2);

Calculate

a : {1,2,3};

b : {a,b};

union(a,b);

Calculate

##### union

a = union({1,2,3,4,5}...

Calculate

a: {};

b: {1};

c: {0};

Calculate

a: {};

b: {1};

c: {0};

Calculate

##### union

S_1 : {a, b, c + d, %e};

S_2 : {%pi, %i, %e, ...

S_3 : {17, 29, 1729,...

Calculate

##### union

A:set(1,2,3,4,5,6,7,8);

B:set(2,4,6,8,10,12,1...

C:set(3,6,9,12,18);

Calculate

##### union

eq1:[1,2,3,4,5];

eq2:[5,6,7,8,9];

union(set(eq1),set(eq...

Calculate

##### union

M1:{49,23,27,665};

M2:{9,23,37,49,66,88};

M3:{48,665,666};

Calculate

### union

Run Example
```(%i1)H:{1,2,3,4};
(%o1)                            {1, 2, 3, 4}
(%i2) A:{2,3};
(%o2)                               {2, 3}
(%i3) B:{3,4};
(%o3)                               {3, 4}
(%i4) V:union(A,B);
(%o4)                              {2, 3, 4}
(%i5) D_H_V:setdifference(H,V);
(%o5)                                 {1}
(%i6) L1:setdifference(H,union(A,B));
(%o6)                                 {1}
(%i7) D_H_A:setdifference(H,A);
(%o7)                               {1, 4}
(%i8) D_H_B:setdifference(H,B);
(%o8)                               {1, 2}
(%i9) R1:intersect(D_H_A,D_H_B);
(%o9)                                 {1}
(%i10) is(L1=R1);
(%o10)                               true
(%i11) not B;
(%o11)                            not {3, 4}
(%i12) ```
Run Example
```A: {.75};
(%o1)                               {0.75}
(%i2) B: {.83};
(%o2)                               {0.83}
(%i3) C: union(A, B);
(%o3)                            {0.75, 0.83}
(%i4) ```
Run Example
```load(graphs);

(%o1)      /usr/share/maxima/5.21.1/share/contrib/graphs/graphs.mac
(%i2) A : graph_union(empty_graph(1),cycle_graph(9));
(%o2)                                GRAPH
(%o3)                                done
(%i4) G(s) := (z : A, s : string(s), n : slength(s),    for i from 1 thru n do (z : graph_union(z,A),    if charat(s,i)="1" then add_edge([10*i-8,10*i],z) else add_edge([10*i-4,10*i],z)), z);
(%o4) G(s) := (z : A, s : string(s), n : slength(s),
for i thru n do (z : graph_union(z, A),
if charat(s, i) = "1" then add_edge([10 i - 8, 10 i], z)
else add_edge([10 i - 4, 10 i], z)), z)
(%i5) draw_graph(G(1010),show_id=true);
plot```

Help for Union