
theorem Th26:
  for n being Element of NAT, X being non empty finite set for f
  being Function of n-tuples_on X, X for p being FinSeqLen of n holds
  1GateCircuit(p,f) is Circuit of X, 1GateCircStr(p,f)
proof
  let n be Element of NAT, X be non empty finite set;
  let f be Function of n-tuples_on X, X;
  let p being FinSeqLen of n;
  set A = 1GateCircuit(p,f);
  thus A is gate`2=den;
  the Sorts of A = (the carrier of 1GateCircStr(p,f))-->X by CIRCCOMB:def 13;
  hence the Sorts of A is constant & the_value_of the Sorts of A = X by
FUNCOP_1:79;
end;
