Comprobacion

> evalm(transpose(T)&*T);

[Maple Math]