let r be real number ; :: thesis: for X being set
for f, g being real-valued Function st f c= g & g,X is_absolutely_bounded_by r holds
f,X is_absolutely_bounded_by r
let X be set ; :: thesis: for f, g being real-valued Function st f c= g & g,X is_absolutely_bounded_by r holds
f,X is_absolutely_bounded_by r
let f, g be real-valued Function; :: thesis: ( f c= g & g,X is_absolutely_bounded_by r implies f,X is_absolutely_bounded_by r )
assume that
A1:
f c= g
and
A2:
g,X is_absolutely_bounded_by r
; :: thesis: f,X is_absolutely_bounded_by r
let x be set ; :: according to TIETZE:def 1 :: thesis: ( x in X /\ (dom f) implies abs (f . x) <= r )
assume A3:
x in X /\ (dom f)
; :: thesis: abs (f . x) <= r
then A4:
x in dom f
by XBOOLE_0:def 4;
A5:
dom f c= dom g
by A1, GRFUNC_1:8;
x in X
by A3, XBOOLE_0:def 4;
then
x in X /\ (dom g)
by A4, A5, XBOOLE_0:def 4;
then
abs (g . x) <= r
by A2, Def1;
hence
abs (f . x) <= r
by A1, A4, GRFUNC_1:8; :: thesis: verum