let S be non empty non void ManySortedSign ; :: thesis: for V being V5() ManySortedSet of the carrier of S
for X being non empty Subset of (S -Terms V)
for x being set holds
( x in InputVertices (X -CircuitStr) iff ( x in Subtrees X & ex s being SortSymbol of S ex v being Element of V . s st x = root-tree [v,s] ) )

let V be V5() ManySortedSet of the carrier of S; :: thesis: for X being non empty Subset of (S -Terms V)
for x being set holds
( x in InputVertices (X -CircuitStr) iff ( x in Subtrees X & ex s being SortSymbol of S ex v being Element of V . s st x = root-tree [v,s] ) )

let X be non empty Subset of (S -Terms V); :: thesis: for x being set holds
( x in InputVertices (X -CircuitStr) iff ( x in Subtrees X & ex s being SortSymbol of S ex v being Element of V . s st x = root-tree [v,s] ) )

set G = X -CircuitStr ;
A1: rng the ResultSort of (X -CircuitStr) = the carrier' of (X -CircuitStr) by RELAT_1:45;
let x be set ; :: thesis: ( x in InputVertices (X -CircuitStr) iff ( x in Subtrees X & ex s being SortSymbol of S ex v being Element of V . s st x = root-tree [v,s] ) )
hereby :: thesis: ( x in Subtrees X & ex s being SortSymbol of S ex v being Element of V . s st x = root-tree [v,s] implies x in InputVertices (X -CircuitStr) )
assume A2: x in InputVertices (X -CircuitStr) ; :: thesis: ( x in Subtrees X & ex s being SortSymbol of S ex v being Element of V . s st x = root-tree [v,s] )
then A3: not x in the carrier' of (X -CircuitStr) by A1, XBOOLE_0:def 5;
thus x in Subtrees X by A2; :: thesis: ex s being SortSymbol of S ex v being Element of V . s st x = root-tree [v,s]
reconsider t = x as Term of S,V by A2, Th4;
( ex s being SortSymbol of S ex v being Element of V . s st t . {} = [v,s] or t . {} in [: the carrier' of S,{ the carrier of S}:] ) by MSATERM:2;
then ( ex s being SortSymbol of S ex v being Element of V . s st t . {} = [v,s] or t is CompoundTerm of S,V ) by MSATERM:def 6;
then consider s being SortSymbol of S, v being Element of V . s such that
A4: t . {} = [v,s] by A2, A3, Th5;
take s = s; :: thesis: ex v being Element of V . s st x = root-tree [v,s]
reconsider v = v as Element of V . s ;
take v = v; :: thesis: x = root-tree [v,s]
thus x = root-tree [v,s] by A4, MSATERM:5; :: thesis: verum
end;
assume A5: x in Subtrees X ; :: thesis: ( for s being SortSymbol of S
for v being Element of V . s holds not x = root-tree [v,s] or x in InputVertices (X -CircuitStr) )

given s being SortSymbol of S, v being Element of V . s such that A6: x = root-tree [v,s] ; :: thesis: x in InputVertices (X -CircuitStr)
assume not x in InputVertices (X -CircuitStr) ; :: thesis: contradiction
then x in the carrier' of (X -CircuitStr) by A1, A5, XBOOLE_0:def 5;
then reconsider t = x as CompoundTerm of S,V by Th4;
t . {} = [v,s] by A6, TREES_4:3;
then [v,s] in [: the carrier' of S,{ the carrier of S}:] by MSATERM:def 6;
then s = the carrier of S by ZFMISC_1:106;
then s in s ;
hence contradiction ; :: thesis: verum