theorem
  for X being set, P,R being Relation holds P*(R|X) = (X|`P)*R by Lm36;
