let X' be set ; :: thesis: for F being Function holds (union (rng F)) /\ X' = union (rng (Intersect F,((dom F) --> X')))
let F be Function; :: thesis: (union (rng F)) /\ X' = union (rng (Intersect F,((dom F) --> X')))
set I = Intersect F,((dom F) --> X');
thus
(union (rng F)) /\ X' c= union (rng (Intersect F,((dom F) --> X')))
:: according to XBOOLE_0:def 10 :: thesis: union (rng (Intersect F,((dom F) --> X'))) c= (union (rng F)) /\ X'proof
let x be
set ;
:: according to TARSKI:def 3 :: thesis: ( not x in (union (rng F)) /\ X' or x in union (rng (Intersect F,((dom F) --> X'))) )
assume A1:
x in (union (rng F)) /\ X'
;
:: thesis: x in union (rng (Intersect F,((dom F) --> X')))
x in union (rng F)
by A1, XBOOLE_0:def 4;
then consider Fx being
set such that A2:
(
x in Fx &
Fx in rng F )
by TARSKI:def 4;
consider x1 being
set such that A3:
(
x1 in dom F &
F . x1 = Fx )
by A2, FUNCT_1:def 5;
(
x in X' &
(Intersect F,((dom F) --> X')) . x1 = Fx /\ X' &
x1 in dom (Intersect F,((dom F) --> X')) )
by A1, A3, Th57, XBOOLE_0:def 4;
then
(
x in (Intersect F,((dom F) --> X')) . x1 &
(Intersect F,((dom F) --> X')) . x1 in rng (Intersect F,((dom F) --> X')) )
by A2, FUNCT_1:def 5, XBOOLE_0:def 4;
hence
x in union (rng (Intersect F,((dom F) --> X')))
by TARSKI:def 4;
:: thesis: verum
end;
thus
union (rng (Intersect F,((dom F) --> X'))) c= (union (rng F)) /\ X'
:: thesis: verumproof
let x be
set ;
:: according to TARSKI:def 3 :: thesis: ( not x in union (rng (Intersect F,((dom F) --> X'))) or x in (union (rng F)) /\ X' )
assume A4:
x in union (rng (Intersect F,((dom F) --> X')))
;
:: thesis: x in (union (rng F)) /\ X'
consider Ix being
set such that A5:
(
x in Ix &
Ix in rng (Intersect F,((dom F) --> X')) )
by A4, TARSKI:def 4;
consider x1 being
set such that A6:
(
x1 in dom (Intersect F,((dom F) --> X')) &
(Intersect F,((dom F) --> X')) . x1 = Ix )
by A5, FUNCT_1:def 5;
x1 in dom F
by A6, Th57;
then
(
x1 in dom F &
(Intersect F,((dom F) --> X')) . x1 = (F . x1) /\ X' )
by Th57;
then
(
x in F . x1 &
F . x1 in rng F &
x in X' )
by A5, A6, FUNCT_1:def 5, XBOOLE_0:def 4;
then
(
x in union (rng F) &
x in X' )
by TARSKI:def 4;
hence
x in (union (rng F)) /\ X'
by XBOOLE_0:def 4;
:: thesis: verum
end;