Concatenate lists ;

[Dicken]

Hi, 
This give the result i want but does anyone have ideas to make more dynamic  or just better approach 
so start = {"A","B","C"}   , result =  {{ "A","C"} , {"A","B"} , {"AC"} , {"AB"} }    

i have ; ;

let
  alist = {"A", "B", "C"},
  pos   = {{0, 2}, {0, 1}}
in
  List.Transform(pos, (x) => List.Transform(x, (y) => alist{y}))
  & List.Transform(pos, (x) => 
                    {Text.Combine(List.Transform(x, (y) => alist{y}), ",")})

[AlienSx · Accepted solution]

let
    Source = {"A", "B", "C"},
    w = List.TransformMany(
        List.Skip(Source), 
        (x) => {x, {x}},
        (x, y) => if y is text then {Source{0} & y} else {Source{0}} & y
    )
in
    w

[Dicken]

Thanks i  don't use TransfromMany enough,  

Richard

[lbendlin]

How is this a concatenation of lists?

[Dicken]

Ok, you could say mapping, but as I take  { "a","b","c"}  and end up with  { "a,b"}  how is this not 
conctenation? 

[lbendlin]

It might be a concatenation/permutation of the values in a list but not a concatenation of lists.

Maybe a more real world example would have helped to understand the ask (and the reason).