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 (F,G) = (((A '/\' B) '/\' C) '/\' D) '/\' E

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 (F,G) = (((A '/\' B) '/\' C) '/\' D) '/\' E

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 (F,G) = (((A '/\' B) '/\' C) '/\' D) '/\' E )
A1: {A,B,C,D,E,F} = {A,B,C,D} \/ {E,F} by ENUMSET1:14
.= {A,B,C,D,F,E} by ENUMSET1:14 ;
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 (F,G) = (((A '/\' B) '/\' C) '/\' D) '/\' E
hence CompF (F,G) = (((A '/\' B) '/\' C) '/\' D) '/\' E by A1, Th35; :: thesis: verum