set h = <:f,g:>;
rng <:f,g:> c= [:(rng f),(rng g):] by FUNCT_3:51;
hence for b1 being Function st b1 = <:f,g:> holds
b1 is [:X,Y:] -valued by XBOOLE_1:1; :: thesis: verum