how to animate this rotation?

with(plots):
xy := MatrixMatrixMultiply(Matrix([[cos(t),sin(t)],[sin(t),cos(t)]]),Matrix([[x],[y]]));
animate3d([t, xy[1][1], xy[2][1]], x = 1 .. 10, y = 1 .. 10, t = -Pi .. Pi,coords=spherical);
animate3d([x, xy[1][1], xy[2][1]], x = 1 .. 10, y = 1 .. 10, t = -Pi .. Pi,coords=spherical);

animate3d([t, xy[1][1], xy[2][1]], x = -10 .. 10, y = -10 .. 10, t = -Pi .. Pi,coords=spherical);

 

would like to see how it rotate a ball