theorem Th95:
  Rotate(<*p1,p2*>,p1) = <*p1,p2*>
proof
  <*p1,p2*>/.1 = p1 by FINSEQ_4:17;
  hence thesis by Th89;
end;
