
theorem Th112:
  for x,y,z being set holds [<*x,y*>,nor2] in InnerVertices
GFA3CarryStr(x,y,z) & [<*y,z*>,nor2] in InnerVertices GFA3CarryStr(x,y,z) & [
<*z,x*>,nor2] in InnerVertices GFA3CarryStr(x,y,z) & GFA3CarryOutput(x,y,z) in
  InnerVertices GFA3CarryStr(x,y,z)
proof
  let x,y,z be set;
  set f1 = nor2, f2 = nor2, f3 = nor2;
  set xy = [<*x,y*>,f1], yz = [<*y,z*>,f2], zx = [<*z,x*>,f3];
  InnerVertices GFA3CarryStr(x,y,z) = {xy,yz,zx} \/ {GFA3CarryOutput(x,y,z
  )} by Th106
    .= {xy,yz,zx,GFA3CarryOutput(x,y,z)} by ENUMSET1:6;
  hence thesis by ENUMSET1:def 2;
end;
