theorem
  for f be PartFunc of CNS1,CNS2 st X c= dom f & f|X is constant holds f
  is_uniformly_continuous_on X by Th25,NCFCONT1:112;
