theorem Th48:
  for f,g being Function st x in dom f /\ dom g holds <:f,g:>.x = [f.x,g.x]
proof
  let f,g be Function;
  assume x in dom f /\ dom g;
  then x in dom <:f,g:> by Def7;
  hence thesis by Def7;
end;
