objarray permute <obj> <permutation indices>
To permute the values with the order of <permutation indices>, that is a list of unrepeated indices, in the range [0,n-1]
e.g.
package require objarray
set x [objarray new floatarray -values {1.0 2.0 3.0 4.0 5.0 6.0 7.0 8.0 9.0 10.0 11.0 12.0 13.0 14.0 15.0}]
objarray permute $x {0 1 2 3 4 5 6 7 8 12 13 14 9 10 11}
-> 1.0 2.0 3.0 4.0 5.0 6.0 7.0 8.0 9.0 13.0 14.0 15.0 10.0 11.0 12.0