let x, y, c be non pair set ; :: thesis: not InputVertices (MajorityStr x,y,c) is with_pair
set M = MajorityStr x,y,c;
set MI = MajorityIStr x,y,c;
set S = 1GateCircStr <*[<*x,y*>,'&' ],[<*y,c*>,'&' ],[<*c,x*>,'&' ]*>,or3 ;
A1: ( not InputVertices (1GateCircStr <*x,y*>,'&' ) is with_pair & not InputVertices (1GateCircStr <*c,x*>,'&' ) is with_pair & not InputVertices (1GateCircStr <*y,c*>,'&' ) is with_pair ) by Th41;
then not InputVertices ((1GateCircStr <*x,y*>,'&' ) +* (1GateCircStr <*y,c*>,'&' )) is with_pair by Th8, CIRCCOMB:55;
then A2: not InputVertices (MajorityIStr x,y,c) is with_pair by A1, Th8, CIRCCOMB:55;
InnerVertices (1GateCircStr <*[<*x,y*>,'&' ],[<*y,c*>,'&' ],[<*c,x*>,'&' ]*>,or3 ) is Relation by Th38;
then A3: InputVertices (MajorityStr x,y,c) = (InputVertices (MajorityIStr x,y,c)) \/ ((InputVertices (1GateCircStr <*[<*x,y*>,'&' ],[<*y,c*>,'&' ],[<*c,x*>,'&' ]*>,or3 )) \ (InnerVertices (MajorityIStr x,y,c))) by A2, Th6;
given xx being pair set such that A4: xx in InputVertices (MajorityStr x,y,c) ; :: according to FACIRC_1:def 2 :: thesis: contradiction
A5: InputVertices (1GateCircStr <*[<*x,y*>,'&' ],[<*y,c*>,'&' ],[<*c,x*>,'&' ]*>,or3 ) = {[<*x,y*>,'&' ],[<*y,c*>,'&' ],[<*c,x*>,'&' ]} by Th42;
A6: ( InnerVertices (1GateCircStr <*x,y*>,'&' ) = {[<*x,y*>,'&' ]} & InnerVertices (1GateCircStr <*y,c*>,'&' ) = {[<*y,c*>,'&' ]} & InnerVertices (1GateCircStr <*c,x*>,'&' ) = {[<*c,x*>,'&' ]} ) by CIRCCOMB:49;
A7: ( 1GateCircStr <*x,y*>,'&' tolerates 1GateCircStr <*y,c*>,'&' & 1GateCircStr <*x,y*>,'&' tolerates 1GateCircStr <*c,x*>,'&' & 1GateCircStr <*y,c*>,'&' tolerates 1GateCircStr <*c,x*>,'&' ) by CIRCCOMB:51;
then A8: InnerVertices ((1GateCircStr <*x,y*>,'&' ) +* (1GateCircStr <*y,c*>,'&' )) = {[<*x,y*>,'&' ]} \/ {[<*y,c*>,'&' ]} by A6, CIRCCOMB:15;
(1GateCircStr <*x,y*>,'&' ) +* (1GateCircStr <*y,c*>,'&' ) tolerates 1GateCircStr <*c,x*>,'&' by A7, CIRCCOMB:7;
then InnerVertices (MajorityIStr x,y,c) = ({[<*x,y*>,'&' ]} \/ {[<*y,c*>,'&' ]}) \/ {[<*c,x*>,'&' ]} by A6, A8, CIRCCOMB:15
.= {[<*x,y*>,'&' ],[<*y,c*>,'&' ]} \/ {[<*c,x*>,'&' ]} by ENUMSET1:41
.= {[<*x,y*>,'&' ],[<*y,c*>,'&' ],[<*c,x*>,'&' ]} by ENUMSET1:43 ;
then (InputVertices (1GateCircStr <*[<*x,y*>,'&' ],[<*y,c*>,'&' ],[<*c,x*>,'&' ]*>,or3 )) \ (InnerVertices (MajorityIStr x,y,c)) = {} by A5, XBOOLE_1:37;
hence contradiction by A2, A3, A4, Def2; :: thesis: verum