Dear Leo,
it is not a loop over all components but it works fine if someone has to select a specific evaluated component to make manipulations with Sympy:
{a,b,c}::Indices(position=fixed,values={x,y,z}).
{x,y,z}::Coordinate.
rl := {A_{x}=Ax,A_{y}=Ay,A_{z}=Az}:
CompSel:={xx^{x x}=1,xy^{x y}=1,xz^{x z}=1,yx^{y x}=1,yy^{y y}=1,yz^{y z}=1,zx^{z x}=1,zy^{z y}=1,zz^{z z}=1}:
ex := T_{a b}=A_{a} A_{b};
evaluate(ex,rl);
yz_Comp:=T_{a b} yz^{a b}:
substitute(_,ex)
evaluate(_,CompSel)
yz_Comp=sympy.expand(yz_Comp);
I hope it can be useful,
Mattia