Shuffle ->
Arg Dest : &List : T 
    Src : A|L : <T>

Mix : List : Integer <- List : [Src._ % 2] = <> ..

Do Mix->Random_position .= Element
   ' Random_position = Random 1 Src._
With Element from Src

Do Dest ||= List
With R, List from Mix

/