theorem Th10:
  for l being Nat of n st l=i holds (p+*(i,d)).l = d
proof
  let l be Nat of n such that
A1: l = i;
  l in Seg(n+1) by Th7;
  hence thesis by A1,Lm1;
end;
