procedure main()
every|write(reverse(map(read(),&digits,"oizehs*lb*")))
end