[i]Tensor(zz,ss,nn):=Transpose(Element(Identity(nn), zz)) {Element(Identity(nn), ss)}[br]T(zz,ss,nn):=Identity(nn)+Tensor(zz,ss,nn) -Tensor(zz,zz,nn) +Tensor(ss,zz,nn)-Tensor(ss,ss,nn)[br]Sum(Sequence(Tensor(j+1,j,7),j,1,6))+Tensor(1,7,7)[br]Tx = Transpose(xT)[/i][br][br]