theorem Th16:
  k in Seg n implies (p1+p2).k = p1.k + p2.k
proof
A1: dom(p1+p2) = Seg n by FINSEQ_1:89;
  thus thesis by A1,VALUED_1:def 1;
end;
