objarray interleave <obj> <num_components>
Reorder the array of $num_components blocks interleaving items of each component
<obj> the objarray to be modified
<num_components> integer>0 , the amount of blocks
Warning: the values of <obj> itself are modified, without creating another copy of the object
e.g.
set obj [objarray concat [objarray new intarray 3 1] [objarray new intarray 3 5]] -> 1 1 1 5 5 5 objarray interleave $obj 2 ->1 5 1 5 1 5