theorem Th11:
  p is BinOps of a iff len p = len a & for i holds p.i is BinOp of a.i
proof
  dom p = dom a iff len p = len a by FINSEQ_3:29;
  hence thesis by Def6;
end;
