by@kuromunori
AC
551ms
2a+>Ia*I+!]v v[[^$.-1;I < >[[3>[[[[[[[[???]]]?~-!~v v[[[^$.-1!-~?]]]!-~?]]] < >[[[[[?]]]]?*]]]]?*[?[[[[?*[?*+[?]]]]?*]?*+v v!:6-*?[[*?[[[[[?]-*?]]*?]]]]]?[[-*?[[*?[[?< \@ ?o /
23 15 08 52 40 89 36 59 91 09 14 72
13844