theorem
  dom(R|X) c= X by Th51;
