theorem Th32:
  for L being non empty ZeroStr, p being sequence of L holds
  (p||n).n = 0.L
  proof
    let L be non empty ZeroStr;
    let p be sequence of L;
    dom p = NAT by FUNCT_2:def 1;
    hence thesis by FUNCT_7:31,ORDINAL1:def 12;
  end;
