deffunc H1( set ) -> set = f (#) $1;
consider F being Function such that
A9:
dom F = the carrier of (oContMaps Z,X)
and
A10:
for x being set st x in the carrier of (oContMaps Z,X) holds
F . x = H1(x)
from FUNCT_1:sch 3();
rng F c= the carrier of (oContMaps Y,X)
proof
let y be
set ;
TARSKI:def 3 ( not y in rng F or y in the carrier of (oContMaps Y,X) )
assume
y in rng F
;
y in the carrier of (oContMaps Y,X)
then consider x being
set such that A11:
x in dom F
and A12:
y = F . x
by FUNCT_1:def 5;
reconsider g =
x as
continuous Function of
Z,
X by A9, A11, Th2;
y =
f (#) g
by A9, A10, A11, A12
.=
g * f
by YELLOW16:1
;
then
y is
Element of
(oContMaps Y,X)
by Th2;
hence
y in the
carrier of
(oContMaps Y,X)
;
verum
end;
then reconsider F = F as Function of (oContMaps Z,X),(oContMaps Y,X) by A9, FUNCT_2:4;
take
F
; for g being continuous Function of Z,X holds F . g = g * f
let g be continuous Function of Z,X; F . g = g * f
g is Element of (oContMaps Z,X)
by Th2;
hence F . g =
f (#) g
by A10
.=
g * f
by YELLOW16:1
;
verum