END{OFS=">";for($30=v="v";i<30;sub(i++?">":0,"^")sub(".<","<<")sub(v,"<")sub(/\^><",v v))print}