501,1>{1:s(:~{):~.s~4$~%!*+:s<}do<},n*