User Portlet User Portlet

Discussions
m = {{0, 0, w}, {0, t, -w}, {w, -w, r}} use equation P^(?1)A P, how to obtain P with Mathematica? Thanks!