deffunc H1( set ) -> set = Funcs ((f . $1),X);
ex F being Function st
( dom F = dom f & ( for x being set st x in dom f holds
F . x = H1(x) ) ) from FUNCT_1:sch 3();
hence ex b1 being Function st
( dom b1 = dom f & ( for x being set st x in dom f holds
b1 . x = Funcs ((f . x),X) ) ) ; :: thesis: verum