(%i1) x : matrix( [cos(t)^2/(sx^2) + sin(t)^2/(sy^2),-sin(2*t)/(2*sx^2) + sin(2*t)/(2*sy^2)],
  [-sin(2*t)/(2*sx^2) + sin(2*t)/(2*sy^2),sin(t)^2/(sx^2) + cos(t)^2/(sy^2)]);

Result

(%i2) xinv : trigsimp(trigexpand(trigreduce(invert(x))));

Result

(%i3) tex(matrix([sin(t)^2/sy^2+cos(t)^2/sx^2,sin(2*t)/(2*sy^2)-sin(2*t)/(2*sx^2)],[sin(2*t)/(2*sy^2)
 -sin(2*t)/(2*sx^2),sin(t)^2/sx^2+cos(t)^2/sy^2]))$

Result

(%i4) text(xinv);

Result

(%i5) help text;

Result

(%i5) ascii(xinv);

Result

(%i6) ;

Result

(%i6) xinv;

Result

(%i7) print(xinv);

Result

(%i8) display(inv);

Result

(%i9) display(xinv);

Result

(%i10) ldisplay(xinv);

Result

(%i11) string(xinv);

Result

(%i12) x;

Result

(%i13) set_display('ascii)$

(%i14) xinv;

Result

(%i15) x;

Result


Created with wxMaxima.