let x, y, z be non pair set ; :: thesis: InputVertices (BitGFA0Str x,y,z) = {x,y,z}
set S = BitGFA0Str x,y,z;
set S1 = GFA0AdderStr x,y,z;
set S2 = GFA0CarryStr x,y,z;
A1:
( not InputVertices (GFA0AdderStr x,y,z) is with_pair & InnerVertices (GFA0AdderStr x,y,z) is Relation )
by FACIRC_1:58, FACIRC_1:59;
A2:
( not InputVertices (GFA0CarryStr x,y,z) is with_pair & InnerVertices (GFA0CarryStr x,y,z) is Relation )
by Th15, Th18;
( InputVertices (GFA0AdderStr x,y,z) = {x,y,z} & InputVertices (GFA0CarryStr x,y,z) = {x,y,z} )
by Th22, FACIRC_1:57;
hence InputVertices (BitGFA0Str x,y,z) =
{x,y,z} \/ {x,y,z}
by A1, A2, FACIRC_1:7
.=
{x,y,z}
;
:: thesis: verum