theorem
  f|X is Lipschitzian & X c= dom f implies (p(#)f)|X is Lipschitzian
proof
  (p(#)f)|X = p(#)(f|X) by RFUNCT_1:49;
  hence thesis;
end;
