let r be real number ; :: thesis: for X being set
for f, g being real-valued Function st ( X c= dom f or dom g c= dom f ) & f | X = g | X & f,X is_absolutely_bounded_by r holds
g,X is_absolutely_bounded_by r

let X be set ; :: thesis: for f, g being real-valued Function st ( X c= dom f or dom g c= dom f ) & f | X = g | X & f,X is_absolutely_bounded_by r holds
g,X is_absolutely_bounded_by r

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