theorem Th9:
  n in dom f implies (f|n).1 = f.1
  proof
    assume
    A1: n in dom f; then
    n >= 1 by FINSEQ_3:24,NAT_1:14;
    hence thesis by A1,Th7;
  end;
