let x, y, z be set ; :: thesis: ( [:{x},{y,z}:] = {[x,y],[x,z]} & [:{x,y},{z}:] = {[x,z],[y,z]} )
thus
[:{x},{y,z}:] = {[x,y],[x,z]}
:: thesis: [:{x,y},{z}:] = {[x,z],[y,z]}proof
now let v be
set ;
:: thesis: ( ( v in [:{x},{y,z}:] implies v in {[x,y],[x,z]} ) & ( v in {[x,y],[x,z]} implies v in [:{x},{y,z}:] ) )thus
(
v in [:{x},{y,z}:] implies
v in {[x,y],[x,z]} )
:: thesis: ( v in {[x,y],[x,z]} implies v in [:{x},{y,z}:] )proof
assume
v in [:{x},{y,z}:]
;
:: thesis: v in {[x,y],[x,z]}
then consider x1,
y1 being
set such that A1:
(
x1 in {x} &
y1 in {y,z} )
and A2:
v = [x1,y1]
by Def2;
(
x1 = x & (
y1 = y or
y1 = z ) )
by A1, TARSKI:def 1, TARSKI:def 2;
hence
v in {[x,y],[x,z]}
by A2, TARSKI:def 2;
:: thesis: verum
end; assume
v in {[x,y],[x,z]}
;
:: thesis: v in [:{x},{y,z}:]then
( (
v = [x,y] or
v = [x,z] ) &
x in {x} &
y in {y,z} &
z in {y,z} )
by TARSKI:def 1, TARSKI:def 2;
hence
v in [:{x},{y,z}:]
by Lm17;
:: thesis: verum end;
hence
[:{x},{y,z}:] = {[x,y],[x,z]}
by TARSKI:2;
:: thesis: verum
end;
now let v be
set ;
:: thesis: ( ( v in [:{x,y},{z}:] implies v in {[x,z],[y,z]} ) & ( v in {[x,z],[y,z]} implies v in [:{x,y},{z}:] ) )thus
(
v in [:{x,y},{z}:] implies
v in {[x,z],[y,z]} )
:: thesis: ( v in {[x,z],[y,z]} implies v in [:{x,y},{z}:] )proof
assume
v in [:{x,y},{z}:]
;
:: thesis: v in {[x,z],[y,z]}
then consider x1,
y1 being
set such that A3:
(
x1 in {x,y} &
y1 in {z} )
and A4:
v = [x1,y1]
by Def2;
(
y1 = z & (
x1 = x or
x1 = y ) )
by A3, TARSKI:def 1, TARSKI:def 2;
hence
v in {[x,z],[y,z]}
by A4, TARSKI:def 2;
:: thesis: verum
end; assume
v in {[x,z],[y,z]}
;
:: thesis: v in [:{x,y},{z}:]then
( (
v = [x,z] or
v = [y,z] ) &
x in {x,y} &
y in {x,y} &
z in {z} )
by TARSKI:def 1, TARSKI:def 2;
hence
v in [:{x,y},{z}:]
by Lm17;
:: thesis: verum end;
hence
[:{x,y},{z}:] = {[x,z],[y,z]}
by TARSKI:2; :: thesis: verum