let C1, C2, C3 be non empty set ; :: thesis: for f being RMembership_Func of C1,C2
for g being RMembership_Func of C2,C3
for x, z being set st x in C1 & z in C3 holds
sup (rng (min (converse g),(converse f),z,x)) = sup (rng (min f,g,x,z))
let f be RMembership_Func of C1,C2; :: thesis: for g being RMembership_Func of C2,C3
for x, z being set st x in C1 & z in C3 holds
sup (rng (min (converse g),(converse f),z,x)) = sup (rng (min f,g,x,z))
let g be RMembership_Func of C2,C3; :: thesis: for x, z being set st x in C1 & z in C3 holds
sup (rng (min (converse g),(converse f),z,x)) = sup (rng (min f,g,x,z))
let x, z be set ; :: thesis: ( x in C1 & z in C3 implies sup (rng (min (converse g),(converse f),z,x)) = sup (rng (min f,g,x,z)) )
assume A1:
( x in C1 & z in C3 )
; :: thesis: sup (rng (min (converse g),(converse f),z,x)) = sup (rng (min f,g,x,z))
A2:
sup (rng (min (converse g),(converse f),z,x)) <= sup (rng (min f,g,x,z))
proof
rng (min (converse g),(converse f),z,x) is
bounded
by Th1;
then A3:
rng (min (converse g),(converse f),z,x) is
bounded_above
by XXREAL_2:def 11;
for
s being
real number st
0 < s holds
(sup (rng (min (converse g),(converse f),z,x))) - s <= sup (rng (min f,g,x,z))
proof
let s be
real number ;
:: thesis: ( 0 < s implies (sup (rng (min (converse g),(converse f),z,x))) - s <= sup (rng (min f,g,x,z)) )
assume
s > 0
;
:: thesis: (sup (rng (min (converse g),(converse f),z,x))) - s <= sup (rng (min f,g,x,z))
then consider r being
real number such that A4:
(
r in rng (min (converse g),(converse f),z,x) &
(sup (rng (min (converse g),(converse f),z,x))) - s < r )
by A3, SEQ_4:def 4;
consider y being
set such that A5:
(
y in dom (min (converse g),(converse f),z,x) &
r = (min (converse g),(converse f),z,x) . y )
by A4, FUNCT_1:def 5;
y in C2
by A5;
then A6:
(
[z,y] in [:C3,C2:] &
[y,x] in [:C2,C1:] &
y in dom (min f,g,x,z) )
by A1, FUNCT_2:def 1, ZFMISC_1:106;
then A7:
(min f,g,x,z) . y <= sup (rng (min f,g,x,z))
by Th1;
r =
min ((converse g) . z,y),
((converse f) . y,x)
by A1, A5, Def2
.=
min (g . y,z),
((converse f) . y,x)
by A6, Def1
.=
min (g . y,z),
(f . x,y)
by A6, Def1
.=
(min f,g,x,z) . y
by A1, A5, Def2
;
hence
(sup (rng (min (converse g),(converse f),z,x))) - s <= sup (rng (min f,g,x,z))
by A4, A7, XXREAL_0:2;
:: thesis: verum
end;
hence
sup (rng (min (converse g),(converse f),z,x)) <= sup (rng (min f,g,x,z))
by XREAL_1:59;
:: thesis: verum
end;
sup (rng (min (converse g),(converse f),z,x)) >= sup (rng (min f,g,x,z))
proof
rng (min f,g,x,z) is
bounded
by Th1;
then A8:
rng (min f,g,x,z) is
bounded_above
by XXREAL_2:def 11;
for
s being
real number st
0 < s holds
(sup (rng (min f,g,x,z))) - s <= sup (rng (min (converse g),(converse f),z,x))
proof
let s be
real number ;
:: thesis: ( 0 < s implies (sup (rng (min f,g,x,z))) - s <= sup (rng (min (converse g),(converse f),z,x)) )
assume
s > 0
;
:: thesis: (sup (rng (min f,g,x,z))) - s <= sup (rng (min (converse g),(converse f),z,x))
then consider r being
real number such that A9:
(
r in rng (min f,g,x,z) &
(sup (rng (min f,g,x,z))) - s < r )
by A8, SEQ_4:def 4;
consider y being
set such that A10:
(
y in dom (min f,g,x,z) &
r = (min f,g,x,z) . y )
by A9, FUNCT_1:def 5;
y in C2
by A10;
then A11:
(
[z,y] in [:C3,C2:] &
[y,x] in [:C2,C1:] &
y in dom (min (converse g),(converse f),z,x) )
by A1, FUNCT_2:def 1, ZFMISC_1:106;
then A12:
(min (converse g),(converse f),z,x) . y <= sup (rng (min (converse g),(converse f),z,x))
by Th1;
r =
min (f . x,y),
(g . y,z)
by A1, A10, Def2
.=
min ((converse f) . y,x),
(g . y,z)
by A11, Def1
.=
min ((converse f) . y,x),
((converse g) . z,y)
by A11, Def1
.=
(min (converse g),(converse f),z,x) . y
by A1, A10, Def2
;
hence
(sup (rng (min f,g,x,z))) - s <= sup (rng (min (converse g),(converse f),z,x))
by A9, A12, XXREAL_0:2;
:: thesis: verum
end;
hence
sup (rng (min (converse g),(converse f),z,x)) >= sup (rng (min f,g,x,z))
by XREAL_1:59;
:: thesis: verum
end;
hence
sup (rng (min (converse g),(converse f),z,x)) = sup (rng (min f,g,x,z))
by A2, XXREAL_0:1; :: thesis: verum