
theorem Th4:
  for X be set, F be Domain-Sequence, p be FinSequence holds
    (p is MultOps of X,F iff len p = len F &
    for i be set st i in dom F holds p.i is Function of [:X,F.i:],F.i)
proof
  let X be set;
  let F be Domain-Sequence;
  let p be FinSequence;
  dom p = dom F iff len p = len F by FINSEQ_3:29;
  hence thesis by Def1;
end;
