let X1, X2, X3, X4, X5 be set ; ( ( X1 c= [:X1,X2,X3,X4,X5:] or X1 c= [:X2,X3,X4,X5,X1:] or X1 c= [:X3,X4,X5,X1,X2:] or X1 c= [:X4,X5,X1,X2,X3:] or X1 c= [:X5,X1,X2,X3,X4:] ) implies X1 = {} )
assume that
A1:
( X1 c= [:X1,X2,X3,X4,X5:] or X1 c= [:X2,X3,X4,X5,X1:] or X1 c= [:X3,X4,X5,X1,X2:] or X1 c= [:X4,X5,X1,X2,X3:] or X1 c= [:X5,X1,X2,X3,X4:] )
and
A2:
X1 <> {}
; contradiction
A3:
( [:X1,X2,X3,X4,X5:] <> {} or [:X2,X3,X4,X5,X1:] <> {} or [:X3,X4,X5,X1,X2:] <> {} or [:X4,X5,X1,X2,X3:] <> {} or [:X5,X1,X2,X3,X4:] <> {} )
by A1, A2, XBOOLE_1:3;
then A4:
( X4 <> {} & X5 <> {} )
by Th13;
A5:
( X2 <> {} & X3 <> {} )
by A3, Th13;
now per cases
( X1 c= [:X1,X2,X3,X4,X5:] or X1 c= [:X2,X3,X4,X5,X1:] or X1 c= [:X3,X4,X5,X1,X2:] or X1 c= [:X4,X5,X1,X2,X3:] or X1 c= [:X5,X1,X2,X3,X4:] )
by A1;
suppose A6:
X1 c= [:X1,X2,X3,X4,X5:]
;
contradictionconsider x being
set such that A7:
x in X1
and A8:
for
x1,
x2,
x3,
x4,
x5 being
set st (
x1 in X1 or
x2 in X1 ) holds
x <> [x1,x2,x3,x4,x5]
by A2, Th8;
reconsider x =
x as
Element of
[:X1,X2,X3,X4,X5:] by A6, A7;
x = [(x `1),(x `2),(x `3),(x `4),(x `5)]
by A2, A5, A4, Th19;
hence
contradiction
by A2, A8;
verum end; suppose A9:
X1 c= [:X5,X1,X2,X3,X4:]
;
contradictionconsider x being
set such that A10:
x in X1
and A11:
for
x1,
x2,
x3,
x4,
x5 being
set st (
x1 in X1 or
x2 in X1 ) holds
x <> [x1,x2,x3,x4,x5]
by A2, Th8;
reconsider x =
x as
Element of
[:X5,X1,X2,X3,X4:] by A9, A10;
x = [(x `1),(x `2),(x `3),(x `4),(x `5)]
by A2, A5, A4, Th19;
hence
contradiction
by A2, A11;
verum end; end; end;
hence
contradiction
; verum