theorem Th47:
  F[:](f,x) is Function of Y,X
proof
  dom f = Y by FUNCT_2:def 1;
  then reconsider g = dom f --> x as Function of Y,X;
  F*<:f,g:> is Function of Y,X;
  hence thesis;
end;
