v
  **]e;!+   %,0 -   f;! ]d;!
>001p0":e];c#[:a-1;a:c+!;b;c[]>0;a[:"v
v"[\b:a:b;[a;!b;/]?b;~[0]?]d:[b:a:0c"<
>":f];c:\:c$[D">:#,_01g0p01g1+01p~11pv
>:5`#v_:1+201g0p01g1+01p             >
     >"@"11g-#v_~11p101g0p01g1+01p0  ^

todo!