let Y be non empty set ; :: thesis: for G being Subset of (PARTITIONS Y)
for A, B, C, D, E, F being a_partition of Y st G = {A,B,C,D,E,F} & A <> B & A <> C & A <> D & A <> E & A <> F & B <> C & B <> D & B <> E & B <> F & C <> D & C <> E & C <> F & D <> E & D <> F & E <> F holds
CompF (C,G) = (((A '/\' B) '/\' D) '/\' E) '/\' F
let G be Subset of (PARTITIONS Y); :: thesis: for A, B, C, D, E, F being a_partition of Y st G = {A,B,C,D,E,F} & A <> B & A <> C & A <> D & A <> E & A <> F & B <> C & B <> D & B <> E & B <> F & C <> D & C <> E & C <> F & D <> E & D <> F & E <> F holds
CompF (C,G) = (((A '/\' B) '/\' D) '/\' E) '/\' F
let A, B, C, D, E, F be a_partition of Y; :: thesis: ( G = {A,B,C,D,E,F} & A <> B & A <> C & A <> D & A <> E & A <> F & B <> C & B <> D & B <> E & B <> F & C <> D & C <> E & C <> F & D <> E & D <> F & E <> F implies CompF (C,G) = (((A '/\' B) '/\' D) '/\' E) '/\' F )
A1: {A,B,C,D,E,F} = {A,B,C} \/ {D,E,F} by ENUMSET1:13
.= ({A} \/ {B,C}) \/ {D,E,F} by ENUMSET1:2
.= {A,C,B} \/ {D,E,F} by ENUMSET1:2
.= {A,C,B,D,E,F} by ENUMSET1:13 ;
assume ( G = {A,B,C,D,E,F} & A <> B & A <> C & A <> D & A <> E & A <> F & B <> C & B <> D & B <> E & B <> F & C <> D & C <> E & C <> F & D <> E & D <> F & E <> F ) ; :: thesis: CompF (C,G) = (((A '/\' B) '/\' D) '/\' E) '/\' F
hence CompF (C,G) = (((A '/\' B) '/\' D) '/\' E) '/\' F by A1, Th32; :: thesis: verum