reserve S for non void non empty ManySortedSign,
  V for non-empty ManySortedSet of the carrier of S;
reserve A for MSAlgebra over S,
  t for Term of S,V;

theorem Th22:
  for o being OperSymbol of S, a being ArgumentSeq of Sym(o,V)
holds len a = len the_arity_of o & dom a = dom the_arity_of o & for i being Nat
  st i in dom a holds a.i is Term of S,V
proof
  let o be OperSymbol of S, a be ArgumentSeq of Sym(o,V);
  thus len a = len the_arity_of o & dom a = dom the_arity_of o by Lm8;
  let i be Nat;
  assume i in dom a;
  then
  ex t being Term of S,V st t = a.i & t = (a qua FinSequence of S-Terms V
qua non empty set)/.i & the_sort_of t = (the_arity_of o).i & the_sort_of t = (
  the_arity_of o)/.i by Lm8;
  hence thesis;
end;
