The Library:-RedefineTensorComponent in the physics package has got some serious problems, I guess in the update. It is not assigning the components at the right location for a tensor of rank 4 and above. It is working for tensors of rank 1, 2 and 3. Can someone please look into the issue and help out?

I am attaching the code with an example to indiacate the problem. Redefine.mw

I am working with the Physics package in maple. I have a rank 6 tensor, I want to assign the elements of a set (with equal number of components as the tensor) as the corresponding components of a tensor. Entering manually all the components using 'RedefineTensorComponents' is not an option, as it has 4096 components. How can I do this?