theorem Th50:
  for f,g being Function st dom f = X & dom g = X holds dom <:f,g :> = X
proof
  let f,g be Function;
  dom <:f,g:> = dom f /\ dom g by Def7;
  hence thesis;
end;
