let n be Element of NAT ; :: thesis: for X being non empty finite set
for f being Function of (n -tuples_on X),X
for p being FinSeqLen of n
for s being State of (1GateCircuit p,f) holds (Following s) . (Output (1GateCircStr p,f)) = f . (s * p)

let X be non empty finite set ; :: thesis: for f being Function of (n -tuples_on X),X
for p being FinSeqLen of n
for s being State of (1GateCircuit p,f) holds (Following s) . (Output (1GateCircStr p,f)) = f . (s * p)

let f be Function of (n -tuples_on X),X; :: thesis: for p being FinSeqLen of n
for s being State of (1GateCircuit p,f) holds (Following s) . (Output (1GateCircStr p,f)) = f . (s * p)

let p be FinSeqLen of n; :: thesis: for s being State of (1GateCircuit p,f) holds (Following s) . (Output (1GateCircStr p,f)) = f . (s * p)
let s be State of (1GateCircuit p,f); :: thesis: (Following s) . (Output (1GateCircStr p,f)) = f . (s * p)
Output (1GateCircStr p,f) = [p,f] by Th16;
hence (Following s) . (Output (1GateCircStr p,f)) = f . (s * p) by CIRCCOMB:64; :: thesis: verum