theorem Th18:
f|X is continuous & X1 c= X implies f|X1 is continuous
proof
   assume A1: f|X is continuous;
   assume X1 c= X; then
   f|X1 = f|X|X1 by RELAT_1:74;
   hence thesis by A1;
end;
