link numbers    # commas, spell

procedure main(arglist)
every x := !arglist do
   write(commas(x), " -> ",spell(x))
end