reconsider X9 = X as SetWithCompoundTerm of S,V by A1;
reconsider o9 = o as Gate of (X9 -CircuitStr ) ;
take the Charact of A . ((o9 . {} ) `1 ) ; :: thesis: for X9 being SetWithCompoundTerm of S,V st X9 = X holds
for o9 being Gate of (X9 -CircuitStr ) st o9 = o holds
the Charact of A . ((o9 . {} ) `1 ) = the Charact of A . ((o9 . {} ) `1 )

thus for X9 being SetWithCompoundTerm of S,V st X9 = X holds
for o9 being Gate of (X9 -CircuitStr ) st o9 = o holds
the Charact of A . ((o9 . {} ) `1 ) = the Charact of A . ((o9 . {} ) `1 ) ; :: thesis: verum