in reply to How to get the translation seed?

And now ladies and gentlemen, for all those of you who were secretely anxious to get an answer to my question, I propose the following one.

The natural suite (== "01..n") being the first of a well ordered set @S of $b! members in base $b, one can get the translation seed (== "n012..") permutationally by permuting element number ($b-1)! (== "0n..21") with element number $b! (== "n..210") in the same set:

    $tran = perm($S[($b-1)!],$S[$b!])

I keep waiting for your insights on this subject, and for other answers to the same question.