Testing the output
>
evalm(transpose(T)&*F&*T);