theorem
  l -' (0,S) = l
by NAT_D:40,Def5;
